inherited DataModuleComisiones: TDataModuleComisiones OnCreate = DAClientDataModuleCreate Height = 414 Width = 518 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvComisiones' Left = 48 Top = 24 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 84 end object rda_Comisiones: TDARemoteDataAdapter DataStreamer = Bin2DataStreamer GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService Left = 51 Top = 143 end object tbl_Comisiones: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_COMISIONES_LIQUID_ID' DisplayLabel = 'Id' ServerAutoRefresh = True DictionaryEntry = 'Comisiones_ID' InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DisplayLabel = 'IdEmpresa' DictionaryEntry = 'Comisiones_ID_EMPRESA' end item Name = 'REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' DictionaryEntry = 'Comisiones_REFERENCIA' end item Name = 'ID_AGENTE' DataType = datInteger DisplayLabel = 'IdAgente' DictionaryEntry = 'Comisiones_ID_AGENTE' end item Name = 'DESCRIPCION' DataType = datString Size = 255 DisplayLabel = 'Descripci'#243'n' DictionaryEntry = 'Comisiones_DESCRIPCION' end item Name = 'FECHA' DataType = datDateTime DisplayLabel = 'Fecha' DictionaryEntry = 'Comisiones_FECHA' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'Comisiones_IMPORTE_TOTAL' end item Name = 'USUARIO' DataType = datString Size = 20 DisplayLabel = 'Usuario' DictionaryEntry = 'Comisiones_USUARIO' end item Name = 'NOMBRE' DataType = datString Size = 255 end item Name = 'DELEGACION' DataType = datString Size = 255 end item Name = 'COMISION' DataType = datFloat end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Comisiones LogicalName = 'Comisiones' IndexDefs = <> Left = 224 Top = 112 end object ds_Comisiones: TDADataSource DataSet = tbl_Comisiones.Dataset DataTable = tbl_Comisiones Left = 224 Top = 56 end object tbl_Facturas_Comision: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_COMISIONABLE' DataType = datCurrency end item Name = 'IMPORTE_COMISION' DataType = datFloat end item Name = 'ID_EMPRESA' DataType = datInteger DisplayLabel = 'Facturas_Comision_ID_EMPRESA' DictionaryEntry = 'Facturas_Comision_ID_EMPRESA' end item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger DisplayLabel = 'IdComision' ServerAutoRefresh = True DictionaryEntry = 'Facturas_Comision_ID_COMISION_LIQUIDADA' end item Name = 'FECHA' DataType = datDateTime end item Name = 'REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' DictionaryEntry = 'Facturas_Comision_REFERENCIA' end item Name = 'SITUACION' DataType = datString Size = 19 DisplayLabel = 'Situaci'#243'n' DictionaryEntry = 'Facturas_Comision_SITUACION' end item Name = 'ID_CLIENTE' DataType = datInteger DisplayLabel = 'IdCliente' DictionaryEntry = 'Facturas_Comision_ID_CLIENTE' end item Name = 'ID_AGENTE' DataType = datInteger DisplayLabel = 'Facturas_Comision_ID_AGENTE' DictionaryEntry = 'Facturas_Comision_ID_AGENTE' end item Name = 'AGENTE' DataType = datString Size = 255 end item Name = 'CLIENTE' DataType = datString Size = 255 end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Comisiones MasterSource = ds_Comisiones MasterFields = 'ID' DetailFields = 'ID_COMISION_LIQUIDADA' LogicalName = 'Facturas_Comision' IndexDefs = <> Left = 376 Top = 104 end object ds_Facturas_Comision: TDADataSource DataSet = tbl_Facturas_Comision.Dataset DataTable = tbl_Facturas_Comision Left = 376 Top = 48 end object tbl_Vendedores_Comision: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_COMISIONES_VENDEDORES_ID' DisplayLabel = 'Id' DictionaryEntry = 'Comisiones_vendedores_ID' InPrimaryKey = True end item Name = 'ID_COMISION' DataType = datInteger DisplayLabel = 'IdComision' ServerAutoRefresh = True DictionaryEntry = 'Comisiones_vendedores_ID_COMISION' end item Name = 'ID_VENDEDOR' DataType = datInteger DisplayLabel = 'IdVendedor' DictionaryEntry = 'Comisiones_vendedores_ID_VENDEDOR' end item Name = 'NOMBRE' DataType = datString Size = 255 DisplayLabel = 'Vendedor' DictionaryEntry = 'Comisiones_vendedores_NOMBRE' end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe' Alignment = taRightJustify DictionaryEntry = 'Comisiones_vendedores_IMPORTE_TOTAL' end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Comisiones MasterSource = ds_Comisiones MasterFields = 'ID' DetailFields = 'ID_COMISION' LogicalName = 'Vendedores_Comision' IndexDefs = <> Left = 384 Top = 232 end object ds_Vendedores_Comision: TDADataSource DataSet = tbl_Vendedores_Comision.Dataset DataTable = tbl_Vendedores_Comision Left = 384 Top = 176 end end