AlonsoYSal_FactuGES2/Source/Modulos/Recibos de cliente/Servidor/srvRecibosCliente_Impl.dfm

object srvRecibosCliente: TsrvRecibosCliente
  OldCreateOrder = True
  OnCreate = DARemoteServiceCreate
  ConnectionName = 'IBX'
  ServiceSchema = schRecibosCliente
  ServiceDataStreamer = Bin2DataStreamer
  ExportedDataTables = <>
  BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
  BeforeExecuteCommand = DataAbstractServiceBeforeExecuteCommand
  Height = 233
  Width = 285
  object schRecibosCliente: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DADataDictionary
    Datasets = <
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            Name = 'IBX'
            SQL = 
              'select ANO from'#10'(select distinct(substr(FECHA_EMISION, 1,4)) as ' +
              'ANO'#10'from recibos_cliente'#10'order by 1 desc)'#10#10'UNION ALL'#10#10'select dis' +
              'tinct '#39'Todos'#39' as ANO'#10'from empresas'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ANO'
                TableField = 'ANO'
              end>
          end>
        Name = 'ListaAnosRecibos'
        Fields = <
          item
            Name = 'ANO'
            DataType = datString
            Size = 255
          end>
        ReadOnly = True
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_RECIBOS_CLIENTE'
            SQL = 
              'select v_recibos_cliente.ID, v_recibos_cliente.ID_RECIBO_COMPENS' +
              'ADO, v_recibos_cliente.REFERENCIA_REC_COMPENSADO,'#10'    v_recibos_' +
              'cliente.REFERENCIA, v_recibos_cliente.SITUACION, v_recibos_clien' +
              'te.ID_FACTURA, v_recibos_cliente.FECHA_FACTURA, v_recibos_client' +
              'e.FORMA_PAGO_FACTURA,'#10'    v_recibos_cliente.IMPORTE_FACTURA, v_r' +
              'ecibos_cliente.ID_REMESA, v_recibos_cliente.REFERENCIA_REMESA, v' +
              '_recibos_cliente.FECHA_EMISION,'#10'    v_recibos_cliente.FECHA_VENC' +
              'IMIENTO, v_recibos_cliente.DESCRIPCION, v_recibos_cliente.OBSERV' +
              'ACIONES, v_recibos_cliente.IMPORTE,'#10'    v_recibos_cliente.OTROS_' +
              'GASTOS, v_recibos_cliente.IMPORTE_TOTAL, v_recibos_cliente.ID_EM' +
              'PRESA, v_recibos_cliente.ID_CLIENTE,'#10'    v_recibos_cliente.NOMBR' +
              'E_CLIENTE, v_recibos_cliente.ENTIDAD_CLIENTE, v_recibos_cliente.' +
              'SUCURSAL_CLIENTE,'#10'    v_recibos_cliente.DC_CLIENTE, v_recibos_cl' +
              'iente.CUENTA_CLIENTE, v_recibos_cliente.NIF_CIF, v_recibos_clien' +
              'te.NOMBRE, v_recibos_cliente.CALLE,'#10'    v_recibos_cliente.POBLAC' +
              'ION, v_recibos_cliente.CODIGO_POSTAL, v_recibos_cliente.PROVINCI' +
              'A, v_recibos_cliente.FECHA_ALTA, v_recibos_cliente.FECHA_MODIFIC' +
              'ACION, v_recibos_cliente.USUARIO,'#10'    v_recibos_cliente.ID_TIEND' +
              'A, v_recibos_cliente.TIENDA, v_recibos_cliente.LISTA_NOMBRES,'#10'  ' +
              '  cont_subcuentas.descripcion as CUENTA_CONTABLE, v_recibos_clie' +
              'nte.ID_CONTRATO, v_recibos_cliente.ID_CON_FACTURA, v_recibos_cli' +
              'ente.REFERENCIA_CONTRATO,'#10'    v_recibos_cliente.FECHA_PAGO, v_re' +
              'cibos_cliente.SUBCUENTA'#10'from v_recibos_cliente'#10'    left outer jo' +
              'in pagos_cliente pag on'#10'        (pag.id_recibo = v_recibos_clien' +
              'te.id)'#10'    left outer join pagos_cliente pag2 on'#10'        ((pag2.' +
              'id_recibo = pag.id_recibo) and (pag2.id > pag.id))'#10'    left oute' +
              'r join cont_subcuentas on'#10'        (cont_subcuentas.id = pag.cuen' +
              'ta)'#10'where (pag2.id is null) and {Where}'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_RECIBO_COMPENSADO'
                TableField = 'ID_RECIBO_COMPENSADO'
              end
              item
                DatasetField = 'REFERENCIA_REC_COMPENSADO'
                TableField = 'REFERENCIA_REC_COMPENSADO'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'SITUACION'
                TableField = 'SITUACION'
              end
              item
                DatasetField = 'ID_FACTURA'
                TableField = 'ID_FACTURA'
              end
              item
                DatasetField = 'ID_REMESA'
                TableField = 'ID_REMESA'
              end
              item
                DatasetField = 'REFERENCIA_REMESA'
                TableField = 'REFERENCIA_REMESA'
              end
              item
                DatasetField = 'FECHA_EMISION'
                TableField = 'FECHA_EMISION'
              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 = 'OTROS_GASTOS'
                TableField = 'OTROS_GASTOS'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              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 = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'ID_CLIENTE'
                TableField = 'ID_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE_CLIENTE'
                TableField = 'NOMBRE_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_TIENDA'
                TableField = 'ID_TIENDA'
              end
              item
                DatasetField = 'TIENDA'
                TableField = 'TIENDA'
              end
              item
                DatasetField = 'NIF_CIF'
                TableField = 'NIF_CIF'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end
              item
                DatasetField = 'CALLE'
                TableField = 'CALLE'
              end
              item
                DatasetField = 'POBLACION'
                TableField = 'POBLACION'
              end
              item
                DatasetField = 'CODIGO_POSTAL'
                TableField = 'CODIGO_POSTAL'
              end
              item
                DatasetField = 'PROVINCIA'
                TableField = 'PROVINCIA'
              end
              item
                DatasetField = 'CUENTA_CONTABLE'
                TableField = '<unknown>'
                SQLOrigin = 'CUENTA_CONTABLE'
              end
              item
                DatasetField = 'LISTA_NOMBRES'
                TableField = 'LISTA_NOMBRES'
              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_CON_FACTURA'
                TableField = 'ID_CON_FACTURA'
              end
              item
                DatasetField = 'REFERENCIA_CONTRATO'
                TableField = 'REFERENCIA_CONTRATO'
              end
              item
                DatasetField = 'ID_CONTRATO'
                TableField = 'ID_CONTRATO'
              end
              item
                DatasetField = 'FECHA_PAGO'
                TableField = 'FECHA_PAGO'
              end
              item
                DatasetField = 'SUBCUENTA'
                TableField = 'SUBCUENTA'
              end>
          end>
        Name = 'RecibosCliente'
        Fields = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_RECIBOS_CLIENTE_ID'
            ServerAutoRefresh = True
            DictionaryEntry = 'RecibosCliente_ID'
            InPrimaryKey = True
          end
          item
            Name = 'ID_RECIBO_COMPENSADO'
            DataType = datInteger
            DictionaryEntry = 'RecibosCliente_ID_RECIBO_COMPENSADO'
          end
          item
            Name = 'REFERENCIA_REC_COMPENSADO'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_REFERENCIA_REC_COMPENSADO'
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            ServerAutoRefresh = True
            DictionaryEntry = 'RecibosCliente_REFERENCIA'
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 9
            DictionaryEntry = 'RecibosCliente_SITUACION'
          end
          item
            Name = 'ID_FACTURA'
            DataType = datInteger
            DictionaryEntry = 'RecibosCliente_ID_FACTURA'
          end
          item
            Name = 'FECHA_FACTURA'
            DataType = datDateTime
            DictionaryEntry = 'RecibosCliente_FECHA_FACTURA'
          end
          item
            Name = 'FORMA_PAGO_FACTURA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_FORMA_PAGO_FACTURA'
          end
          item
            Name = 'IMPORTE_FACTURA'
            DataType = datCurrency
            DictionaryEntry = 'RecibosCliente_IMPORTE_FACTURA'
          end
          item
            Name = 'ID_REMESA'
            DataType = datInteger
            DictionaryEntry = 'RecibosCliente_ID_REMESA'
          end
          item
            Name = 'REFERENCIA_REMESA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_REFERENCIA_REMESA'
          end
          item
            Name = 'FECHA_EMISION'
            DataType = datDateTime
            DictionaryEntry = 'RecibosCliente_FECHA_EMISION'
          end
          item
            Name = 'FECHA_VENCIMIENTO'
            DataType = datDateTime
            DictionaryEntry = 'RecibosCliente_FECHA_VENCIMIENTO'
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_DESCRIPCION'
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_OBSERVACIONES'
          end
          item
            Name = 'IMPORTE'
            DataType = datCurrency
            DictionaryEntry = 'RecibosCliente_IMPORTE'
          end
          item
            Name = 'OTROS_GASTOS'
            DataType = datCurrency
            DictionaryEntry = 'RecibosCliente_OTROS_GASTOS'
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            ServerAutoRefresh = True
            DictionaryEntry = 'RecibosCliente_IMPORTE_TOTAL'
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            DictionaryEntry = 'RecibosCliente_ID_EMPRESA'
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
            DictionaryEntry = 'RecibosCliente_ID_CLIENTE'
          end
          item
            Name = 'NOMBRE_CLIENTE'
            DataType = datString
            Size = 255
            ServerAutoRefresh = True
            DictionaryEntry = 'RecibosCliente_NOMBRE_CLIENTE'
          end
          item
            Name = 'ENTIDAD_CLIENTE'
            DataType = datString
            Size = 15
            DictionaryEntry = 'RecibosCliente_ENTIDAD_CLIENTE'
          end
          item
            Name = 'SUCURSAL_CLIENTE'
            DataType = datString
            Size = 15
            DictionaryEntry = 'RecibosCliente_SUCURSAL_CLIENTE'
          end
          item
            Name = 'DC_CLIENTE'
            DataType = datString
            Size = 15
            DictionaryEntry = 'RecibosCliente_DC_CLIENTE'
          end
          item
            Name = 'CUENTA_CLIENTE'
            DataType = datString
            Size = 15
            DictionaryEntry = 'RecibosCliente_CUENTA_CLIENTE'
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            DictionaryEntry = 'RecibosCliente_NIF_CIF'
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_NOMBRE'
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_CALLE'
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_POBLACION'
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            DictionaryEntry = 'RecibosCliente_CODIGO_POSTAL'
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_PROVINCIA'
          end
          item
            Name = 'FECHA_ALTA'
            DataType = datDateTime
            DictionaryEntry = 'RecibosCliente_FECHA_ALTA'
          end
          item
            Name = 'FECHA_MODIFICACION'
            DataType = datDateTime
            DictionaryEntry = 'RecibosCliente_FECHA_MODIFICACION'
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 20
            DictionaryEntry = 'RecibosCliente_USUARIO'
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
            DictionaryEntry = 'RecibosCliente_ID_TIENDA'
          end
          item
            Name = 'TIENDA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_TIENDA'
          end
          item
            Name = 'LISTA_NOMBRES'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_LISTA_NOMBRES'
          end
          item
            Name = 'CUENTA_CONTABLE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'RecibosCliente_CUENTA_CONTABLE'
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
          end
          item
            Name = 'ID_CON_FACTURA'
            DataType = datInteger
          end
          item
            Name = 'REFERENCIA_CONTRATO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FECHA_PAGO'
            DataType = datDateTime
          end
          item
            Name = 'SUBCUENTA'
            DataType = datString
            Size = 255
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'V_PAGOS_CLIENTE'
            StatementType = stAutoSQL
            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
              item
                DatasetField = 'IGNORAR_CONTABILIDAD'
                TableField = 'IGNORAR_CONTABILIDAD'
              end
              item
                DatasetField = 'ID_SUBCUENTA'
                TableField = 'ID_SUBCUENTA'
              end
              item
                DatasetField = 'SUBCUENTA'
                TableField = 'SUBCUENTA'
              end
              item
                DatasetField = 'ID_EJERCICIO'
                TableField = 'ID_EJERCICIO'
              end
              item
                DatasetField = 'ESTADO_EJERCICIO'
                TableField = 'ESTADO_EJERCICIO'
              end
              item
                DatasetField = 'ASIENTO_PUNTEADO'
                TableField = 'ASIENTO_PUNTEADO'
              end>
          end>
        Name = 'PagosCliente'
        Fields = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_PAGOS_CLIENTE_ID'
            ServerAutoRefresh = True
            DictionaryEntry = 'PagosCliente_ID'
            InPrimaryKey = True
          end
          item
            Name = 'ID_RECIBO'
            DataType = datInteger
            DictionaryEntry = 'PagosCliente_ID_RECIBO'
          end
          item
            Name = 'TIPO'
            DataType = datString
            Size = 255
            DictionaryEntry = 'PagosCliente_TIPO'
          end
          item
            Name = 'FECHA_PAGO'
            DataType = datDateTime
            DictionaryEntry = 'PagosCliente_FECHA_PAGO'
          end
          item
            Name = 'TITULAR'
            DataType = datString
            Size = 255
            DictionaryEntry = 'PagosCliente_TITULAR'
          end
          item
            Name = 'ENTIDAD'
            DataType = datString
            Size = 15
            DictionaryEntry = 'PagosCliente_ENTIDAD'
          end
          item
            Name = 'SUCURSAL'
            DataType = datString
            Size = 15
            DictionaryEntry = 'PagosCliente_SUCURSAL'
          end
          item
            Name = 'DC'
            DataType = datString
            Size = 15
            DictionaryEntry = 'PagosCliente_DC'
          end
          item
            Name = 'CUENTA'
            DataType = datString
            Size = 15
            DictionaryEntry = 'PagosCliente_CUENTA'
          end
          item
            Name = 'FECHA_ALTA'
            DataType = datDateTime
            DictionaryEntry = 'PagosCliente_FECHA_ALTA'
          end
          item
            Name = 'FECHA_MODIFICACION'
            DataType = datDateTime
            DictionaryEntry = 'PagosCliente_FECHA_MODIFICACION'
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 20
            DictionaryEntry = 'PagosCliente_USUARIO'
          end
          item
            Name = 'IGNORAR_CONTABILIDAD'
            DataType = datSmallInt
          end
          item
            Name = 'ID_SUBCUENTA'
            DataType = datInteger
          end
          item
            Name = 'SUBCUENTA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ID_EJERCICIO'
            DataType = datInteger
          end
          item
            Name = 'ESTADO_EJERCICIO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ASIENTO_PUNTEADO'
            DataType = datSmallInt
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_RECIBOS_CLIENTE'
            StatementType = stAutoSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_RECIBO_COMPENSADO'
                TableField = 'ID_RECIBO_COMPENSADO'
              end
              item
                DatasetField = 'REFERENCIA_REC_COMPENSADO'
                TableField = 'REFERENCIA_REC_COMPENSADO'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'SITUACION'
                TableField = 'SITUACION'
              end
              item
                DatasetField = 'ID_FACTURA'
                TableField = 'ID_FACTURA'
              end
              item
                DatasetField = 'ID_REMESA'
                TableField = 'ID_REMESA'
              end
              item
                DatasetField = 'REFERENCIA_REMESA'
                TableField = 'REFERENCIA_REMESA'
              end
              item
                DatasetField = 'FECHA_EMISION'
                TableField = 'FECHA_EMISION'
              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 = 'OTROS_GASTOS'
                TableField = 'OTROS_GASTOS'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              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 = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'ID_CLIENTE'
                TableField = 'ID_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE_CLIENTE'
                TableField = 'NOMBRE_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 = 'FECHA_ALTA'
                TableField = 'FECHA_ALTA'
              end
              item
                DatasetField = 'FECHA_MODIFICACION'
                TableField = 'FECHA_MODIFICACION'
              end
              item
                DatasetField = 'USUARIO'
                TableField = 'USUARIO'
              end
              item
                DatasetField = 'ID_TIENDA'
                TableField = 'ID_TIENDA'
              end
              item
                DatasetField = 'TIENDA'
                TableField = 'TIENDA'
              end
              item
                DatasetField = 'NIF_CIF'
                TableField = 'NIF_CIF'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end
              item
                DatasetField = 'CALLE'
                TableField = 'CALLE'
              end
              item
                DatasetField = 'POBLACION'
                TableField = 'POBLACION'
              end
              item
                DatasetField = 'CODIGO_POSTAL'
                TableField = 'CODIGO_POSTAL'
              end
              item
                DatasetField = 'PROVINCIA'
                TableField = 'PROVINCIA'
              end
              item
                DatasetField = 'LISTA_NOMBRES'
                TableField = 'LISTA_NOMBRES'
              end
              item
                DatasetField = 'ID_CONTRATO'
                TableField = 'ID_CONTRATO'
              end>
          end>
        Name = 'RecibosCompensadosCli'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            InPrimaryKey = True
          end
          item
            Name = 'ID_RECIBO_COMPENSADO'
            DataType = datInteger
          end
          item
            Name = 'REFERENCIA_REC_COMPENSADO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 9
          end
          item
            Name = 'ID_FACTURA'
            DataType = datInteger
          end
          item
            Name = 'FECHA_FACTURA'
            DataType = datDateTime
          end
          item
            Name = 'FORMA_PAGO_FACTURA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'IMPORTE_FACTURA'
            DataType = datCurrency
          end
          item
            Name = 'ID_REMESA'
            DataType = datInteger
          end
          item
            Name = 'REFERENCIA_REMESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FECHA_EMISION'
            DataType = datDateTime
          end
          item
            Name = 'FECHA_VENCIMIENTO'
            DataType = datDateTime
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datString
            Size = 255
          end
          item
            Name = 'IMPORTE'
            DataType = datCurrency
          end
          item
            Name = 'OTROS_GASTOS'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            ServerAutoRefresh = True
            DictionaryEntry = 'RecibosCliente_IMPORTE_TOTAL'
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
          end
          item
            Name = 'NOMBRE_CLIENTE'
            DataType = datString
            Size = 255
            ServerAutoRefresh = True
            DictionaryEntry = 'RecibosCliente_NOMBRE_CLIENTE'
          end
          item
            Name = 'ENTIDAD_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'SUCURSAL_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'DC_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'CUENTA_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FECHA_ALTA'
            DataType = datDateTime
          end
          item
            Name = 'FECHA_MODIFICACION'
            DataType = datDateTime
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 30
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
          end
          item
            Name = 'TIENDA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'LISTA_NOMBRES'
            DataType = datString
            Size = 1
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
          end>
      end>
    JoinDataTables = <>
    UnionDataTables = <>
    Commands = <
      item
        Params = <
          item
            Name = 'IdPago'
            DataType = datInteger
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'Tipo'
            DataType = datString
            Size = 1
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            Name = 'IBX'
            SQL = 'PROC_DELETE_ASIENTO_PAGO'
            StatementType = stStoredProcedure
            ColumnMappings = <>
          end>
        Name = 'Delete_AsientoPago'
      end
      item
        Params = <
          item
            Name = 'IdPago'
            DataType = datInteger
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'IdSubCuentaPago'
            DataType = datInteger
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            Name = 'IBX'
            SQL = 'PROC_NEW_ASIENTO_PAGO_CLI'
            StatementType = stStoredProcedure
            ColumnMappings = <>
          end>
        Name = 'Insert_AsientoPago'
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_RECIBOS_CLIENTE_ID'
            Value = ''
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_FACTURA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'FECHA_EMISION'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'FECHA_VENCIMIENTO'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'IMPORTE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'OTROS_GASTOS'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 30
            Value = ''
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            Value = ''
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            Value = ''
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'RECIBOS_CLIENTE'
            SQL = 
              'INSERT'#10'  INTO RECIBOS_CLIENTE'#10'    (ID, ID_EMPRESA, ID_CLIENTE, I' +
              'D_FACTURA, REFERENCIA, FECHA_EMISION, FECHA_VENCIMIENTO, DESCRIP' +
              'CION, OBSERVACIONES,'#10'    IMPORTE, OTROS_GASTOS, USUARIO, ID_TIEN' +
              'DA, NOMBRE, NIF_CIF, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL,' +
              #10'    FECHA_ALTA, ID_CONTRATO)'#10'  VALUES'#10'    (:ID, :ID_EMPRESA, :I' +
              'D_CLIENTE, :ID_FACTURA, :REFERENCIA, :FECHA_EMISION, :FECHA_VENC' +
              'IMIENTO, :DESCRIPCION, :OBSERVACIONES,'#10'    :IMPORTE, :OTROS_GAST' +
              'OS, :USUARIO, :ID_TIENDA, :NOMBRE, :NIF_CIF, :CALLE, :POBLACION,' +
              ' :PROVINCIA, :CODIGO_POSTAL,'#10'    current_timestamp, :ID_CONTRATO' +
              ')'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_RecibosCliente'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            DataType = datInteger
            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
            Value = ''
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'FECHA_EMISION'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'FECHA_VENCIMIENTO'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'IMPORTE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'OTROS_GASTOS'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 30
            Value = ''
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            Value = ''
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            Value = ''
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_FACTURA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'RECIBOS_CLIENTE'
            SQL = 
              'UPDATE RECIBOS_CLIENTE'#10'  SET '#10'    ID_REMESA = :ID_REMESA,'#10'    ID' +
              '_EMPRESA = :ID_EMPRESA,'#10'    ID_CLIENTE = :ID_CLIENTE,'#10'    FECHA_' +
              'EMISION = :FECHA_EMISION,'#10'    FECHA_VENCIMIENTO = :FECHA_VENCIMI' +
              'ENTO,'#10'    DESCRIPCION = :DESCRIPCION,'#10'    OBSERVACIONES = :OBSER' +
              'VACIONES,'#10'    IMPORTE = :IMPORTE,'#10'    OTROS_GASTOS = :OTROS_GAST' +
              'OS,'#10'    USUARIO = :USUARIO,'#10'    ID_TIENDA = :ID_TIENDA,'#10'    NOMB' +
              'RE = :NOMBRE,'#10'    NIF_CIF = :NIF_CIF,'#10'    CALLE = :CALLE,'#10'    PO' +
              'BLACION = :POBLACION,'#10'    PROVINCIA = :PROVINCIA,'#10'    CODIGO_POS' +
              'TAL = :CODIGO_POSTAL,'#10'    FECHA_MODIFICACION = CURRENT_TIMESTAMP' +
              ','#10'    ID_CONTRATO = :ID_CONTRATO,'#10'    ID_FACTURA = :ID_FACTURA,'#10 +
              '    REFERENCIA = :REFERENCIA'#10'  WHERE'#10'    (ID = :OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_RecibosCliente'
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_PAGOS_CLIENTE_ID'
            Value = ''
          end
          item
            Name = 'ID_RECIBO'
            Value = ''
          end
          item
            Name = 'TIPO'
            Value = ''
          end
          item
            Name = 'FECHA_PAGO'
            Value = ''
          end
          item
            Name = 'TITULAR'
            Value = ''
          end
          item
            Name = 'ENTIDAD'
            Value = ''
          end
          item
            Name = 'SUCURSAL'
            Value = ''
          end
          item
            Name = 'DC'
            Value = ''
          end
          item
            Name = 'CUENTA'
            Value = ''
          end
          item
            Name = 'USUARIO'
            Value = ''
          end
          item
            Name = 'IGNORAR_CONTABILIDAD'
            Value = ''
          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, IGNORAR' +
              '_CONTABILIDAD,'#10'     FECHA_ALTA)'#10'  VALUES'#10'    (:ID, :ID_RECIBO, :' +
              'TIPO, :FECHA_PAGO, :TITULAR, :ENTIDAD, '#10'     :SUCURSAL, :DC, :CU' +
              'ENTA, :USUARIO, :IGNORAR_CONTABILIDAD,'#10'     CURRENT_TIMESTAMP)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_PagosCliente'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            DataType = datInteger
            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'
            Value = ''
          end
          item
            Name = 'ID_RECIBO'
            Value = ''
          end
          item
            Name = 'TIPO'
            Value = ''
          end
          item
            Name = 'FECHA_PAGO'
            Value = ''
          end
          item
            Name = 'TITULAR'
            Value = ''
          end
          item
            Name = 'ENTIDAD'
            Value = ''
          end
          item
            Name = 'SUCURSAL'
            Value = ''
          end
          item
            Name = 'DC'
            Value = ''
          end
          item
            Name = 'CUENTA'
            Value = ''
          end
          item
            Name = 'IGNORAR_CONTABILIDAD'
            Value = ''
          end
          item
            Name = 'OLD_ID'
            Value = ''
          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'    IGNORAR_CONTABIL' +
              'IDAD = :IGNORAR_CONTABILIDAD,'#10'    FECHA_MODIFICACION = CURRENT_T' +
              'IMESTAMP'#10'  WHERE'#10'    (ID = :OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_PagosCliente'
      end
      item
        Params = <
          item
            Name = 'ID_RECIBO_COMPENSADO'
            Value = ''
          end
          item
            Name = 'ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'RECIBOS_CLIENTE'
            SQL = 
              'UPDATE RECIBOS_CLIENTE SET'#10'       ID_RECIBO_COMPENSADO = :ID_REC' +
              'IBO_COMPENSADO,'#10'       FECHA_MODIFICACION = CURRENT_TIMESTAMP'#10'WH' +
              'ERE (ID = :ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_RecibosCompensadosCli'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'RECIBOS_CLIENTE'
            SQL = 
              'UPDATE RECIBOS_CLIENTE SET'#10'       ID_RECIBO_COMPENSADO = NULL,'#10' ' +
              '      FECHA_MODIFICACION = CURRENT_TIMESTAMP'#10'WHERE (ID = :OLD_ID' +
              ')'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_RecibosCompensadosCli'
      end
      item
        Params = <
          item
            Name = 'ID_RECIBO_COMPENSADO'
            Value = ''
          end
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'RECIBOS_CLIENTE'
            SQL = 
              'UPDATE RECIBOS_CLIENTE SET'#10'       ID_RECIBO_COMPENSADO = :ID_REC' +
              'IBO_COMPENSADO,'#10'       FECHA_MODIFICACION = CURRENT_TIMESTAMP'#10'WH' +
              'ERE (ID = :OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_RecibosCompensadosCli'
      end>
    RelationShips = <
      item
        Name = 'FK_RecibosCompensados'
        MasterFields = 'ID'
        DetailDatasetName = 'RecibosCompensadosCli'
        DetailFields = 'ID_RECIBO_COMPENSADO'
        RelationshipType = rtForeignKey
      end
      item
        Name = 'FK_PagosCliente'
        MasterDatasetName = 'RecibosCliente'
        MasterFields = 'ID'
        DetailDatasetName = 'PagosCliente'
        DetailFields = 'ID_RECIBO'
        RelationshipType = rtForeignKey
      end>
    UpdateRules = <
      item
        Name = 'Insert RecibosCliente'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'RecibosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update RecibosCliente'
        DoInsert = False
        DoDelete = False
        DatasetName = 'RecibosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Insert PagosCliente'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'PagosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update PagosCliente'
        DoInsert = False
        DoDelete = False
        DatasetName = 'PagosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete PagosCliente'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'PagosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete RecibosCliente'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'RecibosCliente'
        FailureBehavior = fbRaiseException
      end>
    Version = 0
    Left = 48
    Top = 24
  end
  object bpRecibosCliente: TDABusinessProcessor
    Schema = schRecibosCliente
    InsertCommandName = 'Insert_RecibosCliente'
    DeleteCommandName = 'Delete_RecibosCliente'
    UpdateCommandName = 'Update_RecibosCliente'
    ReferencedDataset = 'RecibosCliente'
    ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 192
    Top = 24
  end
  object DADataDictionary: TDADataDictionary
    Fields = <
      item
        Name = 'RecibosCliente_ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_RECIBOS_CLIENTE_ID'
        Required = True
        DisplayLabel = 'ID'
        ServerAutoRefresh = True
      end
      item
        Name = 'RecibosCliente_REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'REFERENCIA'
        ServerAutoRefresh = True
      end
      item
        Name = 'RecibosCliente_SITUACION'
        DataType = datString
        Size = 9
        DisplayLabel = 'SITUACION'
      end
      item
        Name = 'RecibosCliente_ID_FACTURA'
        DataType = datInteger
        DisplayLabel = 'ID_FACTURA'
      end
      item
        Name = 'RecibosCliente_FECHA_VENCIMIENTO'
        DataType = datDateTime
        DisplayLabel = 'FECHA_VENCIMIENTO'
      end
      item
        Name = 'RecibosCliente_DESCRIPCION'
        DataType = datString
        Size = 255
        DisplayLabel = 'DESCRIPCION'
      end
      item
        Name = 'RecibosCliente_OBSERVACIONES'
        DataType = datString
        Size = 255
        DisplayLabel = 'OBSERVACIONES'
      end
      item
        Name = 'RecibosCliente_IMPORTE'
        DataType = datCurrency
        DisplayLabel = 'IMPORTE'
        Alignment = taRightJustify
      end
      item
        Name = 'RecibosCliente_FECHA_FACTURA'
        DataType = datDateTime
        DisplayLabel = 'FECHA_FACTURA'
      end
      item
        Name = 'RecibosCliente_FORMA_PAGO_FACTURA'
        DataType = datString
        Size = 255
        DisplayLabel = 'FORMA_PAGO_FACTURA'
      end
      item
        Name = 'RecibosCliente_IMPORTE_FACTURA'
        DataType = datCurrency
        DisplayLabel = 'IMPORTE_FACTURA'
        Alignment = taRightJustify
      end
      item
        Name = 'RecibosCliente_NOMBRE_CLIENTE'
        DataType = datString
        Size = 255
        DisplayLabel = 'NOMBRE_CLIENTE'
        ServerAutoRefresh = True
      end
      item
        Name = 'RecibosCliente_NIF_CIF_CLIENTE'
        DataType = datString
        Size = 15
        DisplayLabel = 'NIF_CIF_CLIENTE'
      end
      item
        Name = 'RecibosCliente_ENTIDAD_CLIENTE'
        DataType = datString
        Size = 15
        DisplayLabel = 'ENTIDAD_CLIENTE'
      end
      item
        Name = 'RecibosCliente_SUCURSAL_CLIENTE'
        DataType = datString
        Size = 15
        DisplayLabel = 'SUCURSAL_CLIENTE'
      end
      item
        Name = 'RecibosCliente_DC_CLIENTE'
        DataType = datString
        Size = 15
        DisplayLabel = 'DC_CLIENTE'
      end
      item
        Name = 'RecibosCliente_CUENTA_CLIENTE'
        DataType = datString
        Size = 15
        DisplayLabel = 'CUENTA_CLIENTE'
      end
      item
        Name = 'RecibosCliente_ID_EMPRESA'
        DataType = datInteger
        DisplayLabel = 'ID_EMPRESA'
      end
      item
        Name = 'RecibosCliente_FECHA_ALTA'
        DataType = datDateTime
        DisplayLabel = 'FECHA_ALTA'
      end
      item
        Name = 'RecibosCliente_FECHA_MODIFICACION'
        DataType = datDateTime
        DisplayLabel = 'FECHA_MODIFICACION'
      end
      item
        Name = 'RecibosCliente_USUARIO'
        DataType = datString
        Size = 20
        DisplayLabel = 'USUARIO'
      end
      item
        Name = 'PagosCliente_ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_PAGOS_CLIENTE_ID'
        Required = True
        DisplayLabel = 'ID'
        ServerAutoRefresh = True
      end
      item
        Name = 'PagosCliente_ID_RECIBO'
        DataType = datInteger
      end
      item
        Name = 'PagosCliente_TIPO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PagosCliente_FECHA_PAGO'
        DataType = datDateTime
      end
      item
        Name = 'PagosCliente_TITULAR'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PagosCliente_ENTIDAD'
        DataType = datString
        Size = 15
      end
      item
        Name = 'PagosCliente_SUCURSAL'
        DataType = datString
        Size = 15
      end
      item
        Name = 'PagosCliente_DC'
        DataType = datString
        Size = 15
      end
      item
        Name = 'PagosCliente_CUENTA'
        DataType = datString
        Size = 15
      end
      item
        Name = 'PagosCliente_FECHA_ALTA'
        DataType = datDateTime
      end
      item
        Name = 'PagosCliente_FECHA_MODIFICACION'
        DataType = datDateTime
      end
      item
        Name = 'PagosCliente_USUARIO'
        DataType = datString
        Size = 20
      end
      item
        Name = 'RecibosCliente_ID_REMESA'
        DataType = datInteger
      end
      item
        Name = 'RecibosCliente_REFERENCIA_REMESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RecibosCliente_OTROS_GASTOS'
        DataType = datCurrency
        Alignment = taRightJustify
      end
      item
        Name = 'RecibosCliente_IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'IMPORTE_TOTAL'
        Alignment = taRightJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'RecibosCliente_ID_CLIENTE'
        DataType = datInteger
        DisplayLabel = 'ID_CLIENTE'
      end
      item
        Name = 'RecibosCliente_FECHA_EMISION'
        DataType = datDateTime
      end
      item
        Name = 'RecibosCliente_ID_RECIBO_COMPENSADO'
        DataType = datInteger
      end
      item
        Name = 'RecibosCliente_REFERENCIA_REC_COMPENSADO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RecibosCliente_NIF_CIF'
        DataType = datString
        Size = 15
      end
      item
        Name = 'RecibosCliente_NOMBRE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RecibosCliente_CALLE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RecibosCliente_POBLACION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RecibosCliente_CODIGO_POSTAL'
        DataType = datString
        Size = 10
      end
      item
        Name = 'RecibosCliente_PROVINCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RecibosCliente_ID_TIENDA'
        DataType = datInteger
        ServerAutoRefresh = True
      end
      item
        Name = 'RecibosCliente_TIENDA'
        DataType = datString
        Size = 255
        ServerAutoRefresh = True
      end
      item
        Name = 'RecibosCliente_LISTA_NOMBRES'
        DataType = datString
        Size = 255
        DisplayLabel = 'LISTA_NOMBRES'
      end
      item
        Name = 'RecibosCliente_CUENTA_CONTABLE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Cuenta contable'
      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
  object bpRecibosCompensados: TDABusinessProcessor
    Schema = schRecibosCliente
    InsertCommandName = 'Insert_RecibosCompensadosCli'
    DeleteCommandName = 'Delete_RecibosCompensadosCli'
    UpdateCommandName = 'Update_RecibosCompensadosCli'
    ReferencedDataset = 'RecibosCompensadosCli'
    ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 192
    Top = 152
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 88
  end
end