object srvRecibosCliente: TsrvRecibosCliente OldCreateOrder = True OnCreate = DARemoteServiceCreate RequiresSession = True SessionManager = dmServer.SessionManager AcquireConnection = True ConnectionName = 'IBX' ServiceSchema = schRecibosCliente ServiceAdapter = DABINAdapter OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData Height = 247 Width = 347 object schRecibosCliente: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DADataDictionary Datasets = < item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'V_RECIBOS_CLIENTE' SQL = 'SELECT ID,'#10' REFERENCIA,'#10' SITUACION,'#10' ID_FACTUR' + 'A,'#10' ID_REMESA,'#10' REFERENCIA_REMESA,'#10' FECHA_EMIS' + 'ION,'#10' FECHA_VENCIMIENTO,'#10' DESCRIPCION,'#10' OBSERV' + 'ACIONES,'#10' IMPORTE,'#10' OTROS_GASTOS,'#10' IMPORTE_TOT' + 'AL,'#10' FECHA_FACTURA,'#10' FORMA_PAGO_FACTURA,'#10' IMPO' + 'RTE_FACTURA,'#10' ID_CLIENTE,'#10' NOMBRE_CLIENTE,'#10' NI' + 'F_CIF_CLIENTE,'#10' ENTIDAD_CLIENTE,'#10' SUCURSAL_CLIENTE,'#10 + ' DC_CLIENTE,'#10' CUENTA_CLIENTE,'#10' ID_EMPRESA,'#10' ' + ' FECHA_ALTA,'#10' FECHA_MODIFICACION,'#10' USUARIO'#10#10'FROM ' + 'V_RECIBOS_CLIENTE' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'SITUACION' TableField = 'SITUACION' end item DatasetField = 'ID_FACTURA' TableField = 'ID_FACTURA' end item DatasetField = 'FECHA_VENCIMIENTO' TableField = 'FECHA_VENCIMIENTO' end item DatasetField = 'DESCRIPCION' TableField = 'DESCRIPCION' end item DatasetField = 'OBSERVACIONES' TableField = 'OBSERVACIONES' end item DatasetField = 'IMPORTE' TableField = 'IMPORTE' end item DatasetField = 'FECHA_FACTURA' TableField = 'FECHA_FACTURA' end item DatasetField = 'FORMA_PAGO_FACTURA' TableField = 'FORMA_PAGO_FACTURA' end item DatasetField = 'IMPORTE_FACTURA' TableField = 'IMPORTE_FACTURA' end item DatasetField = 'NOMBRE_CLIENTE' TableField = 'NOMBRE_CLIENTE' end item DatasetField = 'NIF_CIF_CLIENTE' TableField = 'NIF_CIF_CLIENTE' end item DatasetField = 'ENTIDAD_CLIENTE' TableField = 'ENTIDAD_CLIENTE' end item DatasetField = 'SUCURSAL_CLIENTE' TableField = 'SUCURSAL_CLIENTE' end item DatasetField = 'DC_CLIENTE' TableField = 'DC_CLIENTE' end item DatasetField = 'CUENTA_CLIENTE' TableField = 'CUENTA_CLIENTE' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'FECHA_ALTA' TableField = 'FECHA_ALTA' end item DatasetField = 'FECHA_MODIFICACION' TableField = 'FECHA_MODIFICACION' end item DatasetField = 'USUARIO' TableField = 'USUARIO' end item DatasetField = 'ID_REMESA' TableField = 'ID_REMESA' end item DatasetField = 'REFERENCIA_REMESA' TableField = 'REFERENCIA_REMESA' end item DatasetField = 'OTROS_GASTOS' TableField = 'OTROS_GASTOS' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'IMPORTE_TOTAL' TableField = 'IMPORTE_TOTAL' end item DatasetField = 'FECHA_EMISION' TableField = 'FECHA_EMISION' end> end> Name = 'RecibosCliente' Fields = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_ID' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SITUACION' DataType = datString Size = 9 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_SITUACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_FACTURA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_ID_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_REMESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_ID_REMESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_REMESA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_REFERENCIA_REMESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_EMISION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_FECHA_EMISION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_FECHA_VENCIMIENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_DESCRIPCION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'OBSERVACIONES' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_OBSERVACIONES' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_IMPORTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'OTROS_GASTOS' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_OTROS_GASTOS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_TOTAL' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_IMPORTE_TOTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_FACTURA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_FECHA_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FORMA_PAGO_FACTURA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_FORMA_PAGO_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_FACTURA' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_IMPORTE_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_ID_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_NOMBRE_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIF_CIF_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_NIF_CIF_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ENTIDAD_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_ENTIDAD_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SUCURSAL_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_SUCURSAL_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DC_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_DC_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CUENTA_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_CUENTA_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'V_RECIBOS_CLIENTE' SQL = 'SELECT ID,'#10' REFERENCIA,'#10' SITUACION,'#10' ID_FACTUR' + 'A,'#10' ID_REMESA,'#10' REFERENCIA_REMESA,'#10' FECHA_EMIS' + 'ION,'#10' FECHA_VENCIMIENTO,'#10' DESCRIPCION,'#10' OBSERV' + 'ACIONES,'#10' IMPORTE,'#10' OTROS_GASTOS,'#10' IMPORTE_TOT' + 'AL,'#10' FECHA_FACTURA,'#10' FORMA_PAGO_FACTURA,'#10' IMPO' + 'RTE_FACTURA,'#10' ID_CLIENTE,'#10' NOMBRE_CLIENTE,'#10' NI' + 'F_CIF_CLIENTE,'#10' ENTIDAD_CLIENTE,'#10' SUCURSAL_CLIENTE,'#10 + ' DC_CLIENTE,'#10' CUENTA_CLIENTE,'#10' ID_EMPRESA,'#10' ' + ' FECHA_ALTA,'#10' FECHA_MODIFICACION,'#10' USUARIO'#10#10'FROM ' + 'V_RECIBOS_CLIENTE'#10'WHERE'#10' ID = :ID' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'SITUACION' TableField = 'SITUACION' end item DatasetField = 'ID_FACTURA' TableField = 'ID_FACTURA' end item DatasetField = 'FECHA_VENCIMIENTO' TableField = 'FECHA_VENCIMIENTO' end item DatasetField = 'DESCRIPCION' TableField = 'DESCRIPCION' end item DatasetField = 'OBSERVACIONES' TableField = 'OBSERVACIONES' end item DatasetField = 'IMPORTE' TableField = 'IMPORTE' end item DatasetField = 'FECHA_FACTURA' TableField = 'FECHA_FACTURA' end item DatasetField = 'FORMA_PAGO_FACTURA' TableField = 'FORMA_PAGO_FACTURA' end item DatasetField = 'IMPORTE_FACTURA' TableField = 'IMPORTE_FACTURA' end item DatasetField = 'NOMBRE_CLIENTE' TableField = 'NOMBRE_CLIENTE' end item DatasetField = 'NIF_CIF_CLIENTE' TableField = 'NIF_CIF_CLIENTE' end item DatasetField = 'ENTIDAD_CLIENTE' TableField = 'ENTIDAD_CLIENTE' end item DatasetField = 'SUCURSAL_CLIENTE' TableField = 'SUCURSAL_CLIENTE' end item DatasetField = 'DC_CLIENTE' TableField = 'DC_CLIENTE' end item DatasetField = 'CUENTA_CLIENTE' TableField = 'CUENTA_CLIENTE' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'FECHA_ALTA' TableField = 'FECHA_ALTA' end item DatasetField = 'FECHA_MODIFICACION' TableField = 'FECHA_MODIFICACION' end item DatasetField = 'USUARIO' TableField = 'USUARIO' end item DatasetField = 'ID_REMESA' TableField = 'ID_REMESA' end item DatasetField = 'REFERENCIA_REMESA' TableField = 'REFERENCIA_REMESA' end item DatasetField = 'OTROS_GASTOS' TableField = 'OTROS_GASTOS' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'IMPORTE_TOTAL' TableField = 'IMPORTE_TOTAL' end item DatasetField = 'FECHA_EMISION' TableField = 'FECHA_EMISION' end> end> Name = 'RecibosCliente_Refresh' Fields = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_ID' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SITUACION' DataType = datString Size = 9 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_SITUACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_FACTURA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_ID_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_REMESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_ID_REMESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_REMESA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_REFERENCIA_REMESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_EMISION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_FECHA_VENCIMIENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_DESCRIPCION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'OBSERVACIONES' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_OBSERVACIONES' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_IMPORTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'OTROS_GASTOS' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_OTROS_GASTOS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_TOTAL' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_IMPORTE_TOTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_FACTURA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_FECHA_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FORMA_PAGO_FACTURA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_FORMA_PAGO_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_FACTURA' DataType = datCurrency BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_IMPORTE_FACTURA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_ID_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_NOMBRE_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIF_CIF_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_NIF_CIF_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ENTIDAD_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_ENTIDAD_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SUCURSAL_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_SUCURSAL_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DC_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_DC_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CUENTA_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_CUENTA_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'RecibosCliente_Refresh_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PAGOS_CLIENTE' SQL = 'SELECT '#10' ID, ID_RECIBO, TIPO, FECHA_PAGO, TITULAR, ENTIDAD, '#10 + ' SUCURSAL, DC, CUENTA, FECHA_ALTA, FECHA_MODIFICACION, '#10' U' + 'SUARIO'#10' '#10'FROM PAGOS_CLIENTE'#10'WHERE ID_RECIBO = :ID'#10'ORDER BY ID' + ' /*Muy importante no quitar*/' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_RECIBO' TableField = 'ID_RECIBO' end item DatasetField = 'TIPO' TableField = 'TIPO' end item DatasetField = 'FECHA_PAGO' TableField = 'FECHA_PAGO' end item DatasetField = 'TITULAR' TableField = 'TITULAR' end item DatasetField = 'ENTIDAD' TableField = 'ENTIDAD' end item DatasetField = 'SUCURSAL' TableField = 'SUCURSAL' end item DatasetField = 'DC' TableField = 'DC' end item DatasetField = 'CUENTA' TableField = 'CUENTA' end item DatasetField = 'FECHA_ALTA' TableField = 'FECHA_ALTA' end item DatasetField = 'FECHA_MODIFICACION' TableField = 'FECHA_MODIFICACION' end item DatasetField = 'USUARIO' TableField = 'USUARIO' end> end> Name = 'PagosCliente' Fields = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_RECIBO' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_ID_RECIBO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TIPO' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_TIPO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_PAGO' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_FECHA_PAGO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_TITULAR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_ENTIDAD' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_SUCURSAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DC' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_DC' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_CUENTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'PagosCliente_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end> Commands = < item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_FACTURA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_EMISION' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OBSERVACIONES' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'IMPORTE' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OTROS_GASTOS' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'RECIBOS_CLIENTE' SQL = 'INSERT'#10' INTO RECIBOS_CLIENTE'#10' (ID, ID_FACTURA, REFERENCIA, F' + 'ECHA_EMISION, FECHA_VENCIMIENTO, DESCRIPCION, OBSERVACIONES,'#10' ' + ' IMPORTE, OTROS_GASTOS, USUARIO)'#10' VALUES'#10' (:ID, :ID_FACTURA,' + ' :REFERENCIA, :FECHA_EMISION, :FECHA_VENCIMIENTO, :DESCRIPCION, ' + ':OBSERVACIONES,'#10' :IMPORTE, :OTROS_GASTOS, :USUARIO)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_RecibosCliente' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'RECIBOS_CLIENTE' SQL = 'DELETE '#10' FROM'#10' RECIBOS_CLIENTE'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_RecibosCliente' end item Params = < item Name = 'ID_REMESA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_EMISION' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OBSERVACIONES' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'IMPORTE' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OTROS_GASTOS' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'RECIBOS_CLIENTE' SQL = 'UPDATE Recibos_CLIENTE'#10' SET '#10' ID_REMESA = :ID_REMESA,'#10' FE' + 'CHA_EMISION = :FECHA_EMISION,'#10' FECHA_VENCIMIENTO = :FECHA_VEN' + 'CIMIENTO,'#10' DESCRIPCION = :DESCRIPCION,'#10' OBSERVACIONES = :O' + 'BSERVACIONES,'#10' IMPORTE = :IMPORTE,'#10' OTROS_GASTOS = :OTROS_' + 'GASTOS,'#10' USUARIO = :USUARIO'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_RecibosCliente' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_RECIBO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TIPO' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_PAGO' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DC' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PAGOS_CLIENTE' SQL = 'INSERT'#10' INTO PAGOS_CLIENTE'#10' (ID, ID_RECIBO, TIPO, FECHA_PAGO' + ', TITULAR, ENTIDAD, '#10' SUCURSAL, DC, CUENTA, USUARIO)'#10' VALUE' + 'S'#10' (:ID, :ID_RECIBO, :TIPO, :FECHA_PAGO, :TITULAR, :ENTIDAD, ' + #10' :SUCURSAL, :DC, :CUENTA, :USUARIO)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_PagosCliente' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PAGOS_CLIENTE' SQL = 'DELETE '#10' FROM'#10' PAGOS_CLIENTE'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_PagosCliente' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_RECIBO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TIPO' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_PAGO' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DC' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PAGOS_CLIENTE' SQL = 'UPDATE PAGOS_CLIENTE'#10' SET '#10' ID = :ID, '#10' ID_RECIBO = :ID_R' + 'ECIBO, '#10' TIPO = :TIPO, '#10' FECHA_PAGO = :FECHA_PAGO, '#10' TI' + 'TULAR = :TITULAR, '#10' ENTIDAD = :ENTIDAD, '#10' SUCURSAL = :SUCU' + 'RSAL, '#10' DC = :DC, '#10' CUENTA = :CUENTA'#10' WHERE'#10' (ID = :OL' + 'D_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_PagosCliente' end> RelationShips = <> UpdateRules = < item Name = 'Insert RecibosCliente' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'RecibosCliente' FailureBehaviour = fbRaiseException end item Name = 'Insert PagosCliente' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'PagosCliente' FailureBehaviour = fbRaiseException end item Name = 'Update RecibosCliente' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'RecibosCliente' FailureBehaviour = fbRaiseException end item Name = 'Update PagosCliente' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'PagosCliente' FailureBehaviour = fbRaiseException end item Name = 'Delete PagosCliente' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'PagosCliente' FailureBehaviour = fbRaiseException end item Name = 'Delete RecibosCliente' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'RecibosCliente' FailureBehaviour = fbRaiseException end> Left = 48 Top = 24 end object DABINAdapter: TDABINAdapter Left = 48 Top = 80 end object bpRecibosCliente: TDABusinessProcessor Schema = schRecibosCliente InsertCommandName = 'Insert_RecibosCliente' DeleteCommandName = 'Delete_RecibosCliente' UpdateCommandName = 'Update_RecibosCliente' RefreshDatasetName = 'RecibosCliente_Refresh' ReferencedDataset = 'RecibosCliente' ProcessorOptions = [poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 192 Top = 24 end object DADataDictionary: TDADataDictionary Fields = < item Name = 'RecibosCliente_ID' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'RecibosCliente_REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'REFERENCIA' Alignment = taLeftJustify end item Name = 'RecibosCliente_SITUACION' DataType = datString Size = 9 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'SITUACION' Alignment = taLeftJustify end item Name = 'RecibosCliente_ID_FACTURA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_FACTURA' Alignment = taLeftJustify end item Name = 'RecibosCliente_FECHA_VENCIMIENTO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_VENCIMIENTO' Alignment = taLeftJustify end item Name = 'RecibosCliente_DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'DESCRIPCION' Alignment = taLeftJustify end item Name = 'RecibosCliente_OBSERVACIONES' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'OBSERVACIONES' Alignment = taLeftJustify end item Name = 'RecibosCliente_IMPORTE' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IMPORTE' Alignment = taRightJustify end item Name = 'RecibosCliente_FECHA_FACTURA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_FACTURA' Alignment = taLeftJustify end item Name = 'RecibosCliente_FORMA_PAGO_FACTURA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FORMA_PAGO_FACTURA' Alignment = taLeftJustify end item Name = 'RecibosCliente_IMPORTE_FACTURA' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IMPORTE_FACTURA' Alignment = taRightJustify end item Name = 'RecibosCliente_NOMBRE_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'NOMBRE_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_NIF_CIF_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'NIF_CIF_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_ENTIDAD_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ENTIDAD_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_SUCURSAL_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'SUCURSAL_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_DC_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'DC_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_CUENTA_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'CUENTA_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_EMPRESA' Alignment = taLeftJustify end item Name = 'RecibosCliente_FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_ALTA' Alignment = taLeftJustify end item Name = 'RecibosCliente_FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_MODIFICACION' Alignment = taLeftJustify end item Name = 'RecibosCliente_USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'USUARIO' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_ID' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'REFERENCIA' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_SITUACION' DataType = datString Size = 9 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'SITUACION' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_ID_FACTURA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_FACTURA' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_FECHA_VENCIMIENTO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_VENCIMIENTO' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'DESCRIPCION' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_OBSERVACIONES' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'OBSERVACIONES' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_IMPORTE' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IMPORTE' Alignment = taRightJustify end item Name = 'RecibosCliente_Refresh_FECHA_FACTURA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_FACTURA' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_FORMA_PAGO_FACTURA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FORMA_PAGO_FACTURA' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_IMPORTE_FACTURA' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IMPORTE_FACTURA' Alignment = taRightJustify end item Name = 'RecibosCliente_Refresh_NOMBRE_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'NOMBRE_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_NIF_CIF_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'NIF_CIF_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_ENTIDAD_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ENTIDAD_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_SUCURSAL_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'SUCURSAL_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_DC_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'DC_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_CUENTA_CLIENTE' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'CUENTA_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_EMPRESA' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_ALTA' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'FECHA_MODIFICACION' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'USUARIO' Alignment = taLeftJustify end item Name = 'PagosCliente_ID' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'PagosCliente_ID_RECIBO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_TIPO' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_FECHA_PAGO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_DC' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'PagosCliente_USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_ID_REMESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'RecibosCliente_ID_REMESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'RecibosCliente_REFERENCIA_REMESA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_REFERENCIA_REMESA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'RecibosCliente_OTROS_GASTOS' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 Alignment = taRightJustify end item Name = 'RecibosCliente_Refresh_OTROS_GASTOS' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 Alignment = taRightJustify end item Name = 'RecibosCliente_IMPORTE_TOTAL' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IMPORTE_TOTAL' Alignment = taRightJustify end item Name = 'RecibosCliente_ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_Refresh_IMPORTE_TOTAL' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IMPORTE_TOTAL' Alignment = taRightJustify end item Name = 'RecibosCliente_Refresh_ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_CLIENTE' Alignment = taLeftJustify end item Name = 'RecibosCliente_FECHA_EMISION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end> Left = 48 Top = 152 end object bpPagosCliente: TDABusinessProcessor Schema = schRecibosCliente InsertCommandName = 'Insert_PagosCliente' DeleteCommandName = 'Delete_PagosCliente' UpdateCommandName = 'Update_PagosCliente' ReferencedDataset = 'PagosCliente' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 192 Top = 88 end end