object RptPedidosProveedor: TRptPedidosProveedor
  OldCreateOrder = True
  OnCreate = DataModuleCreate
  Height = 522
  Width = 540
  object DABINAdapter: TDABINAdapter
    Left = 48
    Top = 80
  end
  object schReport: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DataDictionary
    Datasets = <
      item
        IsPublic = False
        Params = <
          item
            Name = 'ID'
            Value = '2'
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            SQL = 
              'SELECT'#10'  V_PEDIDOS_PROVEEDOR.ID,'#10'  V_PEDIDOS_PROVEEDOR.ID_EMPRES' +
              'A,'#10'  V_PEDIDOS_PROVEEDOR.REFERENCIA,'#10'  V_PEDIDOS_PROVEEDOR.FECHA' +
              '_PEDIDO,'#10'  V_PEDIDOS_PROVEEDOR.FECHA_ENTREGA,'#10'  V_PEDIDOS_PROVEE' +
              'DOR.OBSERVACIONES,'#10'  V_PROVEEDORES.NOMBRE,'#10'  V_PROVEEDORES.FAX,'#10 +
              '  V_PROVEEDORES.PERSONA_CONTACTO,'#10'  V_PROVEEDORES.CODIGO_ASIGNAD' +
              'O AS CODIGO_CLIENTE,'#10'  V_PEDIDOS_PROVEEDOR.CALLE,'#10'  V_PEDIDOS_PR' +
              'OVEEDOR.POBLACION,'#10'  V_PEDIDOS_PROVEEDOR.PROVINCIA,'#10'  V_PEDIDOS_' +
              'PROVEEDOR.CODIGO_POSTAL,'#10'  V_PEDIDOS_PROVEEDOR.PERSONA_CONTACTO ' +
              'AS ENTREGAR_A'#10'FROM'#10'  V_PEDIDOS_PROVEEDOR'#10'  LEFT OUTER JOIN V_PRO' +
              'VEEDORES ON (V_PROVEEDORES.ID = V_PEDIDOS_PROVEEDOR.ID_PROVEEDOR' +
              ')'#10'WHERE V_PEDIDOS_PROVEEDOR.ID = :ID'#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'FECHA_PEDIDO'
                TableField = 'FECHA_PEDIDO'
              end
              item
                DatasetField = 'OBSERVACIONES'
                TableField = 'OBSERVACIONES'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end
              item
                DatasetField = 'FAX'
                TableField = 'FAX'
              end
              item
                DatasetField = 'CALLE'
                TableField = 'CALLE'
              end
              item
                DatasetField = 'POBLACION'
                TableField = 'POBLACION'
              end
              item
                DatasetField = 'PROVINCIA'
                TableField = 'PROVINCIA'
              end
              item
                DatasetField = 'CODIGO_POSTAL'
                TableField = 'CODIGO_POSTAL'
              end
              item
                DatasetField = 'PERSONA_CONTACTO'
                TableField = 'PERSONA_CONTACTO'
              end
              item
                DatasetField = 'CODIGO_CLIENTE'
                TableField = 'CODIGO_CLIENTE'
              end
              item
                DatasetField = 'ENTREGAR_A'
                TableField = 'ENTREGAR_A'
              end
              item
                DatasetField = 'FECHA_ENTREGA'
                TableField = 'FECHA_ENTREGA'
              end>
          end>
        Name = 'Informe_Cabecera'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FECHA_PEDIDO'
            DataType = datDateTime
          end
          item
            Name = 'FECHA_ENTREGA'
            DataType = datDateTime
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datMemo
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FAX'
            DataType = datString
            Size = 25
          end
          item
            Name = 'PERSONA_CONTACTO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
          end
          item
            Name = 'ENTREGAR_A'
            DataType = datString
            Size = 255
          end>
        ReadOnly = True
      end
      item
        IsPublic = False
        Params = <
          item
            Name = 'ID_PEDIDO'
            Value = '3'
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            SQL = 
              'SELECT DET.ID, DET.ID_PEDIDO,'#10'       DET.POSICION, DET.TIPO_DETA' +
              'LLE,'#10'       ARTICULOS.REFERENCIA, DET.CONCEPTO, DET.CANTIDAD,'#10'  ' +
              '     DET.UNIDAD_MEDIDA, DET.IMPORTE_UNIDAD - (DET.IMPORTE_UNIDAD' +
              ' * (DET.DESCUENTO / 100)) as IMPORTE_UNIDAD, DET.IMPORTE_TOTAL,'#10 +
              '       ARTICULOS_PROVEEDORES.REFERENCIA_PROV as REFERENCIA_PROVE' +
              'EDOR,'#10'       ARTICULOS.REFERENCIA_FABR as REFERENCIA_FABRICANTE'#10 +
              'FROM PEDIDOS_PROVEEDOR_DETALLES DET'#10'LEFT OUTER JOIN ARTICULOS ON' +
              ' (DET.ID_ARTICULO = ARTICULOS.ID)'#10'LEFT JOIN PEDIDOS_PROVEEDOR ON' +
              ' (PEDIDOS_PROVEEDOR.ID = DET.ID_PEDIDO)'#10'LEFT JOIN ARTICULOS_PROV' +
              'EEDORES ON ((ARTICULOS_PROVEEDORES.ID_ARTICULO = ARTICULOS.ID) A' +
              'ND (ARTICULOS_PROVEEDORES.ID_PROVEEDOR = PEDIDOS_PROVEEDOR.ID_PR' +
              'OVEEDOR))'#10#10'WHERE DET.ID_PEDIDO = :ID_PEDIDO AND DET.VISIBLE = 1 ' +
              'AND {Where}'#10'ORDER BY DET.ID_PEDIDO, DET.POSICION;'#10#10#10#10#10#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_PEDIDO'
                TableField = 'ID_PEDIDO'
              end
              item
                DatasetField = 'POSICION'
                TableField = 'POSICION'
              end
              item
                DatasetField = 'TIPO_DETALLE'
                TableField = 'TIPO_DETALLE'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'CONCEPTO'
                TableField = 'CONCEPTO'
              end
              item
                DatasetField = 'CANTIDAD'
                TableField = 'CANTIDAD'
              end
              item
                DatasetField = 'UNIDAD_MEDIDA'
                TableField = 'UNIDAD_MEDIDA'
              end
              item
                DatasetField = 'IMPORTE_UNIDAD'
                TableField = 'IMPORTE_UNIDAD'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'REFERENCIA_PROVEEDOR'
                TableField = 'REFERENCIA_PROVEEDOR'
              end
              item
                DatasetField = 'REFERENCIA_FABRICANTE'
                TableField = 'REFERENCIA_FABRICANTE'
              end>
          end>
        Name = 'Informe_Detalles'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'ID_PEDIDO'
            DataType = datInteger
          end
          item
            Name = 'POSICION'
            DataType = datInteger
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 25
          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 = 'UNIDAD_MEDIDA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'IMPORTE_UNIDAD'
            DataType = datFloat
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end
          item
            Name = 'REFERENCIA_PROVEEDOR'
            DataType = datString
            Size = 255
          end
          item
            Name = 'REFERENCIA_FABRICANTE'
            DataType = datString
            Size = 255
          end>
        ReadOnly = True
      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.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.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Por defecto'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 39065.872423495400000000
    ReportOptions.LastChange = 39696.439732523150000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      ''
      'procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);'
      'var'
      '  Cadena: String;'
      'begin'
      '{  DatosEmpresa.Lines.Clear;'
      '  if (<frxDBCabecera."TELEFONO_1_EMPRESA"> <> '#39#39') then'
      '       Cadena := '#39'TLF: '#39' + <frxDBCabecera."TELEFONO_1_EMPRESA">;'
      '  if (<frxDBCabecera."FAX_EMPRESA"> <> '#39#39') then'
      
        '       Cadena := Cadena + '#39' FAX: '#39' + <frxDBCabecera."FAX_EMPRESA' +
        '">;'
      '  DatosEmpresa.Lines.Add(Cadena);'
      '}'
      'end;'
      ''
      'procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '{  NombreEmpresa.Lines.Clear;'
      '  NombreEmpresa.Lines.Add(<frxDBCabecera."NOMBRE_EMPRESA">);'
      '}'
      'end;'
      ''
      'procedure Memo11OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  if <frxDBCabecera."FECHA_ENTREGA"> = 0 then'
      
        '     Memo11.Visible := False                                    ' +
        '                  '
      '  else'
      '     Memo11.Visible := True;      '
      'end;'
      ''
      'procedure Memo35OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      
        '  Memo35.Visible := ImprimirPrecios;                            ' +
        '                                        '
      'end;'
      ''
      'procedure Memo36OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  Memo36.Visible := ImprimirPrecios;                    '
      'end;'
      ''
      'procedure Memo6OnBeforePrint(Sender: TfrxComponent);'
      'begin'
      
        '  Memo6.Visible := ImprimirRefProveedor;                        ' +
        '                             '
      'end;'
      ''
      'begin'
      ''
      'end.')
    ShowProgress = False
    StoreInDFM = False
    OnGetValue = frxReportGetValue
    OnStartReport = 'frxReportOnStartReport'
    Left = 137
    Top = 16
  end
  object frxDBCabecera: TfrxDBDataset
    UserName = 'frxDBCabecera'
    CloseDataSource = False
    DataSource = DADSCabecera
    Left = 360
    Top = 24
  end
  object frxDBDetalles: TfrxDBDataset
    UserName = 'frxDBDetalles'
    CloseDataSource = False
    DataSource = DADSDetalles
    Left = 440
    Top = 24
  end
  object IBDatabase1: TIBDatabase
    DatabaseName = 'C:\Codigo Tecsitel\Output\Debug\Database\FACTUGES.FDB'
    Params.Strings = (
      'user_name=sysdba'
      'password=masterkey'
      'lc_ctype=ISO8859_1')
    LoginPrompt = False
    DefaultTransaction = IBTransaction1
    Left = 48
    Top = 296
  end
  object IBTransaction1: TIBTransaction
    Left = 48
    Top = 352
  end
  object DataSource1: TDataSource
    DataSet = cabecera
    Left = 216
    Top = 296
  end
  object DataSource2: TDataSource
    DataSet = detalles
    Left = 216
    Top = 352
  end
  object cabecera: TIBQuery
    Database = IBDatabase1
    Transaction = IBTransaction1
    SQL.Strings = (
      'SELECT'
      '  V_PEDIDOS_PROVEEDOR.ID,'
      '  V_PEDIDOS_PROVEEDOR.ID_EMPRESA,'
      '  V_PEDIDOS_PROVEEDOR.REFERENCIA,'
      '  V_PEDIDOS_PROVEEDOR.FECHA_PEDIDO,'
      '  V_PEDIDOS_PROVEEDOR.OBSERVACIONES,'
      '  V_PROVEEDORES.NOMBRE,'
      '  V_PROVEEDORES.FAX,'
      '  V_PROVEEDORES.PERSONA_CONTACTO,'
      '  V_PROVEEDORES.CODIGO_ASIGNADO AS CODIGO_CLIENTE,'
      '  V_PEDIDOS_PROVEEDOR.CALLE,'
      '  V_PEDIDOS_PROVEEDOR.POBLACION,'
      '  V_PEDIDOS_PROVEEDOR.PROVINCIA,'
      '  V_PEDIDOS_PROVEEDOR.CODIGO_POSTAL,'
      '  V_PEDIDOS_PROVEEDOR.PERSONA_CONTACTO AS ENTREGAR_A'
      'FROM'
      '  V_PEDIDOS_PROVEEDOR'
      
        '  LEFT OUTER JOIN V_PROVEEDORES ON (V_PROVEEDORES.ID = V_PEDIDOS' +
        '_PROVEEDOR.ID_PROVEEDOR)'
      'WHERE V_PEDIDOS_PROVEEDOR.ID = 2')
    Left = 136
    Top = 296
    object cabeceraID: TIntegerField
      FieldName = 'ID'
      Origin = '"V_PEDIDOS_PROVEEDOR"."ID"'
    end
    object cabeceraID_EMPRESA: TIntegerField
      FieldName = 'ID_EMPRESA'
      Origin = '"V_PEDIDOS_PROVEEDOR"."ID_EMPRESA"'
    end
    object cabeceraREFERENCIA: TIBStringField
      FieldName = 'REFERENCIA'
      Origin = '"V_PEDIDOS_PROVEEDOR"."REFERENCIA"'
      Size = 255
    end
    object cabeceraFECHA_PEDIDO: TDateField
      FieldName = 'FECHA_PEDIDO'
      Origin = '"V_PEDIDOS_PROVEEDOR"."FECHA_PEDIDO"'
    end
    object cabeceraOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      Origin = '"V_PEDIDOS_PROVEEDOR"."OBSERVACIONES"'
      ProviderFlags = [pfInUpdate]
      BlobType = ftMemo
      Size = 8
    end
    object cabeceraNOMBRE: TIBStringField
      FieldName = 'NOMBRE'
      Origin = '"V_PROVEEDORES"."NOMBRE"'
      Size = 255
    end
    object cabeceraFAX: TIBStringField
      FieldName = 'FAX'
      Origin = '"V_PROVEEDORES"."FAX"'
      Size = 25
    end
    object cabeceraPERSONA_CONTACTO: TIBStringField
      FieldName = 'PERSONA_CONTACTO'
      Origin = '"V_PROVEEDORES"."PERSONA_CONTACTO"'
      Size = 255
    end
    object cabeceraCODIGO_CLIENTE: TIBStringField
      FieldName = 'CODIGO_CLIENTE'
      Origin = '"V_PROVEEDORES"."CODIGO_ASIGNADO"'
      Size = 255
    end
    object cabeceraCALLE: TIBStringField
      FieldName = 'CALLE'
      Origin = '"V_PEDIDOS_PROVEEDOR"."CALLE"'
      Size = 255
    end
    object cabeceraPOBLACION: TIBStringField
      FieldName = 'POBLACION'
      Origin = '"V_PEDIDOS_PROVEEDOR"."POBLACION"'
      Size = 255
    end
    object cabeceraPROVINCIA: TIBStringField
      FieldName = 'PROVINCIA'
      Origin = '"V_PEDIDOS_PROVEEDOR"."PROVINCIA"'
      Size = 255
    end
    object cabeceraCODIGO_POSTAL: TIBStringField
      FieldName = 'CODIGO_POSTAL'
      Origin = '"V_PEDIDOS_PROVEEDOR"."CODIGO_POSTAL"'
      Size = 10
    end
    object cabeceraENTREGAR_A: TIBStringField
      FieldName = 'ENTREGAR_A'
      Origin = '"V_PEDIDOS_PROVEEDOR"."PERSONA_CONTACTO"'
      Size = 255
    end
  end
  object detalles: TIBQuery
    Database = IBDatabase1
    Transaction = IBTransaction1
    SQL.Strings = (
      'SELECT DET.ID, DET.ID_PEDIDO,'
      '       DET.POSICION, DET.TIPO_DETALLE,'
      '       ARTICULOS.REFERENCIA, DET.CONCEPTO, DET.CANTIDAD,'
      '       DET.UNIDAD_MEDIDA, DET.IMPORTE_UNIDAD, DET.IMPORTE_TOTAL,'
      '       ARTICULOS.REFERENCIA_PROV as REFERENCIA_PROVEEDOR,'
      '       ARTICULOS.REFERENCIA_FABR as REFERENCIA_FABRICANTE'
      'FROM PEDIDOS_PROVEEDOR_DETALLES DET'
      'LEFT OUTER JOIN ARTICULOS ON (DET.ID_ARTICULO = ARTICULOS.ID)'
      'WHERE DET.ID_PEDIDO = 2 AND DET.VISIBLE = 1 '
      'ORDER BY DET.ID_PEDIDO, DET.POSICION;')
    Left = 136
    Top = 352
    object detallesID: TIntegerField
      FieldName = 'ID'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."ID"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object detallesID_PEDIDO: TIntegerField
      FieldName = 'ID_PEDIDO'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."ID_PEDIDO"'
      Required = True
    end
    object detallesPOSICION: TIntegerField
      FieldName = 'POSICION'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."POSICION"'
    end
    object detallesTIPO_DETALLE: TIBStringField
      FieldName = 'TIPO_DETALLE'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."TIPO_DETALLE"'
      Size = 10
    end
    object detallesREFERENCIA: TIBStringField
      FieldName = 'REFERENCIA'
      Origin = '"ARTICULOS"."REFERENCIA"'
      Size = 255
    end
    object detallesCONCEPTO: TIBStringField
      FieldName = 'CONCEPTO'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."CONCEPTO"'
      Size = 2000
    end
    object detallesCANTIDAD: TIntegerField
      FieldName = 'CANTIDAD'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."CANTIDAD"'
    end
    object detallesUNIDAD_MEDIDA: TIBStringField
      FieldName = 'UNIDAD_MEDIDA'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."UNIDAD_MEDIDA"'
      Size = 255
    end
    object detallesIMPORTE_UNIDAD: TIBBCDField
      FieldName = 'IMPORTE_UNIDAD'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."IMPORTE_UNIDAD"'
      Precision = 18
      Size = 2
    end
    object detallesIMPORTE_TOTAL: TIBBCDField
      FieldName = 'IMPORTE_TOTAL'
      Origin = '"PEDIDOS_PROVEEDOR_DETALLES"."IMPORTE_TOTAL"'
      Precision = 18
      Size = 2
    end
    object detallesREFERENCIA_PROVEEDOR: TIBStringField
      FieldName = 'REFERENCIA_PROVEEDOR'
      Origin = '"ARTICULOS"."REFERENCIA_PROV"'
      Size = 255
    end
    object detallesREFERENCIA_FABRICANTE: TIBStringField
      FieldName = 'REFERENCIA_FABRICANTE'
      Origin = '"ARTICULOS"."REFERENCIA_FABR"'
      Size = 255
    end
  end
  object frxCheckBoxObject1: TfrxCheckBoxObject
    Left = 360
    Top = 248
  end
  object frxChartObject1: TfrxChartObject
    Left = 360
    Top = 296
  end
  object frxGradientObject1: TfrxGradientObject
    Left = 440
    Top = 248
  end
  object frxCrossObject1: TfrxCrossObject
    Left = 440
    Top = 400
  end
  object frxOLEObject1: TfrxOLEObject
    Left = 360
    Top = 400
  end
  object frxBarCodeObject1: TfrxBarCodeObject
    Left = 440
    Top = 352
  end
  object frxRichObject1: TfrxRichObject
    Left = 360
    Top = 352
  end
  object DADSCabecera: TDADataSource
    DataSet = tbl_Cabecera.Dataset
    DataTable = tbl_Cabecera
    Left = 360
    Top = 80
  end
  object DADSDetalles: TDADataSource
    DataSet = tbl_Detalles.Dataset
    DataTable = tbl_Detalles
    Left = 440
    Top = 80
  end
  object tbl_Detalles: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
      end
      item
        Name = 'ID_PEDIDO'
        DataType = datInteger
      end
      item
        Name = 'POSICION'
        DataType = datInteger
      end
      item
        Name = 'TIPO_DETALLE'
        DataType = datString
        Size = 25
      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 = 'UNIDAD_MEDIDA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE_UNIDAD'
        DataType = datFloat
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
      end
      item
        Name = 'REFERENCIA_FABRICANTE'
        DataType = datString
        Size = 255
      end>
    Params = <
      item
        Name = 'ID_PEDIDO'
        Value = '3'
        ParamType = daptInput
      end>
    MasterParamsMappings.Strings = (
      'ID_PEDIDO=ID')
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = DABINAdapter
    MasterSource = DADSCabecera
    MasterFields = 'ID'
    DetailFields = 'ID_PEDIDO'
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Informe_Detalles'
    IndexDefs = <>
    Left = 440
    Top = 136
  end
  object tbl_Cabecera: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FECHA_PEDIDO'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_ENTREGA'
        DataType = datDateTime
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datMemo
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FAX'
        DataType = datString
        Size = 25
      end
      item
        Name = 'PERSONA_CONTACTO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CODIGO_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'CODIGO_POSTAL'
        DataType = datString
        Size = 10
      end
      item
        Name = 'ENTREGAR_A'
        DataType = datString
        Size = 255
      end>
    Params = <
      item
        Name = 'ID'
        Value = '2'
        ParamType = daptInput
      end>
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    LocalSchema = schReport
    LocalDataStreamer = DABINAdapter
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Informe_Cabecera'
    IndexDefs = <>
    Left = 360
    Top = 136
  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 = 440
    Top = 296
  end
end
