object RptRecibosCliente: TRptRecibosCliente
  OldCreateOrder = True
  OnCreate = DataModuleCreate
  Height = 405
  Width = 892
  object DADataCabecera: TDADataSource
    DataSet = tbl_Cabecera.Dataset
    DataTable = tbl_Cabecera
    Left = 264
    Top = 72
  end
  object tbl_Cabecera: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
      end
      item
        Name = 'ID_RECIBO_COMPENSADO'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA_REC_COMPENSADO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      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 = 'DATOS_BANCARIOS'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ENTIDAD'
        DataType = datString
        Size = 254
      end
      item
        Name = 'SUCURSAL'
        DataType = datString
        Size = 254
      end
      item
        Name = 'DC'
        DataType = datString
        Size = 254
      end
      item
        Name = 'CUENTA'
        DataType = datString
        Size = 254
      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
      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 = 'NOMBRE_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'NIF_CIF_CLIENTE'
        DataType = datString
        Size = 15
      end
      item
        Name = 'CALLE_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CODIGO_POSTAL_CLIENTE'
        DataType = datString
        Size = 10
      end
      item
        Name = 'PROVINCIA_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'POBLACION_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'NIF_CIF_EMPRESA'
        DataType = datString
        Size = 15
      end
      item
        Name = 'RAZON_SOCIAL'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CALLE_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'POBLACION_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PROVINCIA_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CODIGO_POSTAL_EMPRESA'
        DataType = datString
        Size = 10
      end
      item
        Name = 'TELEFONO_1'
        DataType = datString
        Size = 25
      end
      item
        Name = 'FAX'
        DataType = datString
        Size = 25
      end
      item
        Name = 'MOVIL_1'
        DataType = datString
        Size = 25
      end
      item
        Name = 'EMAIL_1'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PAGINA_WEB'
        DataType = datString
        Size = 255
      end
      item
        Name = 'REGISTRO_MERCANTIL'
        DataType = datString
        Size = 255
      end
      item
        Name = 'LOGOTIPO'
        DataType = datBlob
      end>
    Params = <
      item
        Name = 'ID'
        DataType = datInteger
        Value = '8'
        ParamType = daptInput
      end>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    LogicalName = 'Informe_Cabecera'
    IndexDefs = <>
    Left = 264
    Top = 128
  end
  object frxRichObject1: TfrxRichObject
    Left = 48
    Top = 296
  end
  object frxBarCodeObject1: TfrxBarCodeObject
    Left = 144
    Top = 296
  end
  object frxOLEObject1: TfrxOLEObject
    Left = 48
    Top = 344
  end
  object frxCrossObject1: TfrxCrossObject
    Left = 144
    Top = 344
  end
  object frxCheckBoxObject1: TfrxCheckBoxObject
    Left = 256
    Top = 296
  end
  object frxGradientObject1: TfrxGradientObject
    Left = 360
    Top = 296
  end
  object frxChartObject1: TfrxChartObject
    Left = 256
    Top = 344
  end
  object schReport: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DataDictionary
    Datasets = <
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            TargetTable = 'V_recibos_cliente'
            Name = 'IBX'
            SQL = 
              'select ID_EMPRESA,'#10'extract (year from fecha_vencimiento) as ANO,' +
              #10'extract (month from fecha_vencimiento) as MES,'#10'case'#10'when extrac' +
              't (month from fecha_vencimiento) = 1 then '#39'ENERO - '#39' || extract ' +
              '(year from fecha_vencimiento)'#10'when extract (month from fecha_ven' +
              'cimiento) = 2 then '#39'FEBRERO - '#39' || extract (year from fecha_venc' +
              'imiento)'#10'when extract (month from fecha_vencimiento) = 3 then '#39'M' +
              'ARZO - '#39' || extract (year from fecha_vencimiento)'#10'when extract (' +
              'month from fecha_vencimiento) = 4 then '#39'ABRIL - '#39' || extract (ye' +
              'ar from fecha_vencimiento)'#10'when extract (month from fecha_vencim' +
              'iento) = 5 then '#39'MAYO - '#39' || extract (year from fecha_vencimient' +
              'o)'#10'when extract (month from fecha_vencimiento) = 6 then '#39'JUNIO -' +
              ' '#39' || extract (year from fecha_vencimiento)'#10'when extract (month ' +
              'from fecha_vencimiento) = 7 then '#39'JULIO - '#39' || extract (year fro' +
              'm fecha_vencimiento)'#10'when extract (month from fecha_vencimiento)' +
              ' = 8 then '#39'AGOSTO - '#39' || extract (year from fecha_vencimiento)'#10'w' +
              'hen extract (month from fecha_vencimiento) = 9 then '#39'SEPTIEMBRE ' +
              '- '#39' || extract (year from fecha_vencimiento)'#10'when extract (month' +
              ' from fecha_vencimiento) = 10 then '#39'OCTUBRE - '#39' || extract (year' +
              ' from fecha_vencimiento)'#10'when extract (month from fecha_vencimie' +
              'nto) = 11 then '#39'NOVIEMBRE - '#39' || extract (year from fecha_vencim' +
              'iento)'#10'when extract (month from fecha_vencimiento) = 12 then '#39'DI' +
              'CIEMBRE - '#39' || extract (year from fecha_vencimiento)'#10'end as TITU' +
              'LO,'#10'REFERENCIA,  ID_CLIENTE, NOMBRE_CLIENTE, SITUACION, NIF_CIF_' +
              'CLIENTE, fecha_vencimiento, FECHA_EMISION,'#10'IMPORTE_TOTAL,'#10'case'#10'w' +
              'hen strlen(DATOS_BANCARIOS) = 0 then '#39'Sin cuenta bancaria'#39#10'else ' +
              'DATOS_BANCARIOS'#10'end as DATOS_BANCARIOS'#10#10'from V_recibos_cliente'#10'w' +
              'here {where}'#10'order by ANO, MES, FECHA_VENCIMIENTO, DATOS_BANCARI' +
              'OS, NOMBRE_CLIENTE'#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'MES'
                TableField = 'MES'
              end
              item
                DatasetField = 'TITULO'
                TableField = 'TITULO'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'ID_CLIENTE'
                TableField = 'ID_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE_CLIENTE'
                TableField = 'NOMBRE_CLIENTE'
              end
              item
                DatasetField = 'SITUACION'
                TableField = 'SITUACION'
              end
              item
                DatasetField = 'NIF_CIF_CLIENTE'
                TableField = 'NIF_CIF_CLIENTE'
              end
              item
                DatasetField = 'FECHA_VENCIMIENTO'
                TableField = 'FECHA_VENCIMIENTO'
              end
              item
                DatasetField = 'FECHA_EMISION'
                TableField = 'FECHA_EMISION'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'ANO'
                TableField = 'ANO'
              end
              item
                DatasetField = 'DATOS_BANCARIOS'
                TableField = 'DATOS_BANCARIOS'
              end>
          end>
        Name = 'InformeListadoRecibosPendientes'
        Fields = <
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'ANO'
            DataType = datSmallInt
          end
          item
            Name = 'MES'
            DataType = datSmallInt
          end
          item
            Name = 'TITULO'
            DataType = datString
            Size = 19
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
          end
          item
            Name = 'NOMBRE_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 9
          end
          item
            Name = 'NIF_CIF_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'FECHA_VENCIMIENTO'
            DataType = datDateTime
          end
          item
            Name = 'FECHA_EMISION'
            DataType = datDateTime
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end
          item
            Name = 'DATOS_BANCARIOS'
            DataType = datString
            Size = 255
          end>
      end
      item
        Params = <
          item
            Name = 'ID_RECIBO'
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            SQL = 
              'SELECT'#10'    V_RECIBOS_CLIENTE.REFERENCIA, V_RECIBOS_CLIENTE.DESCR' +
              'IPCION, V_RECIBOS_CLIENTE.IMPORTE_TOTAL'#10'FROM V_RECIBOS_CLIENTE'#10'W' +
              'HERE V_RECIBOS_CLIENTE.ID_RECIBO_COMPENSADO = :ID_RECIBO'
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'DESCRIPCION'
                TableField = 'DESCRIPCION'
              end>
          end>
        Name = 'Informe_Compensados'
        Fields = <
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datFloat
          end>
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datInteger
            Value = '8'
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_RECIBOS_CLIENTE'
            SQL = 
              'SELECT'#10'    V_RECIBOS_CLIENTE.ID,'#10#10'    V_RECIBOS_CLIENTE.ID_RECIB' +
              'O_COMPENSADO,'#10'    V_RECIBOS_CLIENTE.REFERENCIA_REC_COMPENSADO,'#10' ' +
              '   V_RECIBOS_CLIENTE.ID_EMPRESA,'#10'    V_RECIBOS_CLIENTE.REFERENCI' +
              'A,'#10'    V_RECIBOS_CLIENTE.SITUACION,'#10'    V_RECIBOS_CLIENTE.ID_FAC' +
              'TURA,'#10#10'    V_RECIBOS_CLIENTE.DATOS_BANCARIOS,'#10'    substr(V_RECIB' +
              'OS_CLIENTE.DATOS_BANCARIOS, 1,4) as ENTIDAD,'#10'    substr(V_RECIBO' +
              'S_CLIENTE.DATOS_BANCARIOS, 6,9) as SUCURSAL,'#10'    substr(V_RECIBO' +
              'S_CLIENTE.DATOS_BANCARIOS, 11,13) as DC,'#10'    substr(V_RECIBOS_CL' +
              'IENTE.DATOS_BANCARIOS, 14,23) as CUENTA,'#10#10'    V_RECIBOS_CLIENTE.' +
              'ID_REMESA,'#10'    V_RECIBOS_CLIENTE.REFERENCIA_REMESA,'#10'    V_RECIBO' +
              'S_CLIENTE.FECHA_EMISION,'#10'    V_RECIBOS_CLIENTE.FECHA_VENCIMIENTO' +
              ','#10'    V_RECIBOS_CLIENTE.DESCRIPCION,'#10'    V_RECIBOS_CLIENTE.OBSER' +
              'VACIONES,'#10'    V_RECIBOS_CLIENTE.IMPORTE,'#10'    V_RECIBOS_CLIENTE.O' +
              'TROS_GASTOS,'#10'    V_RECIBOS_CLIENTE.IMPORTE_TOTAL,'#10'    V_RECIBOS_' +
              'CLIENTE.FECHA_FACTURA,'#10'    V_RECIBOS_CLIENTE.FORMA_PAGO_FACTURA,' +
              #10'    V_RECIBOS_CLIENTE.IMPORTE_FACTURA,'#10'    V_RECIBOS_CLIENTE.NO' +
              'MBRE_CLIENTE,'#10'    V_RECIBOS_CLIENTE.NIF_CIF_CLIENTE,'#10'    V_RECIB' +
              'OS_CLIENTE.CALLE_CLIENTE,'#10'    V_RECIBOS_CLIENTE.CODIGO_POSTAL_CL' +
              'IENTE,'#10'    V_RECIBOS_CLIENTE.PROVINCIA_CLIENTE,'#10'    V_RECIBOS_CL' +
              'IENTE.POBLACION_CLIENTE,'#10#10'    EMPRESAS.NIF_CIF as NIF_CIF_EMPRES' +
              'A, EMPRESAS.RAZON_SOCIAL,'#10'    EMPRESAS.CALLE as CALLE_EMPRESA, E' +
              'MPRESAS.POBLACION as POBLACION_EMPRESA,'#10'    EMPRESAS.PROVINCIA a' +
              's PROVINCIA_EMPRESA, EMPRESAS.CODIGO_POSTAL as CODIGO_POSTAL_EMP' +
              'RESA,'#10'    EMPRESAS.TELEFONO_1, EMPRESAS.FAX, EMPRESAS.MOVIL_1, E' +
              'MPRESAS.EMAIL_1,'#10'    EMPRESAS.PAGINA_WEB, EMPRESAS.REGISTRO_MERC' +
              'ANTIL, EMPRESAS.LOGOTIPO'#10#10'FROM'#10'  V_RECIBOS_CLIENTE'#10'  LEFT OUTER ' +
              'JOIN EMPRESAS ON (EMPRESAS.ID = V_RECIBOS_CLIENTE.ID_EMPRESA)'#10'WH' +
              'ERE'#10'  V_RECIBOS_CLIENTE.ID = :ID'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_RECIBO_COMPENSADO'
                TableField = '<unknown>'
                SQLOrigin = 'ID_RECIBO_COMPENSADO'
              end
              item
                DatasetField = 'REFERENCIA_REC_COMPENSADO'
                TableField = '<unknown>'
                SQLOrigin = 'REFERENCIA_REC_COMPENSADO'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'SITUACION'
                TableField = '<unknown>'
                SQLOrigin = 'SITUACION'
              end
              item
                DatasetField = 'ID_FACTURA'
                TableField = '<unknown>'
                SQLOrigin = 'ID_FACTURA'
              end
              item
                DatasetField = 'DATOS_BANCARIOS'
                TableField = '<unknown>'
                SQLOrigin = 'DATOS_BANCARIOS'
              end
              item
                DatasetField = 'ID_REMESA'
                TableField = '<unknown>'
                SQLOrigin = 'ID_REMESA'
              end
              item
                DatasetField = 'REFERENCIA_REMESA'
                TableField = '<unknown>'
                SQLOrigin = 'REFERENCIA_REMESA'
              end
              item
                DatasetField = 'FECHA_EMISION'
                TableField = '<unknown>'
                SQLOrigin = 'FECHA_EMISION'
              end
              item
                DatasetField = 'FECHA_VENCIMIENTO'
                TableField = '<unknown>'
                SQLOrigin = 'FECHA_VENCIMIENTO'
              end
              item
                DatasetField = 'DESCRIPCION'
                TableField = 'DESCRIPCION'
              end
              item
                DatasetField = 'OBSERVACIONES'
                TableField = '<unknown>'
                SQLOrigin = 'OBSERVACIONES'
              end
              item
                DatasetField = 'IMPORTE'
                TableField = '<unknown>'
                SQLOrigin = 'IMPORTE'
              end
              item
                DatasetField = 'OTROS_GASTOS'
                TableField = '<unknown>'
                SQLOrigin = 'OTROS_GASTOS'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'FECHA_FACTURA'
                TableField = '<unknown>'
                SQLOrigin = 'FECHA_FACTURA'
              end
              item
                DatasetField = 'FORMA_PAGO_FACTURA'
                TableField = '<unknown>'
                SQLOrigin = 'FORMA_PAGO_FACTURA'
              end
              item
                DatasetField = 'IMPORTE_FACTURA'
                TableField = '<unknown>'
                SQLOrigin = 'IMPORTE_FACTURA'
              end
              item
                DatasetField = 'NOMBRE_CLIENTE'
                TableField = '<unknown>'
                SQLOrigin = 'NOMBRE_CLIENTE'
              end
              item
                DatasetField = 'NIF_CIF_CLIENTE'
                TableField = '<unknown>'
                SQLOrigin = 'NIF_CIF_CLIENTE'
              end
              item
                DatasetField = 'CALLE_CLIENTE'
                TableField = '<unknown>'
                SQLOrigin = 'CALLE_CLIENTE'
              end
              item
                DatasetField = 'CODIGO_POSTAL_CLIENTE'
                TableField = '<unknown>'
                SQLOrigin = 'CODIGO_POSTAL_CLIENTE'
              end
              item
                DatasetField = 'PROVINCIA_CLIENTE'
                TableField = '<unknown>'
                SQLOrigin = 'PROVINCIA_CLIENTE'
              end
              item
                DatasetField = 'POBLACION_CLIENTE'
                TableField = '<unknown>'
                SQLOrigin = 'POBLACION_CLIENTE'
              end
              item
                DatasetField = 'NIF_CIF_EMPRESA'
                TableField = '<unknown>'
                SQLOrigin = 'NIF_CIF_EMPRESA'
              end
              item
                DatasetField = 'RAZON_SOCIAL'
                TableField = '<unknown>'
                SQLOrigin = 'RAZON_SOCIAL'
              end
              item
                DatasetField = 'CALLE_EMPRESA'
                TableField = '<unknown>'
                SQLOrigin = 'CALLE_EMPRESA'
              end
              item
                DatasetField = 'POBLACION_EMPRESA'
                TableField = '<unknown>'
                SQLOrigin = 'POBLACION_EMPRESA'
              end
              item
                DatasetField = 'PROVINCIA_EMPRESA'
                TableField = '<unknown>'
                SQLOrigin = 'PROVINCIA_EMPRESA'
              end
              item
                DatasetField = 'CODIGO_POSTAL_EMPRESA'
                TableField = '<unknown>'
                SQLOrigin = 'CODIGO_POSTAL_EMPRESA'
              end
              item
                DatasetField = 'TELEFONO_1'
                TableField = '<unknown>'
                SQLOrigin = 'TELEFONO_1'
              end
              item
                DatasetField = 'FAX'
                TableField = '<unknown>'
                SQLOrigin = 'FAX'
              end
              item
                DatasetField = 'MOVIL_1'
                TableField = '<unknown>'
                SQLOrigin = 'MOVIL_1'
              end
              item
                DatasetField = 'EMAIL_1'
                TableField = '<unknown>'
                SQLOrigin = 'EMAIL_1'
              end
              item
                DatasetField = 'PAGINA_WEB'
                TableField = '<unknown>'
                SQLOrigin = 'PAGINA_WEB'
              end
              item
                DatasetField = 'REGISTRO_MERCANTIL'
                TableField = '<unknown>'
                SQLOrigin = 'REGISTRO_MERCANTIL'
              end
              item
                DatasetField = 'LOGOTIPO'
                TableField = '<unknown>'
                SQLOrigin = 'LOGOTIPO'
              end
              item
                DatasetField = 'ENTIDAD'
                TableField = '<unknown>'
                SQLOrigin = 'ENTIDAD'
              end
              item
                DatasetField = 'SUCURSAL'
                TableField = '<unknown>'
                SQLOrigin = 'SUCURSAL'
              end
              item
                DatasetField = 'DC'
                TableField = '<unknown>'
                SQLOrigin = 'DC'
              end
              item
                DatasetField = 'CUENTA'
                TableField = '<unknown>'
                SQLOrigin = 'CUENTA'
              end>
          end>
        Name = 'Informe_Cabecera'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'ID_RECIBO_COMPENSADO'
            DataType = datInteger
          end
          item
            Name = 'REFERENCIA_REC_COMPENSADO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          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 = 'DATOS_BANCARIOS'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ENTIDAD'
            DataType = datString
            Size = 254
          end
          item
            Name = 'SUCURSAL'
            DataType = datString
            Size = 254
          end
          item
            Name = 'DC'
            DataType = datString
            Size = 254
          end
          item
            Name = 'CUENTA'
            DataType = datString
            Size = 254
          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
          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 = 'NOMBRE_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NIF_CIF_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'CALLE_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL_CLIENTE'
            DataType = datString
            Size = 10
          end
          item
            Name = 'PROVINCIA_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'POBLACION_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NIF_CIF_EMPRESA'
            DataType = datString
            Size = 15
          end
          item
            Name = 'RAZON_SOCIAL'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CALLE_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'POBLACION_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PROVINCIA_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL_EMPRESA'
            DataType = datString
            Size = 10
          end
          item
            Name = 'TELEFONO_1'
            DataType = datString
            Size = 25
          end
          item
            Name = 'FAX'
            DataType = datString
            Size = 25
          end
          item
            Name = 'MOVIL_1'
            DataType = datString
            Size = 25
          end
          item
            Name = 'EMAIL_1'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PAGINA_WEB'
            DataType = datString
            Size = 255
          end
          item
            Name = 'REGISTRO_MERCANTIL'
            DataType = datString
            Size = 255
          end
          item
            Name = 'LOGOTIPO'
            DataType = datBlob
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_recibos_cliente'
            SQL = 
              'select ID_EMPRESA,'#10'extract (year from fecha_vencimiento) as ANO,' +
              #10'extract (month from fecha_vencimiento) as MES,'#10'case'#10'when extrac' +
              't (month from fecha_vencimiento) = 1 then '#39'ENERO - '#39' || extract ' +
              '(year from fecha_vencimiento)'#10'when extract (month from fecha_ven' +
              'cimiento) = 2 then '#39'FEBRERO - '#39' || extract (year from fecha_venc' +
              'imiento)'#10'when extract (month from fecha_vencimiento) = 3 then '#39'M' +
              'ARZO - '#39' || extract (year from fecha_vencimiento)'#10'when extract (' +
              'month from fecha_vencimiento) = 4 then '#39'ABRIL - '#39' || extract (ye' +
              'ar from fecha_vencimiento)'#10'when extract (month from fecha_vencim' +
              'iento) = 5 then '#39'MAYO - '#39' || extract (year from fecha_vencimient' +
              'o)'#10'when extract (month from fecha_vencimiento) = 6 then '#39'JUNIO -' +
              ' '#39' || extract (year from fecha_vencimiento)'#10'when extract (month ' +
              'from fecha_vencimiento) = 7 then '#39'JULIO - '#39' || extract (year fro' +
              'm fecha_vencimiento)'#10'when extract (month from fecha_vencimiento)' +
              ' = 8 then '#39'AGOSTO - '#39' || extract (year from fecha_vencimiento)'#10'w' +
              'hen extract (month from fecha_vencimiento) = 9 then '#39'SEPTIEMBRE ' +
              '- '#39' || extract (year from fecha_vencimiento)'#10'when extract (month' +
              ' from fecha_vencimiento) = 10 then '#39'OCTUBRE - '#39' || extract (year' +
              ' from fecha_vencimiento)'#10'when extract (month from fecha_vencimie' +
              'nto) = 11 then '#39'NOVIEMBRE - '#39' || extract (year from fecha_vencim' +
              'iento)'#10'when extract (month from fecha_vencimiento) = 12 then '#39'DI' +
              'CIEMBRE - '#39' || extract (year from fecha_vencimiento)'#10'end as TITU' +
              'LO,'#10'case'#10'when strlen(DATOS_BANCARIOS) = 0 then '#39'Sin cuenta banca' +
              'ria'#39#10'else DATOS_BANCARIOS'#10'end as DATOS_BANCARIOS,'#10'sum(IMPORTE_TO' +
              'TAL) as Importe_total'#10#10'from V_recibos_cliente'#10'group by 1,2,3,4,5' +
              #10'order by 1,2,3,4,5'#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'ANO'
                TableField = 'ANO'
              end
              item
                DatasetField = 'MES'
                TableField = 'MES'
              end
              item
                DatasetField = 'TITULO'
                TableField = 'TITULO'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'DATOS_BANCARIOS'
                TableField = 'DATOS_BANCARIOS'
              end>
          end>
        Name = 'InformeListadoRecibosPendientesResumen'
        Fields = <
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'ANO'
            DataType = datSmallInt
          end
          item
            Name = 'MES'
            DataType = datSmallInt
          end
          item
            Name = 'TITULO'
            DataType = datString
            Size = 19
          end
          item
            Name = 'DATOS_BANCARIOS'
            DataType = datString
            Size = 255
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_recibos_cliente'
            SQL = 
              'select ID_EMPRESA,'#10'extract (year from fecha_emision) as ANO,'#10'ext' +
              'ract (month from fecha_emision) as MES,'#10'case'#10'when extract (month' +
              ' from fecha_emision) = 1 then '#39'ENERO - '#39' || extract (year from f' +
              'echa_emision)'#10'when extract (month from fecha_emision) = 2 then '#39 +
              'FEBRERO - '#39' || extract (year from fecha_emision)'#10'when extract (m' +
              'onth from fecha_emision) = 3 then '#39'MARZO - '#39' || extract (year fr' +
              'om fecha_emision)'#10'when extract (month from fecha_emision) = 4 th' +
              'en '#39'ABRIL - '#39' || extract (year from fecha_emision)'#10'when extract ' +
              '(month from fecha_emision) = 5 then '#39'MAYO - '#39' || extract (year f' +
              'rom fecha_emision)'#10'when extract (month from fecha_emision) = 6 t' +
              'hen '#39'JUNIO - '#39' || extract (year from fecha_emision)'#10'when extract' +
              ' (month from fecha_emision) = 7 then '#39'JULIO - '#39' || extract (year' +
              ' from fecha_emision)'#10'when extract (month from fecha_emision) = 8' +
              ' then '#39'AGOSTO - '#39' || extract (year from fecha_emision)'#10'when extr' +
              'act (month from fecha_emision) = 9 then '#39'SEPTIEMBRE - '#39' || extra' +
              'ct (year from fecha_emision)'#10'when extract (month from fecha_emis' +
              'ion) = 10 then '#39'OCTUBRE - '#39' || extract (year from fecha_emision)' +
              #10'when extract (month from fecha_emision) = 11 then '#39'NOVIEMBRE - ' +
              #39' || extract (year from fecha_emision)'#10'when extract (month from ' +
              'fecha_emision) = 12 then '#39'DICIEMBRE - '#39' || extract (year from fe' +
              'cha_emision)'#10'end as TITULO,'#10'REFERENCIA,  ID_CLIENTE, NOMBRE_CLIE' +
              'NTE, SITUACION, NIF_CIF_CLIENTE, fecha_emision, FECHA_VENCIMIENT' +
              'O,'#10'IMPORTE_TOTAL'#10#10'from V_recibos_cliente'#10'where {where}'#10'order by ' +
              'ANO, MES, fecha_emision, NOMBRE_CLIENTE'#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'ANO'
                TableField = 'ANO'
              end
              item
                DatasetField = 'MES'
                TableField = 'MES'
              end
              item
                DatasetField = 'TITULO'
                TableField = 'TITULO'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'ID_CLIENTE'
                TableField = 'ID_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE_CLIENTE'
                TableField = 'NOMBRE_CLIENTE'
              end
              item
                DatasetField = 'SITUACION'
                TableField = 'SITUACION'
              end
              item
                DatasetField = 'NIF_CIF_CLIENTE'
                TableField = 'NIF_CIF_CLIENTE'
              end
              item
                DatasetField = 'FECHA_EMISION'
                TableField = 'FECHA_EMISION'
              end
              item
                DatasetField = 'FECHA_VENCIMIENTO'
                TableField = 'FECHA_VENCIMIENTO'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end>
          end>
        Name = 'InformeListadoRecibos'
        Fields = <
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'ANO'
            DataType = datSmallInt
          end
          item
            Name = 'MES'
            DataType = datSmallInt
          end
          item
            Name = 'TITULO'
            DataType = datString
            Size = 19
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
          end
          item
            Name = 'NOMBRE_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 9
          end
          item
            Name = 'NIF_CIF_CLIENTE'
            DataType = datString
            Size = 15
          end
          item
            Name = 'FECHA_EMISION'
            DataType = datDateTime
          end
          item
            Name = 'FECHA_VENCIMIENTO'
            DataType = datDateTime
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_recibos_cliente'
            SQL = 
              'select ID_EMPRESA,'#10'extract (year from fecha_emision) as ANO,'#10'ext' +
              'ract (month from fecha_emision) as MES,'#10'case'#10'when extract (month' +
              ' from fecha_emision) = 1 then '#39'ENERO - '#39' || extract (year from f' +
              'echa_emision)'#10'when extract (month from fecha_emision) = 2 then '#39 +
              'FEBRERO - '#39' || extract (year from fecha_emision)'#10'when extract (m' +
              'onth from fecha_emision) = 3 then '#39'MARZO - '#39' || extract (year fr' +
              'om fecha_emision)'#10'when extract (month from fecha_emision) = 4 th' +
              'en '#39'ABRIL - '#39' || extract (year from fecha_emision)'#10'when extract ' +
              '(month from fecha_emision) = 5 then '#39'MAYO - '#39' || extract (year f' +
              'rom fecha_emision)'#10'when extract (month from fecha_emision) = 6 t' +
              'hen '#39'JUNIO - '#39' || extract (year from fecha_emision)'#10'when extract' +
              ' (month from fecha_emision) = 7 then '#39'JULIO - '#39' || extract (year' +
              ' from fecha_emision)'#10'when extract (month from fecha_emision) = 8' +
              ' then '#39'AGOSTO - '#39' || extract (year from fecha_emision)'#10'when extr' +
              'act (month from fecha_emision) = 9 then '#39'SEPTIEMBRE - '#39' || extra' +
              'ct (year from fecha_emision)'#10'when extract (month from fecha_emis' +
              'ion) = 10 then '#39'OCTUBRE - '#39' || extract (year from fecha_emision)' +
              #10'when extract (month from fecha_emision) = 11 then '#39'NOVIEMBRE - ' +
              #39' || extract (year from fecha_emision)'#10'when extract (month from ' +
              'fecha_emision) = 12 then '#39'DICIEMBRE - '#39' || extract (year from fe' +
              'cha_emision)'#10'end as TITULO,'#10'sum(IMPORTE_TOTAL) as importe_total'#10 +
              #10'from V_recibos_cliente'#10'group by 1,2,3,4'#10'order by 1,2,3,4'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'ANO'
                TableField = 'ANO'
              end
              item
                DatasetField = 'MES'
                TableField = 'MES'
              end
              item
                DatasetField = 'TITULO'
                TableField = 'TITULO'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end>
          end>
        Name = 'InformeListadoRecibosResumen'
        Fields = <
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'ANO'
            DataType = datSmallInt
          end
          item
            Name = 'MES'
            DataType = datSmallInt
          end
          item
            Name = 'TITULO'
            DataType = datString
            Size = 19
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end>
      end>
    JoinDataTables = <>
    UnionDataTables = <>
    Commands = <>
    RelationShips = <>
    UpdateRules = <>
    Version = 0
    Left = 48
    Top = 16
  end
  object DataDictionary: TDADataDictionary
    Fields = <>
    Left = 46
    Top = 158
  end
  object frxReport: TfrxReport
    Version = '4.7.71'
    DotMatrixReport = False
    EngineOptions.DoublePass = True
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.OutlineWidth = 180
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 37871.995398692100000000
    ReportOptions.Description.Strings = (
      'Demonstrates how to create simple list report.')
    ReportOptions.LastChange = 40193.741058298610000000
    ReportOptions.VersionBuild = '1'
    ReportOptions.VersionMajor = '12'
    ReportOptions.VersionMinor = '13'
    ReportOptions.VersionRelease = '1'
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'begin'
      ''
      'end.')
    ShowProgress = False
    StoreInDFM = False
    Left = 169
    Top = 16
  end
  object frxDBCabecera: TfrxDBDataset
    UserName = 'frxDBCabecera'
    CloseDataSource = False
    DataSource = DADataCabecera
    BCDToCurrency = False
    Left = 264
    Top = 16
  end
  object DADataCompensados: TDADataSource
    DataSet = tbl_Compensados.Dataset
    DataTable = tbl_Compensados
    Left = 360
    Top = 72
  end
  object frxDBCompensados: TfrxDBDataset
    UserName = 'frxDBCompensados'
    CloseDataSource = False
    DataSource = DADataCompensados
    BCDToCurrency = False
    Left = 360
    Top = 16
  end
  object tbl_Compensados: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datFloat
      end>
    Params = <
      item
        Name = 'ID_RECIBO'
        Value = ''
        ParamType = daptInput
      end>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    LogicalName = 'Informe_Compensados'
    IndexDefs = <>
    Left = 360
    Top = 128
  end
  object tbl_InformeListadoRecibos: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'MES'
        DataType = datSmallInt
      end
      item
        Name = 'TITULO'
        DataType = datString
        Size = 19
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ID_CLIENTE'
        DataType = datInteger
      end
      item
        Name = 'NOMBRE_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 9
      end
      item
        Name = 'NIF_CIF_CLIENTE'
        DataType = datString
        Size = 15
      end
      item
        Name = 'FECHA_VENCIMIENTO'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_EMISION'
        DataType = datDateTime
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
      end>
    Params = <>
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    LogicalName = 'InformeListadoRecibos'
    IndexDefs = <>
    Left = 496
    Top = 128
  end
  object DADSInformeListadoRecibos: TDADataSource
    DataSet = tbl_InformeListadoRecibos.Dataset
    DataTable = tbl_InformeListadoRecibos
    Left = 496
    Top = 72
  end
  object frxDBInformeListadoRecibos: TfrxDBDataset
    UserName = 'frxDBInformeListadoRecibos'
    CloseDataSource = False
    DataSource = DADSInformeListadoRecibos
    BCDToCurrency = False
    Left = 496
    Top = 16
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 88
  end
  object frxDBInformeListadoRecibosResumen: TfrxDBDataset
    UserName = 'frxDBInformeListadoRecibosResumen'
    CloseDataSource = False
    DataSource = DADSInformeListadoRecibosResumen
    BCDToCurrency = False
    Left = 504
    Top = 192
  end
  object DADSInformeListadoRecibosResumen: TDADataSource
    DataSet = tbl_InformeListadoRecibosResumen.Dataset
    DataTable = tbl_InformeListadoRecibosResumen
    Left = 504
    Top = 248
  end
  object tbl_InformeListadoRecibosResumen: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <>
    Params = <>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    IndexDefs = <>
    Left = 504
    Top = 304
  end
  object frxDBInformeListadoRecibosPendientes: TfrxDBDataset
    UserName = 'frxDBInformeListadoRecibosPendientes'
    CloseDataSource = False
    DataSource = DADSInformeListadoRecibosPendientes
    BCDToCurrency = False
    Left = 704
    Top = 16
  end
  object DADSInformeListadoRecibosPendientes: TDADataSource
    DataSet = tbl_InformeListadoRecibosPendientes.Dataset
    DataTable = tbl_InformeListadoRecibosPendientes
    Left = 704
    Top = 72
  end
  object tbl_InformeListadoRecibosPendientes: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'ANO'
        DataType = datSmallInt
      end
      item
        Name = 'MES'
        DataType = datSmallInt
      end
      item
        Name = 'TITULO'
        DataType = datString
        Size = 19
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ID_CLIENTE'
        DataType = datInteger
      end
      item
        Name = 'NOMBRE_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 9
      end
      item
        Name = 'NIF_CIF_CLIENTE'
        DataType = datString
        Size = 15
      end
      item
        Name = 'FECHA_VENCIMIENTO'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_EMISION'
        DataType = datDateTime
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
      end
      item
        Name = 'DATOS_BANCARIOS'
        DataType = datString
        Size = 255
      end>
    Params = <>
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    LogicalName = 'InformeListadoRecibosPendientes'
    IndexDefs = <>
    Left = 704
    Top = 128
  end
  object frxDBInformeListadoRecibosPendResumen: TfrxDBDataset
    UserName = 'frxDBInformeListadoRecibosPendResumen'
    CloseDataSource = False
    DataSource = DADSInformeListadoRecibosPendResumen
    BCDToCurrency = False
    Left = 704
    Top = 192
  end
  object DADSInformeListadoRecibosPendResumen: TDADataSource
    DataSet = tbl_InformeListadoRecibosPendResumen.Dataset
    DataTable = tbl_InformeListadoRecibosPendResumen
    Left = 704
    Top = 248
  end
  object tbl_InformeListadoRecibosPendResumen: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <>
    Params = <>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    IndexDefs = <>
    Left = 704
    Top = 304
  end
end