This repository has been archived on 2024-11-28. You can view files and clone it, but cannot push or open issues or pull requests.
LuisLeon_FactuGES2/Source/Modulos/Informe margen por articulo/Data/uDataModuleInfMargenArticulo.dfm

905 lines
26 KiB
Plaintext

inherited dmInfMargenArticulo: TdmInfMargenArticulo
OnCreate = DAClientDataModuleCreate
Height = 436
Width = 464
object RORemoteService: TRORemoteService
Message = ROBinMessage1
Channel = ROWinInetHTTPChannel1
ServiceName = 'srvInfMargenArticulo'
Left = 64
Top = 24
end
object DADesigntimeCall1: TDADesigntimeCall
RemoteService = LoginRemoteService
Params = <>
Left = 64
Top = 160
end
object LoginRemoteService: TRORemoteService
Message = ROBinMessage1
Channel = ROWinInetHTTPChannel1
ServiceName = 'srvLogin'
Left = 64
Top = 216
end
object ROWinInetHTTPChannel1: TROWinInetHTTPChannel
UserAgent = 'RemObjects SDK'
TargetURL = 'http://localhost:8099/bin'
ServerLocators = <>
DispatchOptions = []
Left = 64
Top = 272
end
object ROBinMessage1: TROBinMessage
Envelopes = <>
Left = 64
Top = 324
end
object tbl_InfMargen: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
IndexDefs = <>
Left = 168
Top = 184
end
object tbl_InfMargenPorArticulo1: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_ID_EMPRESA'
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_ID_ARTICULO'
InPrimaryKey = True
end
item
Name = 'FAMILIA'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_FAMILIA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_REFERENCIA'
end
item
Name = 'REFERENCIA_PROV'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_REFERENCIA_PROV'
end
item
Name = 'PROVEEDOR'
DataType = datString
Size = 255
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_DESCRIPCION'
end
item
Name = 'COMISIONABLE'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_COMISIONABLE'
end
item
Name = 'INVENTARIABLE'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_INVENTARIABLE'
end
item
Name = 'IMP_UNIDAD_ULT_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_UNIDAD_ULT_VENT'
end
item
Name = 'IMP_NETO_ULT_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_NETO_ULT_VENT'
end
item
Name = 'IMP_PORTE_ULT_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_PORTE_ULT_VENT'
end
item
Name = 'IMP_UNIDAD_PRO_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_UNIDAD_PRO_VENT'
end
item
Name = 'IMP_NETO_PRO_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_NETO_PRO_VENT'
end
item
Name = 'IMP_PORTE_PRO_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_PORTE_PRO_VENT'
end
item
Name = 'IMP_UNIDAD_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_UNIDAD_COMPRA'
end
item
Name = 'IMP_NETO_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_NETO_COMPRA'
end
item
Name = 'IMP_PORTE_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_PORTE_COMPRA'
end
item
Name = 'IMP_UNIDAD_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_UNIDAD_ULT_COMP'
end
item
Name = 'IMP_NETO_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_NETO_ULT_COMP'
end
item
Name = 'IMP_PORTE_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_PORTE_ULT_COMP'
end
item
Name = 'IMP_UNIDAD_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_UNIDAD_PRO_COMP'
end
item
Name = 'IMP_NETO_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_NETO_PRO_COMP'
end
item
Name = 'IMP_PORTE_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_PORTE_PRO_COMP'
end
item
Name = 'IMP_MARGEN_ULT_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_MARGEN_ULT_VENT_COMPRA'
end
item
Name = 'POR_MARGEN_ULT_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_POR_MARGEN_ULT_VENT_COMPRA'
end
item
Name = 'IMP_MARGEN_ULT_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_MARGEN_ULT_VENT_ULT_COMP'
end
item
Name = 'POR_MARGEN_ULT_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_POR_MARGEN_ULT_VENT_ULT_COMP'
end
item
Name = 'IMP_MARGEN_ULT_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_MARGEN_ULT_VENT_PRO_COMP'
end
item
Name = 'POR_MARGEN_ULT_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_POR_MARGEN_ULT_VENT_PRO_COMP'
end
item
Name = 'IMP_MARGEN_PRO_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_MARGEN_PRO_VENT_COMPRA'
end
item
Name = 'POR_MARGEN_PRO_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_POR_MARGEN_PRO_VENT_COMPRA'
end
item
Name = 'IMP_MARGEN_PRO_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_MARGEN_PRO_VENT_ULT_COMP'
end
item
Name = 'POR_MARGEN_PRO_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_POR_MARGEN_PRO_VENT_ULT_COMP'
end
item
Name = 'IMP_MARGEN_PRO_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_IMP_MARGEN_PRO_VENT_PRO_COMP'
end
item
Name = 'POR_MARGEN_PRO_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorArticulo_POR_MARGEN_PRO_VENT_PRO_COMP'
end>
Params = <
item
Name = 'FECHAINI'
Value = ''
ParamType = daptInput
end
item
Name = 'FECHAFIN'
Value = ''
ParamType = daptInput
end>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_InfMargenPorArticulo
LogicalName = 'InfMargenPorArticulo'
IndexDefs = <>
Left = 200
Top = 112
end
object ds_InfMargenPorArticulo1: TDADataSource
DataSet = tbl_InfMargenPorArticulo1.Dataset
DataTable = tbl_InfMargenPorArticulo1
Left = 200
Top = 64
end
object tbl_InfMargenPorCliente1: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_ID_EMPRESA'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'InfMargenPorCliente_ID_CLIENTE'
InPrimaryKey = True
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_ID_ARTICULO'
InPrimaryKey = True
end
item
Name = 'FAMILIA'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_FAMILIA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_REFERENCIA'
end
item
Name = 'REFERENCIA_PROV'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_REFERENCIA_PROV'
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_DESCRIPCION'
end
item
Name = 'COMISIONABLE'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_COMISIONABLE'
end
item
Name = 'INVENTARIABLE'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_INVENTARIABLE'
end
item
Name = 'NIF_CIF_CLIENTE'
DataType = datString
Size = 15
DictionaryEntry = 'InfVentasArticulo_NIF_CIF_CLIENTE'
end
item
Name = 'NOMBRE_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_NOMBRE_CLIENTE'
end
item
Name = 'PROVEEDOR'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE_COMERCIAL_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_NOMBRE_COMERCIAL_CLIENTE'
end
item
Name = 'NIF_CIF_AGENTE'
DataType = datString
Size = 15
DictionaryEntry = 'InfVentasArticulo_NIF_CIF_AGENTE'
end
item
Name = 'NOMBRE_AGENTE'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_NOMBRE_AGENTE'
end
item
Name = 'IMP_UNIDAD_ULT_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_ULT_VENT'
end
item
Name = 'IMP_NETO_ULT_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_ULT_VENT'
end
item
Name = 'IMP_PORTE_ULT_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_ULT_VENT'
end
item
Name = 'IMP_UNIDAD_PRO_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_PRO_VENT'
end
item
Name = 'IMP_NETO_PRO_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_PRO_VENT'
end
item
Name = 'IMP_PORTE_PRO_VENT'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_PRO_VENT'
end
item
Name = 'IMP_UNIDAD_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_COMPRA'
end
item
Name = 'IMP_NETO_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_COMPRA'
end
item
Name = 'IMP_PORTE_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_COMPRA'
end
item
Name = 'IMP_UNIDAD_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_ULT_COMP'
end
item
Name = 'IMP_NETO_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_ULT_COMP'
end
item
Name = 'IMP_PORTE_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_ULT_COMP'
end
item
Name = 'IMP_UNIDAD_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_PRO_COMP'
end
item
Name = 'IMP_NETO_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_PRO_COMP'
end
item
Name = 'IMP_PORTE_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_PRO_COMP'
end
item
Name = 'IMP_MARGEN_ULT_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_MARGEN_ULT_VENT_COMPRA'
end
item
Name = 'POR_MARGEN_ULT_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_POR_MARGEN_ULT_VENT_COMPRA'
end
item
Name = 'IMP_MARGEN_ULT_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_MARGEN_ULT_VENT_ULT_COMP'
end
item
Name = 'POR_MARGEN_ULT_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_POR_MARGEN_ULT_VENT_ULT_COMP'
end
item
Name = 'IMP_MARGEN_ULT_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_MARGEN_ULT_VENT_PRO_COMP'
end
item
Name = 'POR_MARGEN_ULT_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_POR_MARGEN_ULT_VENT_PRO_COMP'
end
item
Name = 'IMP_MARGEN_PRO_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_MARGEN_PRO_VENT_COMPRA'
end
item
Name = 'POR_MARGEN_PRO_VENT_COMPRA'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_POR_MARGEN_PRO_VENT_COMPRA'
end
item
Name = 'IMP_MARGEN_PRO_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_MARGEN_PRO_VENT_ULT_COMP'
end
item
Name = 'POR_MARGEN_PRO_VENT_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_POR_MARGEN_PRO_VENT_ULT_COMP'
end
item
Name = 'IMP_MARGEN_PRO_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_MARGEN_PRO_VENT_PRO_COMP'
end
item
Name = 'POR_MARGEN_PRO_VENT_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_POR_MARGEN_PRO_VENT_PRO_COMP'
end>
Params = <
item
Name = 'FECHAINI'
Value = ''
ParamType = daptInput
end
item
Name = 'FECHAFIN'
Value = ''
ParamType = daptInput
end>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_InfMargenPorCliente
LogicalName = 'InfMargenPorCliente'
IndexDefs = <>
Left = 352
Top = 112
end
object ds_InfMargenPorCliente1: TDADataSource
DataSet = tbl_InfMargenPorCliente1.Dataset
DataTable = tbl_InfMargenPorCliente1
Left = 352
Top = 64
end
object tbl_InfMargenPorFactura1: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_ID_EMPRESA'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'InfMargenPorCliente_ID_CLIENTE'
end
item
Name = 'ID_FACTURA'
DataType = datInteger
end
item
Name = 'ID_DETALLE'
DataType = datInteger
InPrimaryKey = True
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_ID_ARTICULO'
end
item
Name = 'FAMILIA'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_FAMILIA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_REFERENCIA'
end
item
Name = 'REFERENCIA_PROV'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_REFERENCIA_PROV'
end
item
Name = 'REFERENCIA_FACTURA'
DataType = datString
Size = 255
end
item
Name = 'FECHA_FACTURA'
DataType = datDateTime
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_DESCRIPCION'
end
item
Name = 'COMISIONABLE'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_COMISIONABLE'
end
item
Name = 'INVENTARIABLE'
DataType = datInteger
DictionaryEntry = 'InfVentasArticulo_INVENTARIABLE'
end
item
Name = 'NIF_CIF_CLIENTE'
DataType = datString
Size = 15
DictionaryEntry = 'InfVentasArticulo_NIF_CIF_CLIENTE'
end
item
Name = 'NOMBRE_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_NOMBRE_CLIENTE'
end
item
Name = 'PROVEEDOR'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE_COMERCIAL_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_NOMBRE_COMERCIAL_CLIENTE'
end
item
Name = 'NIF_CIF_AGENTE'
DataType = datString
Size = 15
DictionaryEntry = 'InfVentasArticulo_NIF_CIF_AGENTE'
end
item
Name = 'NOMBRE_AGENTE'
DataType = datString
Size = 255
DictionaryEntry = 'InfVentasArticulo_NOMBRE_AGENTE'
end
item
Name = 'CANTIDAD'
DataType = datInteger
end
item
Name = 'IMP_UNIDAD'
DataType = datFloat
end
item
Name = 'IMP_NETO'
DataType = datFloat
end
item
Name = 'IMP_PORTE'
DataType = datFloat
end
item
Name = 'IMP_TOTAL'
DataType = datFloat
end
item
Name = 'IMP_UNIDAD_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_ULT_COMP'
end
item
Name = 'IMP_NETO_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_ULT_COMP'
end
item
Name = 'IMP_PORTE_ULT_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_ULT_COMP'
end
item
Name = 'IMP_NETO_ULT_COM_TOTAL'
DataType = datFloat
end
item
Name = 'IMP_UNIDAD_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_UNIDAD_PRO_COMP'
end
item
Name = 'IMP_NETO_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_NETO_PRO_COMP'
end
item
Name = 'IMP_PORTE_PRO_COMP'
DataType = datFloat
DictionaryEntry = 'InfMargenPorCliente_IMP_PORTE_PRO_COMP'
end
item
Name = 'IMP_NETO_PRO_COM_TOTAL'
DataType = datFloat
end
item
Name = 'IMP_MARGEN_ULT_COMP'
DataType = datFloat
end
item
Name = 'IMP_MARGEN_ULT_COMP_TOTAL'
DataType = datFloat
end
item
Name = 'POR_MARGEN_ULT_COMP'
DataType = datFloat
end
item
Name = 'IMP_MARGEN_PRO_COMP'
DataType = datFloat
end
item
Name = 'IMP_MARGEN_PRO_COMP_TOTAL'
DataType = datFloat
end
item
Name = 'POR_MARGEN_PRO_COMP'
DataType = datFloat
end>
Params = <
item
Name = 'FECHAINI'
Value = ''
ParamType = daptInput
end
item
Name = 'FECHAFIN'
Value = ''
ParamType = daptInput
end>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_InfMargenPorFactura
LogicalName = 'InfMargenPorFactura'
IndexDefs = <>
Left = 296
Top = 280
end
object ds_InfMargenPorFactura1: TDADataSource
DataSet = tbl_InfMargenPorFactura1.Dataset
DataTable = tbl_InfMargenPorFactura1
Left = 296
Top = 232
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 64
Top = 88
end
object rda_InfMargenPorArticulo: TDARemoteDataAdapter
DataStreamer = Bin2DataStreamer
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
GetDataCall.MethodName = 'GetData'
GetDataCall.Params = <
item
Name = 'Result'
DataType = rtBinary
Flag = fResult
Value = Null
end
item
Name = 'aTableNameArray'
DataType = rtUserDefined
Flag = fIn
TypeName = 'StringArray'
Value = Null
end
item
Name = 'aTableRequestInfoArray'
DataType = rtUserDefined
Flag = fIn
TypeName = 'TableRequestInfoArray'
Value = Null
end>
GetDataCall.Default = False
GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
GetDataCall.IncomingDataParameter = 'Result'
GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
Left = 200
Top = 8
end
object rda_InfMargenPorCliente: TDARemoteDataAdapter
DataStreamer = Bin2DataStreamer
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
GetDataCall.MethodName = 'GetData'
GetDataCall.Params = <
item
Name = 'Result'
DataType = rtBinary
Flag = fResult
Value = Null
end
item
Name = 'aTableNameArray'
DataType = rtUserDefined
Flag = fIn
TypeName = 'StringArray'
Value = Null
end
item
Name = 'aTableRequestInfoArray'
DataType = rtUserDefined
Flag = fIn
TypeName = 'TableRequestInfoArray'
Value = Null
end>
GetDataCall.Default = False
GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
GetDataCall.IncomingDataParameter = 'Result'
GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
Left = 352
Top = 8
end
object rda_InfMargenPorFactura: TDARemoteDataAdapter
DataStreamer = Bin2DataStreamer
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
GetDataCall.MethodName = 'GetData'
GetDataCall.Params = <
item
Name = 'Result'
DataType = rtBinary
Flag = fResult
Value = Null
end
item
Name = 'aTableNameArray'
DataType = rtUserDefined
Flag = fIn
TypeName = 'StringArray'
Value = Null
end
item
Name = 'aTableRequestInfoArray'
DataType = rtUserDefined
Flag = fIn
TypeName = 'TableRequestInfoArray'
Value = Null
end>
GetDataCall.Default = False
GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
GetDataCall.IncomingDataParameter = 'Result'
GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
Left = 296
Top = 184
end
object rda_TablaVacia: TDARemoteDataAdapter
DataStreamer = Bin2DataStreamer
DynamicSelect = True
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
GetDataCall.MethodName = 'SQLGetData'
GetDataCall.Params = <
item
Name = 'Result'
DataType = rtBinary
Flag = fResult
Value = Null
end
item
Name = 'aSQLText'
DataType = rtUTF8String
Flag = fIn
Value = Null
end
item
Name = 'aIncludeSchema'
DataType = rtBoolean
Flag = fIn
Value = Null
end
item
Name = 'aMaxRecords'
DataType = rtInteger
Flag = fIn
Value = Null
end>
GetDataCall.Default = False
GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
GetDataCall.IncomingDataParameter = 'Result'
GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
Left = 168
Top = 264
end
object tbl_TablaVacia: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_TablaVacia
LogicalName = 'TablaVacia'
IndexDefs = <>
Left = 168
Top = 360
end
object ds_TablaVacia: TDADataSource
DataSet = tbl_TablaVacia.Dataset
DataTable = tbl_TablaVacia
Left = 168
Top = 312
end
object JvLogFile1: TJvLogFile
Left = 376
Top = 360
end
end