object RptAlbaranesCliente: TRptAlbaranesCliente
  OldCreateOrder = True
  OnCreate = DataModuleCreate
  Height = 425
  Width = 527
  object DADataCabecera: TDADataSource
    DataSet = tbl_Cabecera.Dataset
    DataTable = tbl_Cabecera
    Left = 264
    Top = 72
  end
  object DADataDetalles: TDADataSource
    DataSet = tbl_Detalles.Dataset
    DataTable = tbl_Detalles
    Left = 344
    Top = 72
  end
  object tbl_Cabecera: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'ID_CLIENTE'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'NOMBRE_COMERCIAL'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FECHA_ALBARAN'
        DataType = datDateTime
      end
      item
        Name = 'ID_PEDIDO'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datMemo
      end
      item
        Name = 'REF_PEDIDO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CODIGO_POSTAL'
        DataType = datString
        Size = 10
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PERSONA_CONTACTO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'TELEFONO'
        DataType = datString
        Size = 25
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datFloat
      end
      item
        Name = 'FECHA_PREVISTA_ENVIO'
        DataType = datDateTime
      end
      item
        Name = 'NIF_CIF_EMPRESA'
        DataType = datString
        Size = 15
      end
      item
        Name = 'NOMBRE_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'RAZON_SOCIAL_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CALLE_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CODIGO_POSTAL_EMPRESA'
        DataType = datString
        Size = 10
      end
      item
        Name = 'POBLACION_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PROVINCIA_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'TELEFONO_1_EMPRESA'
        DataType = datString
        Size = 25
      end
      item
        Name = 'FAX_EMPRESA'
        DataType = datString
        Size = 25
      end
      item
        Name = 'MOVIL_1_EMPRESA'
        DataType = datString
        Size = 25
      end
      item
        Name = 'EMAIL_1_EMPRESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PAGINA_WEB_EMPRESA'
        DataType = datString
        Size = 255
      end>
    Params = <
      item
        Name = 'ID'
        DataType = datInteger
        Value = ''
        ParamType = daptInput
      end>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Informe_Cabecera'
    IndexDefs = <>
    Left = 264
    Top = 128
  end
  object tbl_Detalles: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
      end
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
      end
      item
        Name = 'POSICION'
        DataType = datInteger
      end
      item
        Name = 'TIPO_DETALLE'
        DataType = datString
        Size = 10
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CONCEPTO'
        DataType = datString
        Size = 2000
      end
      item
        Name = 'CANTIDAD'
        DataType = datInteger
      end
      item
        Name = 'IMPORTE_UNIDAD'
        DataType = datFloat
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datFloat
      end
      item
        Name = 'FAMILIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
      end>
    Params = <
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
        Value = ''
        ParamType = daptInput
      end>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Informe_Detalles'
    IndexDefs = <>
    Left = 344
    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 = <
          item
            Name = 'ID'
            DataType = datInteger
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'ALBARANES_CLIENTE'
            SQL = 
              'SELECT'#10'  V_ALBARANES_CLIENTE.ID,'#10'  V_ALBARANES_CLIENTE.ID_EMPRES' +
              'A,'#10'  V_ALBARANES_CLIENTE.ID_CLIENTE,'#10'  V_ALBARANES_CLIENTE.NOMBR' +
              'E,'#10'  V_CLIENTES.NOMBRE_COMERCIAL,'#10'  V_CLIENTES.NIF_CIF,'#10'  V_ALBA' +
              'RANES_CLIENTE.FECHA_ALBARAN,'#10'  V_ALBARANES_CLIENTE.REFERENCIA,'#10' ' +
              ' V_ALBARANES_CLIENTE.REFERENCIA_CLIENTE,'#10'  V_ALBARANES_CLIENTE.I' +
              'D_PEDIDO,'#10'  V_ALBARANES_CLIENTE.REF_PEDIDO,'#10'  V_ALBARANES_CLIENT' +
              'E.CODIGO_POSTAL,'#10'  V_ALBARANES_CLIENTE.POBLACION,'#10'  V_ALBARANES_' +
              'CLIENTE.PROVINCIA,'#10'  V_ALBARANES_CLIENTE.PERSONA_CONTACTO,'#10'  V_A' +
              'LBARANES_CLIENTE.TELEFONO,'#10'  V_ALBARANES_CLIENTE.CALLE,'#10'  V_ALBA' +
              'RANES_CLIENTE.OBSERVACIONES,'#10'  V_ALBARANES_CLIENTE.IMPORTE_TOTAL' +
              ','#10'  V_ALBARANES_CLIENTE.FECHA_PREVISTA_ENVIO,'#10'  EMPRESAS.NIF_CIF' +
              ' AS NIF_CIF_EMPRESA,'#10'  EMPRESAS.NOMBRE AS NOMBRE_EMPRESA,'#10'  EMPR' +
              'ESAS.RAZON_SOCIAL AS RAZON_SOCIAL_EMPRESA,'#10'  EMPRESAS.CALLE AS C' +
              'ALLE_EMPRESA,'#10'  EMPRESAS.CODIGO_POSTAL AS CODIGO_POSTAL_EMPRESA,' +
              #10'  EMPRESAS.POBLACION AS POBLACION_EMPRESA,'#10'  EMPRESAS.PROVINCIA' +
              ' AS PROVINCIA_EMPRESA,'#10'  EMPRESAS.TELEFONO_1 AS TELEFONO_1_EMPRE' +
              'SA,'#10'  EMPRESAS.FAX AS FAX_EMPRESA,'#10'  EMPRESAS.MOVIL_1 AS MOVIL_1' +
              '_EMPRESA,'#10'  EMPRESAS.EMAIL_1 AS EMAIL_1_EMPRESA,'#10'  EMPRESAS.PAGI' +
              'NA_WEB AS PAGINA_WEB_EMPRESA'#10'FROM'#10'    V_ALBARANES_CLIENTE'#10'  LEFT' +
              ' OUTER JOIN V_CLIENTES ON (V_CLIENTES.ID = V_ALBARANES_CLIENTE.I' +
              'D_CLIENTE)'#10'  LEFT OUTER JOIN EMPRESAS ON (EMPRESAS.ID = V_ALBARA' +
              'NES_CLIENTE.ID_EMPRESA)'#10'WHERE V_ALBARANES_CLIENTE.ID = :ID'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'OBSERVACIONES'
                TableField = 'OBSERVACIONES'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end
              item
                DatasetField = 'CALLE'
                TableField = 'CALLE'
              end
              item
                DatasetField = 'POBLACION'
                TableField = 'POBLACION'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'CODIGO_POSTAL'
                TableField = 'CODIGO_POSTAL'
              end
              item
                DatasetField = 'PROVINCIA'
                TableField = 'PROVINCIA'
              end
              item
                DatasetField = 'PERSONA_CONTACTO'
                TableField = 'PERSONA_CONTACTO'
              end
              item
                DatasetField = 'TELEFONO'
                TableField = 'TELEFONO'
              end
              item
                DatasetField = 'NIF_CIF_EMPRESA'
                TableField = 'NIF_CIF_EMPRESA'
              end
              item
                DatasetField = 'NOMBRE_EMPRESA'
                TableField = 'NOMBRE_EMPRESA'
              end
              item
                DatasetField = 'RAZON_SOCIAL_EMPRESA'
                TableField = 'RAZON_SOCIAL_EMPRESA'
              end
              item
                DatasetField = 'TELEFONO_1_EMPRESA'
                TableField = 'TELEFONO_1_EMPRESA'
              end
              item
                DatasetField = 'FAX_EMPRESA'
                TableField = 'FAX_EMPRESA'
              end
              item
                DatasetField = 'MOVIL_1_EMPRESA'
                TableField = 'MOVIL_1_EMPRESA'
              end
              item
                DatasetField = 'EMAIL_1_EMPRESA'
                TableField = 'EMAIL_1_EMPRESA'
              end
              item
                DatasetField = 'PAGINA_WEB_EMPRESA'
                TableField = 'PAGINA_WEB_EMPRESA'
              end
              item
                DatasetField = 'ID_CLIENTE'
                TableField = 'ID_CLIENTE'
              end
              item
                DatasetField = 'FECHA_ALBARAN'
                TableField = 'FECHA_ALBARAN'
              end
              item
                DatasetField = 'ID_PEDIDO'
                TableField = 'ID_PEDIDO'
              end
              item
                DatasetField = 'NOMBRE_COMERCIAL'
                TableField = 'NOMBRE_COMERCIAL'
              end
              item
                DatasetField = 'REF_PEDIDO'
                TableField = 'REF_PEDIDO'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'REFERENCIA_CLIENTE'
                TableField = 'REFERENCIA_CLIENTE'
              end
              item
                DatasetField = 'FECHA_PREVISTA_ENVIO'
                TableField = 'FECHA_PREVISTA_ENVIO'
              end
              item
                DatasetField = 'CALLE_EMPRESA'
                TableField = 'CALLE_EMPRESA'
              end
              item
                DatasetField = 'CODIGO_POSTAL_EMPRESA'
                TableField = 'CODIGO_POSTAL_EMPRESA'
              end
              item
                DatasetField = 'POBLACION_EMPRESA'
                TableField = 'POBLACION_EMPRESA'
              end
              item
                DatasetField = 'PROVINCIA_EMPRESA'
                TableField = 'PROVINCIA_EMPRESA'
              end
              item
                DatasetField = 'NIF_CIF'
                TableField = '<unknown>'
                SQLOrigin = 'NIF_CIF'
              end>
          end>
        Name = 'Informe_Cabecera'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NOMBRE_COMERCIAL'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
          end
          item
            Name = 'FECHA_ALBARAN'
            DataType = datDateTime
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'REFERENCIA_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'ID_PEDIDO'
            DataType = datInteger
          end
          item
            Name = 'REF_PEDIDO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PERSONA_CONTACTO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'TELEFONO'
            DataType = datString
            Size = 25
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datMemo
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end
          item
            Name = 'FECHA_PREVISTA_ENVIO'
            DataType = datDateTime
          end
          item
            Name = 'NIF_CIF_EMPRESA'
            DataType = datString
            Size = 15
          end
          item
            Name = 'NOMBRE_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'RAZON_SOCIAL_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CALLE_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL_EMPRESA'
            DataType = datString
            Size = 10
          end
          item
            Name = 'POBLACION_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PROVINCIA_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'TELEFONO_1_EMPRESA'
            DataType = datString
            Size = 25
          end
          item
            Name = 'FAX_EMPRESA'
            DataType = datString
            Size = 25
          end
          item
            Name = 'MOVIL_1_EMPRESA'
            DataType = datString
            Size = 25
          end
          item
            Name = 'EMAIL_1_EMPRESA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PAGINA_WEB_EMPRESA'
            DataType = datString
            Size = 255
          end>
      end
      item
        Params = <
          item
            Name = 'ID_ALBARAN'
            DataType = datInteger
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'ALBARANES_CLIENTE_DETALLES'
            SQL = 
              'SELECT ALBARANES_CLIENTE_DETALLES.ID, ALBARANES_CLIENTE_DETALLES' +
              '.ID_ALBARAN,'#10'       ALBARANES_CLIENTE_DETALLES.POSICION, ALBARAN' +
              'ES_CLIENTE_DETALLES.TIPO_DETALLE,'#10'       ALBARANES_CLIENTE_DETAL' +
              'LES.CONCEPTO, ALBARANES_CLIENTE_DETALLES.CANTIDAD,'#10'       ALBARA' +
              'NES_CLIENTE_DETALLES.DESCUENTO,'#10'       ALBARANES_CLIENTE_DETALLE' +
              'S.IMPORTE_UNIDAD, ALBARANES_CLIENTE_DETALLES.IMPORTE_TOTAL,'#10'    ' +
              '   ARTICULOS.REFERENCIA, ARTICULOS.FAMILIA, ARTICULOS.REFERENCIA' +
              '_PROV as REFERENCIA_PROVEEDOR'#10#10'FROM ALBARANES_CLIENTE_DETALLES'#10'L' +
              'EFT JOIN ARTICULOS ON (ALBARANES_CLIENTE_DETALLES.ID_ARTICULO = ' +
              'ARTICULOS.ID)'#10'WHERE ID_ALBARAN = :ID_ALBARAN'#10'ORDER BY POSICION'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'CANTIDAD'
                TableField = 'CANTIDAD'
              end
              item
                DatasetField = 'POSICION'
                TableField = 'POSICION'
              end
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'TIPO_DETALLE'
                TableField = 'TIPO_DETALLE'
              end
              item
                DatasetField = 'CONCEPTO'
                TableField = 'CONCEPTO'
              end
              item
                DatasetField = 'IMPORTE_UNIDAD'
                TableField = 'IMPORTE_UNIDAD'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'FAMILIA'
                TableField = 'FAMILIA'
              end
              item
                DatasetField = 'REFERENCIA_PROVEEDOR'
                TableField = 'REFERENCIA_PROVEEDOR'
              end
              item
                DatasetField = 'ID_ALBARAN'
                TableField = 'ID_ALBARAN'
              end
              item
                DatasetField = 'DESCUENTO'
                TableField = 'DESCUENTO'
              end>
          end>
        Name = 'Informe_Detalles'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'ID_ALBARAN'
            DataType = datInteger
          end
          item
            Name = 'POSICION'
            DataType = datInteger
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 10
          end
          item
            Name = 'CONCEPTO'
            DataType = datString
            Size = 2000
          end
          item
            Name = 'CANTIDAD'
            DataType = datInteger
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
          end
          item
            Name = 'IMPORTE_UNIDAD'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FAMILIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'REFERENCIA_PROVEEDOR'
            DataType = datString
            Size = 255
          end>
      end
      item
        Params = <
          item
            Name = 'ID_ALBARAN'
            DataType = datInteger
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'ALBARANES_CLIENTE_DETALLES'
            SQL = 
              'SELECT ALBARANES_CLIENTE.REFERENCIA, ALBARANES_CLIENTE.FECHA_PRE' +
              'VISTA_ENVIO,'#10'       ALBARANES_CLIENTE_DETALLES.ID, ALBARANES_CLI' +
              'ENTE_DETALLES.ID_ALBARAN,'#10'       ALBARANES_CLIENTE_DETALLES.POSI' +
              'CION, ALBARANES_CLIENTE_DETALLES.TIPO_DETALLE,'#10'       F_RTFTOTEX' +
              'T(ALBARANES_CLIENTE_DETALLES.CONCEPTO) as CONCEPTO, ALBARANES_CL' +
              'IENTE_DETALLES.CANTIDAD,'#10'       ALBARANES_CLIENTE_DETALLES.IMPOR' +
              'TE_UNIDAD, ALBARANES_CLIENTE_DETALLES.IMPORTE_TOTAL'#10#10'FROM ALBARA' +
              'NES_CLIENTE_DETALLES'#10'left join ALBARANES_CLIENTE on (ALBARANES_C' +
              'LIENTE.ID = ALBARANES_CLIENTE_DETALLES.ID_ALBARAN)'#10'WHERE (ID_ALB' +
              'ARAN = :ID_ALBARAN)'#10'AND (ALBARANES_CLIENTE_DETALLES.CANTIDAD > 0' +
              ')'#10'ORDER BY POSICION'#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'CANTIDAD'
                TableField = 'CANTIDAD'
              end
              item
                DatasetField = 'POSICION'
                TableField = 'POSICION'
              end
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'TIPO_DETALLE'
                TableField = 'TIPO_DETALLE'
              end
              item
                DatasetField = 'CONCEPTO'
                TableField = 'CONCEPTO'
              end
              item
                DatasetField = 'IMPORTE_UNIDAD'
                TableField = 'IMPORTE_UNIDAD'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'ID_ALBARAN'
                TableField = 'ID_ALBARAN'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = '<unknown>'
                SQLOrigin = 'REFERENCIA'
              end
              item
                DatasetField = 'FECHA_PREVISTA_ENVIO'
                TableField = '<unknown>'
                SQLOrigin = 'FECHA_PREVISTA_ENVIO'
              end>
          end>
        Name = 'Informe_Detalles_Etiquetas'
        Fields = <
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FECHA_PREVISTA_ENVIO'
            DataType = datDateTime
          end
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'ID_ALBARAN'
            DataType = datInteger
          end
          item
            Name = 'POSICION'
            DataType = datInteger
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 10
          end
          item
            Name = 'CONCEPTO'
            DataType = datString
            Size = 254
          end
          item
            Name = 'CANTIDAD'
            DataType = datInteger
          end
          item
            Name = 'IMPORTE_UNIDAD'
            DataType = datCurrency
          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 = <
      item
        Name = 'FacturasCliente_ID'
        DataType = datAutoInc
        Required = True
        DisplayLabel = 'ID'
      end
      item
        Name = 'FacturasCliente_ID_EMPRESA'
        DataType = datInteger
        DisplayLabel = 'ID_EMPRESA'
      end
      item
        Name = 'FacturasCliente_ID_CONTRATO'
        DataType = datInteger
        DisplayLabel = 'ID_CONTRATO'
      end
      item
        Name = 'FacturasCliente_FECHA_FACTURA'
        DataType = datDateTime
        DisplayLabel = 'Fecha de las factura'
      end
      item
        Name = 'FacturasCliente_VENCIMIENTO'
        DataType = datInteger
        DisplayLabel = 'Vencimiento'
      end
      item
        Name = 'FacturasCliente_SITUACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Situaci'#243'n'
      end
      item
        Name = 'FacturasCliente_BASE_IMPONIBLE'
        DataType = datFloat
        DisplayLabel = 'Base imponible'
        Alignment = taRightJustify
      end
      item
        Name = 'FacturasCliente_IMPORTE_DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Importe dto.'
        Alignment = taRightJustify
      end
      item
        Name = 'FacturasCliente_IMPORTE_IVA'
        DataType = datFloat
        DisplayLabel = 'Importe IVA'
        Alignment = taRightJustify
      end
      item
        Name = 'FacturasCliente_IMPORTE_TOTAL'
        DataType = datFloat
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
      end
      item
        Name = 'FacturasCliente_FORMA_PAGO'
        DataType = datMemo
        DisplayLabel = 'Forma de pago'
      end
      item
        Name = 'FacturasCliente_ID_CLIENTE'
        DataType = datInteger
        DisplayLabel = 'ID_CLIENTE'
      end
      item
        Name = 'FacturasCliente_NIF_CIF'
        DataType = datString
        Size = 15
        DisplayLabel = 'NIF/CIF'
      end
      item
        Name = 'FacturasCliente_CODIGO_POSTAL'
        DataType = datString
        Size = 10
        DisplayLabel = 'C'#243'd. postal'
      end
      item
        Name = 'FacturasCliente_FECHA_ALTA'
        DataType = datDateTime
        DisplayLabel = 'FECHA_ALTA'
      end
      item
        Name = 'FacturasCliente_FECHA_MODIFICACION'
        DataType = datDateTime
        DisplayLabel = 'FECHA_MODIFICACION'
      end
      item
        Name = 'FacturasCliente_OBSERVACIONES'
        DataType = datMemo
        DisplayLabel = 'Observaciones'
      end
      item
        Name = 'FacturasCliente_NOMBRE'
        DataType = datString
        Size = 100
        DisplayLabel = 'Cliente'
      end
      item
        Name = 'FacturasCliente_CALLE'
        DataType = datString
        Size = 150
        DisplayLabel = 'Direcci'#243'n'
      end
      item
        Name = 'FacturasCliente_PROVINCIA'
        DataType = datString
        Size = 30
        DisplayLabel = 'Provincia'
      end
      item
        Name = 'FacturasCliente_POBLACION'
        DataType = datString
        Size = 150
        DisplayLabel = 'Poblaci'#243'n'
      end
      item
        Name = 'FacturasCliente_IVA'
        DataType = datFloat
        DisplayLabel = 'IVA'
      end
      item
        Name = 'FacturasCliente_USUARIO'
        DataType = datString
        Size = 100
        DisplayLabel = 'USUARIO'
      end
      item
        Name = 'FacturasCliente_REFERENCIA'
        DataType = datString
        Size = 20
        DisplayLabel = 'Referencia'
      end
      item
        Name = 'FacturasCliente_DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Dto.'
      end
      item
        Name = 'FacturasCliente_Detalles_ID'
        DataType = datAutoInc
        Required = True
        DisplayLabel = 'ID'
      end
      item
        Name = 'FacturasCliente_Detalles_ID_FACTURA'
        DataType = datInteger
        DisplayLabel = 'ID_FACTURA'
      end
      item
        Name = 'FacturasCliente_Detalles_TIPO_DETALLE'
        DataType = datString
        Size = 10
        DisplayLabel = 'Tipo detalle'
      end
      item
        Name = 'FacturasCliente_Detalles_CONCEPTO'
        DataType = datString
        Size = 2000
        DisplayLabel = 'Concepto'
      end
      item
        Name = 'FacturasCliente_Detalles_IMPORTE_UNIDAD'
        DataType = datFloat
        DisplayLabel = 'Importe unidad'
        Alignment = taRightJustify
      end
      item
        Name = 'FacturasCliente_Detalles_IMPORTE_TOTAL'
        DataType = datFloat
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
      end
      item
        Name = 'FacturasCliente_Detalles_VISIBLE'
        DataType = datInteger
        DisplayLabel = #191'Visible?'
      end
      item
        Name = 'FacturasCliente_Detalles_POSICION'
        DataType = datInteger
        DisplayLabel = 'Posici'#243'n'
      end
      item
        Name = 'FacturasCliente_Detalles_CANTIDAD'
        DataType = datInteger
        DisplayLabel = 'Cantidad'
      end>
    Left = 46
    Top = 158
  end
  object frxReport: TfrxReport
    Version = '4.3'
    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.LastChange = 39532.759439363400000000
    ReportOptions.VersionBuild = '1'
    ReportOptions.VersionMajor = '12'
    ReportOptions.VersionMinor = '13'
    ReportOptions.VersionRelease = '1'
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  DatosCliente.Lines.Clear;'
      '  DatosCliente.Lines.Add(<frxDBCabecera."CALLE">);'
      ''
      '  if (<frxDBCabecera."CODIGO_POSTAL"> <> '#39#39')'
      '  or (<frxDBCabecera."POBLACION"> <> '#39#39') then'
      
        '     DatosCliente.Lines.Add(<frxDBCabecera."CODIGO_POSTAL"> + '#39' ' +
        ' '#39' + <frxDBCabecera."POBLACION">);'
      ''
      '  if (<frxDBCabecera."PROVINCIA"> <> '#39#39') then'
      '     DatosCliente.Lines.Add(<frxDBCabecera."PROVINCIA">);'
      'end;'
      ''
      'procedure BandaDetallesOnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  BandaDetalles.StartNewPage := False;'
      '  BandaDetalles.Visible := True;'
      '  MemPrecio.Style := '#39'Concepto normal'#39';'
      '  MemCantidad.Style := '#39'Concepto normal'#39';'
      '  MemImpTotal.Style := '#39'Concepto normal'#39';'
      '  RichConcepto.Visible := True;'
      ''
      '  case <frxDBDetalles."TIPO_DETALLE"> of'
      '  '#39'Salto'#39': begin'
      '        BandaDetalles.StartNewPage := True;'
      '        RichConcepto.Visible := False;'
      '       end;'
      '  '#39'Titulo'#39': begin'
      '       MemPrecio.Style := '#39'Concepto titulo'#39';'
      '       MemCantidad.Style := '#39'Concepto titulo'#39';'
      '       MemImpTotal.Style := '#39'Concepto titulo'#39';'
      '       end;'
      '  '#39'Concepto'#39': begin'
      '       MemPrecio.Style := '#39'Concepto normal'#39';'
      '       MemCantidad.Style := '#39'Concepto normal'#39';'
      '       MemImpTotal.Style := '#39'Concepto normal'#39';'
      '       end;'
      '  '#39'Subtotal'#39': begin'
      '       MemPrecio.Style := '#39'Concepto subtotal'#39';'
      '       MemCantidad.Style := '#39'Concepto subtotal'#39';'
      '       MemImpTotal.Style := '#39'Concepto subtotal'#39';'
      '       end;'
      '  '#39'Descuento'#39': begin'
      '       BandaDetalles.Visible := False;'
      '       RichConcepto.Color := clNone;'
      '       end;'
      '  end;'
      ''
      '  RichConcepto.Color := MemImpTotal.Color;'
      '  RichConcepto.Frame := MemImpTotal.Frame;'
      'end;'
      ''
      'procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '// if Engine.FreeSpace > ReportSummary1.Height then    '
      
        '    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - P' +
        'ageFooter1.Height - 1;'
      'end;'
      ''
      'procedure Memo15OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  Memo15.Lines.Clear;'
      '  if (StrToFloat(<frxDBCabecera."IMPORTE_TOTAL">) < 0) then'
      '       Memo15.Lines.Add('#39'ORDEN DEVOLUCI'#211'N'#39')'
      '  else'
      '     Memo15.Lines.Add('#39'ALBAR'#193'N'#39')'
      'end;'
      ''
      'procedure Band2OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  if not Engine.FinalPass then'
      '     Set('#39'TotalPaginas'#39', (<TotalPaginas> + 1));'
      ''
      '  if Engine.FinalPass then'
      '     Set('#39'Pagina'#39', (<Pagina> + 1));'
      ''
      '  if Engine.FinalPass and (<TotalPaginas> > <Pagina>) then'
      '  begin              '
      '     LineaCorta0.visible := False;  '
      '     LineaLarga0.visible := True;         '
      '     LineaCorta1.visible := False;'
      '     LineaLarga1.visible := True;         '
      '     LineaCorta2.visible := False;  '
      '     LineaLarga2.visible := True;         '
      '     LineaCorta3.visible := False;  '
      '     LineaLarga3.visible := True;         '
      '  end'
      '  else'
      '  begin'
      '     LineaCorta0.visible := True;  '
      '     LineaLarga0.visible := False;         '
      '     LineaCorta1.visible := True;'
      '     LineaLarga1.visible := False;'
      '     LineaCorta2.visible := True;      '
      '     LineaLarga2.visible := False;'
      '     LineaCorta3.visible := True;  '
      '     LineaLarga3.visible := False;         '
      '  end;'
      'end;'
      ''
      'procedure frxReportOnStartReport(Sender: TfrxComponent);'
      'begin'
      '  Set('#39'Pagina'#39', 0);'
      '  Set('#39'TotalPaginas'#39', 0);'
      'end;'
      ''
      
        'procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent)' +
        ';'
      'begin'
      
        '//Es peor el remedio que la enfermedad, en el caso de sobre pasa' +
        'r en uno el numero de conceptos para que no quepa el reportsumar' +
        'y,'
      
        '//no hay forma de ponerlo al final en la p'#225'gina siguiente hasta ' +
        'que el numero de conceptos rellene al menos un concepto de la si' +
        'guiente hoja.                                                   ' +
        '                                                                ' +
        '                                                                ' +
        '                                                                ' +
        '                                                                ' +
        '                 '
      '//  if Engine.FreeSpace > ReportSummary1.Height then'
      
        '//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height -' +
        ' PageFooter1.Height - 1;  '
      'end;'
      ''
      'begin'
      ''
      'end.')
    ShowProgress = False
    StoreInDFM = False
    OnStartReport = 'frxReportOnStartReport'
    Left = 169
    Top = 16
  end
  object frxDBCabecera: TfrxDBDataset
    UserName = 'frxDBCabecera'
    CloseDataSource = False
    DataSource = DADataCabecera
    Left = 264
    Top = 16
  end
  object frxDBDetalles: TfrxDBDataset
    UserName = 'frxDBDetalles'
    CloseDataSource = False
    DataSource = DADataDetalles
    Left = 344
    Top = 16
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 88
  end
  object tbl_Etiquetas: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
      end
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
      end
      item
        Name = 'POSICION'
        DataType = datInteger
      end
      item
        Name = 'TIPO_DETALLE'
        DataType = datString
        Size = 10
      end
      item
        Name = 'CONCEPTO'
        DataType = datString
        Size = 254
      end
      item
        Name = 'CANTIDAD'
        DataType = datInteger
      end
      item
        Name = 'IMPORTE_UNIDAD'
        DataType = datCurrency
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
      end>
    Params = <
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
        Value = ''
        ParamType = daptInput
      end>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = Bin2DataStreamer
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Informe_Detalles_Etiquetas'
    IndexDefs = <>
    Left = 448
    Top = 128
  end
  object DADataEtiquetas: TDADataSource
    DataSet = tbl_Etiquetas.Dataset
    DataTable = tbl_Etiquetas
    Left = 448
    Top = 72
  end
  object frxDBEtiquetas: TfrxDBDataset
    UserName = 'frxDBEtiquetas'
    CloseDataSource = False
    DataSource = DADataEtiquetas
    Left = 448
    Top = 16
  end
  object frxPDFExport1: TfrxPDFExport
    ShowDialog = False
    UseFileCache = True
    ShowProgress = False
    PrintOptimized = True
    Outline = False
    Author = 'FactuGES'
    Subject = 'FactuGES'
    Background = False
    Creator = 'FactuGES'
    HTMLTags = True
    Left = 360
    Top = 352
  end
end
