object balanceventas: Tbalanceventas
  Left = 0
  Top = 0
  Caption = 'Balance de ventas'
  ClientHeight = 391
  ClientWidth = 1063
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = True
  Position = poMainFormCenter
  WindowState = wsMaximized
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 1063
    Height = 57
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 4
      Width = 76
      Height = 19
      Caption = 'Campa'#241'a'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 199
      Top = 4
      Width = 117
      Height = 19
      Caption = 'Agrupado por:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 344
      Top = 4
      Width = 117
      Height = 19
      Caption = 'Ordenado por:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 489
      Top = 5
      Width = 139
      Height = 19
      Caption = 'Serie de Factura:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object listaagrupacion: TComboBox
      Left = 199
      Top = 29
      Width = 139
      Height = 21
      ItemIndex = 0
      TabOrder = 0
      Text = 'VARIEDAD'
      OnChange = listaagrupacionChange
      Items.Strings = (
        'VARIEDAD'
        'PARCELA'
        'CLIENTE'
        'FACTURA')
    end
    object listaordenacion: TComboBox
      Left = 344
      Top = 29
      Width = 139
      Height = 21
      ItemIndex = 0
      TabOrder = 1
      Text = 'VARIEDAD'
      OnChange = listaordenacionChange
      Items.Strings = (
        'VARIEDAD'
        'PARCELA'
        'CLIENTE'
        'FACTURA')
    end
    object listacampanyas: TDBLookupComboBox
      Left = 16
      Top = 29
      Width = 177
      Height = 21
      DropDownRows = 20
      KeyField = 'id'
      ListField = 'descripcion'
      ListSource = dsqcampanayas
      TabOrder = 2
    end
    object Checkdetallado: TCheckBox
      Left = 642
      Top = 34
      Width = 81
      Height = 17
      Caption = 'Detallado'
      TabOrder = 3
      OnClick = CheckdetalladoClick
    end
    object Panel2: TPanel
      Left = 768
      Top = 1
      Width = 294
      Height = 55
      Align = alRight
      TabOrder = 4
      object Button1: TButton
        Left = 93
        Top = 1
        Width = 92
        Height = 53
        Align = alLeft
        Caption = 'Imprimir'
        ImageAlignment = iaBottom
        ImageIndex = 10
        Images = BASE.listaiconos
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 185
        Top = 1
        Width = 92
        Height = 53
        Align = alLeft
        Caption = 'Exportar'
        ImageAlignment = iaBottom
        ImageIndex = 11
        Images = BASE.listaiconos
        TabOrder = 1
        OnClick = Button2Click
      end
      object btfiltrar: TButton
        Left = 1
        Top = 1
        Width = 92
        Height = 53
        Align = alLeft
        Caption = 'Actualizar'
        ImageAlignment = iaBottom
        ImageIndex = 81
        Images = BASE.listaiconos
        TabOrder = 2
        OnClick = btfiltrarClick
      end
    end
    object listaseries: TDBLookupComboBox
      Left = 489
      Top = 30
      Width = 139
      Height = 21
      DropDownRows = 20
      KeyField = 'id'
      ListField = 'id'
      ListSource = dsqseries
      TabOrder = 5
    end
  end
  object grdatos: TDBGrid
    Left = 0
    Top = 57
    Width = 1063
    Height = 334
    Align = alClient
    DataSource = dsbalanceventas
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'idcliente'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'serie'
        Title.Caption = 'Ser.'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'idfactura'
        Title.Caption = 'N'#186
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'fecha'
        Title.Caption = 'Fecha'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'idarticulo'
        Title.Caption = 'Id'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'lote'
        Title.Caption = 'Lote'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'mprima'
        Title.Caption = 'Variedad'
        Width = 214
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'obtentor'
        Title.Caption = 'Obtentor'
        Width = 259
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'parcela'
        Title.Caption = 'Parcela'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'nomcliente'
        Title.Caption = 'Cliente'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'cantidad'
        Title.Caption = 'Cantidad'
        Width = 142
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'precio'
        Title.Caption = 'Pr.'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'base'
        Title.Caption = 'Base'
        Width = 131
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'tipoiva'
        Title.Caption = '% Iva'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'iva'
        Title.Caption = 'Iva'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'descuento'
        Title.Caption = '% Desc'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'totaldescuento'
        Title.Caption = 'Dto.'
        Visible = False
      end
      item
        Expanded = False
        FieldName = 'total'
        Title.Caption = 'Total'
        Width = 117
        Visible = True
      end>
  end
  object qcampanyas: TZReadOnlyQuery
    Connection = DM.DBagrigest
    SQL.Strings = (
      'select * from campanyas order by fechafin desc')
    Params = <>
    Left = 56
    Top = 80
    object qcampanyasid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object qcampanyasidempresa: TIntegerField
      FieldName = 'idempresa'
      Required = True
    end
    object qcampanyasid_anterior: TIntegerField
      FieldName = 'id_anterior'
    end
    object qcampanyasdescripcion: TWideStringField
      FieldName = 'descripcion'
      Required = True
      Size = 80
    end
    object qcampanyasfechainicio: TDateField
      FieldName = 'fechainicio'
      Required = True
    end
    object qcampanyasfechafin: TDateField
      FieldName = 'fechafin'
      Required = True
    end
    object qcampanyasult_pesada: TIntegerField
      FieldName = 'ult_pesada'
    end
  end
  object qbalanceventas: TZReadOnlyQuery
    Connection = DM.DBagrigest
    SQL.Strings = (
      'select * from vista_balanceventas')
    Params = <>
    Left = 208
    Top = 88
    object qbalanceventasidcliente: TIntegerField
      FieldName = 'idcliente'
      Required = True
    end
    object qbalanceventasnomcliente: TWideStringField
      FieldName = 'nomcliente'
      Size = 100
    end
    object qbalanceventasserie: TWideStringField
      FieldName = 'serie'
      Required = True
      Size = 10
    end
    object qbalanceventasidfactura: TIntegerField
      FieldName = 'idfactura'
      Required = True
    end
    object qbalanceventasfecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object qbalanceventasidarticulo: TWideStringField
      FieldName = 'idarticulo'
      Size = 50
    end
    object qbalanceventaslote: TWideStringField
      FieldName = 'lote'
      Size = 30
    end
    object qbalanceventascantidad: TFloatField
      FieldName = 'cantidad'
      DisplayFormat = '#0.000'
    end
    object qbalanceventasprecio: TFloatField
      FieldName = 'precio'
      DisplayFormat = '#0.000'
    end
    object qbalanceventasbase: TFloatField
      FieldName = 'base'
      DisplayFormat = '#0.000'
    end
    object qbalanceventastipoiva: TFloatField
      FieldName = 'tipoiva'
    end
    object qbalanceventasiva: TFloatField
      FieldName = 'iva'
      DisplayFormat = '#0.000'
    end
    object qbalanceventasdescuento: TFloatField
      FieldName = 'descuento'
    end
    object qbalanceventastotaldescuento: TFloatField
      FieldName = 'totaldescuento'
      DisplayFormat = '#0.000'
    end
    object qbalanceventastotal: TFloatField
      FieldName = 'total'
      DisplayFormat = '#0.000'
    end
    object qbalanceventasparcela: TWideStringField
      FieldName = 'parcela'
      Size = 30
    end
    object qbalanceventasmprima: TWideStringField
      FieldName = 'mprima'
      Size = 40
    end
    object qbalanceventasobtentor: TWideStringField
      FieldName = 'obtentor'
      Size = 100
    end
  end
  object dsqcampanayas: TDataSource
    DataSet = qcampanyas
    Left = 56
    Top = 192
  end
  object dsbalanceventas: TDataSource
    DataSet = qbalanceventas
    Left = 208
    Top = 192
  end
  object SaveDialog1: TSaveDialog
    Left = 464
    Top = 72
  end
  object informedb: TfrxDBDataset
    UserName = 'frxDBDataset1'
    CloseDataSource = False
    DataSource = dsbalanceventas
    BCDToCurrency = False
    Left = 416
    Top = 136
  end
  object informes: TfrxReport
    Version = '6.9.3'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 43969.737119097200000000
    ReportOptions.LastChange = 44792.471535486110000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'begin'
      ''
      'end.')
    Left = 488
    Top = 144
    Datasets = <
      item
        DataSet = informedb
        DataSetName = 'frxDBDataset1'
      end
      item
        DataSetName = 'informedbempresa'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      Frame.Typ = []
      MirrorMode = []
      object MasterData1: TfrxMasterData
        FillType = ftBrush
        Frame.Typ = []
        Height = 41.574830000000000000
        Top = 158.740260000000000000
        Width = 718.110700000000000000
        DataSet = informedb
        DataSetName = 'frxDBDataset1'
        RowCount = 0
        object Memo1: TfrxMemoView
          AllowVectorExport = True
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'FECHA')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo3: TfrxMemoView
          AllowVectorExport = True
          Left = 48.692950000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'ALBAR'#193'N DE SALIDA')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo4: TfrxMemoView
          AllowVectorExport = True
          Left = 97.385900000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'VARIEDAD')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo5: TfrxMemoView
          AllowVectorExport = True
          Left = 146.858380000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'AUSENCIA DE OLORES Y OTRAS CONT.')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo6: TfrxMemoView
          AllowVectorExport = True
          Left = 195.330860000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'LIMPIEZA E HIGIENE')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo7: TfrxMemoView
          AllowVectorExport = True
          Left = 244.803340000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'ESTADO DE MTO VEH'#205'CULO')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo8: TfrxMemoView
          AllowVectorExport = True
          Left = 293.275820000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'ESTADO DE LA CARGA')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo9: TfrxMemoView
          AllowVectorExport = True
          Left = 391.220780000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'T'#170' CAMI'#211'N')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo10: TfrxMemoView
          AllowVectorExport = True
          Left = 587.079160000000000000
          Width = 130.393749610000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'NOMBRE Y FIRMA DEL RESPONSABLE')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo11: TfrxMemoView
          AllowVectorExport = True
          Left = 342.748300000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'ETIQUETADO')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo12: TfrxMemoView
          AllowVectorExport = True
          Left = 440.693260000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'T'#170' PRODUCTO')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo13: TfrxMemoView
          AllowVectorExport = True
          Left = 489.165740000000000000
          Width = 52.913388270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            'INDICIOS DE SABOTAJE Y/O ADULTERACI'#211'N')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo27: TfrxMemoView
          AllowVectorExport = True
          Left = 541.472790000000000000
          Width = 45.354328270000000000
          Height = 41.574803150000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Fill.BackColor = clMenuBar
          HAlign = haCenter
          Memo.UTF8W = (
            #186' BRIX')
          ParentFont = False
          VAlign = vaCenter
        end
      end
      object PageHeader1: TfrxPageHeader
        FillType = ftBrush
        Frame.Typ = []
        Height = 79.370027480000000000
        Top = 18.897650000000000000
        Width = 718.110700000000000000
        object Memo26: TfrxMemoView
          AllowVectorExport = True
          Width = 718.110700000000000000
          Height = 75.590600000000000000
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
        end
        object Memo2: TfrxMemoView
          AllowVectorExport = True
          Top = 46.368380239999990000
          Width = 509.959999020000000000
          Height = 25.258322440000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -19
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.Typ = []
          HAlign = haCenter
          Memo.UTF8W = (
            'CONTROL DE EXPEDICIONES  (Rev. 01)')
          ParentFont = False
        end
        object Picture1: TfrxPictureView
          AllowVectorExport = True
          Left = 1.000000000000000000
          Top = 1.000000000000000000
          Width = 184.755410000000000000
          Height = 43.039270000000000000
          DataField = 'logo'
          DataSetName = 'informedbempresa'
          Frame.Typ = []
          HightQuality = False
          Transparent = False
          TransparentColor = clWhite
        end
        object CAMPANYA: TfrxMemoView
          AllowVectorExport = True
          Left = 514.882190000000000000
          Top = 46.354360000000000000
          Width = 150.904649020000000000
          Height = 25.258322440000000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -19
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.Typ = []
          Memo.UTF8W = (
            '[CAMPANYA]')
          ParentFont = False
        end
      end
      object DetailData1: TfrxDetailData
        FillType = ftBrush
        Frame.Typ = []
        Height = 41.574830000000000000
        Top = 222.992270000000000000
        Width = 718.110700000000000000
        DataSet = informedb
        DataSetName = 'frxDBDataset1'
        RowCount = 0
        object Memo14: TfrxMemoView
          AllowVectorExport = True
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'fecha'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          DisplayFormat.Kind = fkDateTime
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."fecha"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo15: TfrxMemoView
          AllowVectorExport = True
          Left = 48.692950000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."serie"]/[frxDBDataset1."IDA"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo16: TfrxMemoView
          AllowVectorExport = True
          Left = 97.385900000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'variedad'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."variedad"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo17: TfrxMemoView
          AllowVectorExport = True
          Left = 146.858380000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'ausencia'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."ausencia"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo18: TfrxMemoView
          AllowVectorExport = True
          Left = 195.330860000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'limpieza'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."limpieza"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo19: TfrxMemoView
          AllowVectorExport = True
          Left = 244.803340000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'estado_vehiculo'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."estado_vehiculo"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo20: TfrxMemoView
          AllowVectorExport = True
          Left = 293.275820000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'estado_carga'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."estado_carga"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo21: TfrxMemoView
          AllowVectorExport = True
          Left = 391.220780000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '+[frxDBDataset1."temp_camion"]'#186'C')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo22: TfrxMemoView
          AllowVectorExport = True
          Left = 586.960629920000000000
          Top = 26.456710000000000000
          Width = 130.393700790000000000
          Height = 15.118093150000000000
          DataField = 'nomresponsable'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."nomresponsable"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo23: TfrxMemoView
          AllowVectorExport = True
          Left = 342.748300000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataField = 'etiquetado'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."etiquetado"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo24: TfrxMemoView
          AllowVectorExport = True
          Left = 440.693260000000000000
          Width = 49.133858270000000000
          Height = 41.574803150000000000
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '+[frxDBDataset1."temp_producto"]'#186'C')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo25: TfrxMemoView
          AllowVectorExport = True
          Left = 489.165740000000000000
          Width = 52.913388270000000000
          Height = 41.574803150000000000
          DataField = 'sabotaje'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd-mmm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."sabotaje"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Picture2: TfrxPictureView
          AllowVectorExport = True
          Left = 586.960629920000000000
          Width = 130.393700790000000000
          Height = 26.456710000000000000
          Center = True
          DataField = 'firma'
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          Frame.ShadowWidth = 1.000000000000000000
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HightQuality = True
          Transparent = False
          TransparentColor = clWhite
        end
        object frxDBDataset1brix: TfrxMemoView
          AllowVectorExport = True
          Left = 541.606299210000000000
          Width = 45.354360000000000000
          Height = 41.574803150000000000
          DataSet = informedb
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = '%g'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -7
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."brix"]')
          ParentFont = False
          VAlign = vaCenter
        end
      end
    end
  end
  object qseries: TZReadOnlyQuery
    Connection = DM.DBagrigest
    SQL.Strings = (
      'select * from series_numericas order by fechainicio desc,id')
    Params = <>
    Left = 592
    Top = 96
    object qserieside: TIntegerField
      FieldName = 'ide'
      Required = True
    end
    object qseriesid: TWideStringField
      FieldName = 'id'
      Required = True
      Size = 10
    end
    object qseriesfechainicio: TDateField
      FieldName = 'fechainicio'
      Required = True
    end
    object qseriesfechafin: TDateField
      FieldName = 'fechafin'
      Required = True
    end
    object qseriesnum_pedcliente: TIntegerField
      FieldName = 'num_pedcliente'
      Required = True
    end
    object qseriesnum_albaran: TIntegerField
      FieldName = 'num_albaran'
      Required = True
    end
    object qseriesnum_factura: TIntegerField
      FieldName = 'num_factura'
      Required = True
    end
    object qseriesnum_expedicion: TIntegerField
      FieldName = 'num_expedicion'
      Required = True
    end
    object qseriesnum_pedproveedor: TIntegerField
      FieldName = 'num_pedproveedor'
      Required = True
    end
    object qseriesimp_albaran: TWideStringField
      FieldName = 'imp_albaran'
      Size = 500
    end
    object qseriesimp_factura: TWideStringField
      FieldName = 'imp_factura'
      Size = 500
    end
    object qseriesactivo: TIntegerField
      FieldName = 'activo'
      Required = True
    end
    object qseriesnum_presupuesto: TIntegerField
      FieldName = 'num_presupuesto'
      Required = True
    end
    object qseriesseriecontable: TWideStringField
      FieldName = 'seriecontable'
      Size = 10
    end
  end
  object dsqseries: TDataSource
    DataSet = qseries
    Left = 592
    Top = 208
  end
end