object TnrwReport
  Page.MarginLeft = 0.090000000000000000
  Page.MarginRight = 0.100000000000000000
  Page.PageHeight = 11.690000000000000000
  Page.PageWidth = 8.270000000000000000
  Page.PageSize = npqPageA4
  DllName = 'NPRO\nProORProtocoloEmpresa'
  DllNameSource = 'NPRO\nProORProtocoloEmpresa.dpr'
  UseTable = nrwOnlyDLL
  Grid = nrwGridNone
  object TnpqPowerParam
    object TnpqParamItem
      Alias = 'pDataInicial'
      Value = '01/01/2007'
      ParType = npqptUser
      Caption = 'Data Inicial'
      Position = 1
      Requerid = True
      Dicionario = 'DATAINICIAL'
    end
    object TnpqParamItem
      Alias = 'pDataFinal'
      Value = '31/12/2007'
      ParType = npqptUser
      Caption = 'Data Final'
      Position = 2
      Requerid = True
      Dicionario = 'DATAFINAL'
    end
    object TnpqParamItem
      Alias = 'pCodigoEmpresa'
      Value = ' '
      ParType = npqptUser
      Caption = 'Empresa'
      Position = 3
      ConsultFields = 'CODIGOEMPRESA'
      ConsultMultSelect = True
      Dicionario = 'CODIGOEMPRESA'
    end
    object TnpqParamItem
      Alias = 'pCodigoEstab'
      Value = ' '
      ParType = npqptUser
      Caption = 'Filial'
      Position = 4
      ConsultFields = 'CODIGOESTAB'
      ConsultMultSelect = True
      Dicionario = 'CODIGOESTAB'
    end
    object TnpqParamItem
      Alias = 'pCodigoRota'
      Value = ' '
      ParType = npqptUser
      Position = 5
      ConsultMultSelect = True
      Dicionario = 'CODIGOROTA'
    end
    object TnpqParamItem
      Alias = 'pCodigoProtocolo'
      Value = ' '
      ParType = npqptUser
      Position = 6
      ConsultMultSelect = True
      Dicionario = 'CODIGOPROTOCOLO'
    end
    object TnpqParamItem
      Alias = 'pTipoPro'
      ParType = npqptUser
      Caption = 'Tipo'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Ambos=0;Guias=1;Documentos=2;'
      Position = 7
      Hint = 'Informe o tipo do protocolo'
    end
    object TnpqParamItem
      Alias = 'pFormaEntrega'
      Value = '0'
      ParType = npqptUser
      Caption = 'Forma Entrega'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Todas=0;Retirado=1;Entregue em M'#227'os=2;Entregue via Internet=3;'
      Position = 8
      Hint = 'Informe a forma de entrega do protocolo'
    end
    object TnpqParamItem
      Alias = 'pNatureza'
      Value = '0'
      ParType = npqptUser
      Caption = 'Natureza'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Ambas=0;Saida=1;Entrada=2;'
      Position = 9
      Hint = 'Informe a natureza do protocolo'
    end
    object TnpqParamItem
      Alias = 'pEscrit'
      Value = 'Brasil Sistemas Ltda'
      ParType = npqptUser
      Caption = 'Nome do Escrit'#243'rio'
      CtrlType = ntcLink
      CtrlNameValues = 'Nome do Escrit'#243'rio ou Empresa'
      Position = 10
      Consult = 'nGemDCEmpresa'
      ConsultFields = 'NomeEmpresa'
    end
    object TnpqParamItem
      Alias = 'pOrdenacao'
      Value = '0'
      ParType = npqptUser
      Caption = 'Ordena'#231#227'o'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Nenhuma=0;N'#186' Protocolo=1;Data de Emiss'#227'o=2;Empresa=3;Filial=4'
      Position = 11
      Requerid = True
      Hint = 'Informe a ordena'#231#227'o do relat'#243'rio'
    end
    object TnpqParamItem
      Alias = 'pNomeEmpresa'
      Value = 'Empresa Daniel 2007 RS - Matriz'
      ParType = npqptUser
      Position = 12
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pDataLcto'
      Value = '14/08/2007'
      ParType = npqptUser
      Position = 13
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pDescricao'
      Value = 'ISS'
      ParType = npqptUser
      Position = 14
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pDataVcto'
      Value = '31/08/2007'
      ParType = npqptUser
      Position = 15
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pValor'
      Value = '12,00'
      ParType = npqptUser
      Position = 16
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pPag'
      ParType = npqptUser
      Position = 17
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pTexto'
      ParType = npqptUser
      Position = 18
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pObservacao'
      Value = 'Observa'#231#227'o Qualquer'
      ParType = npqptUser
      Position = 19
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pDescrProtocolo'
      Value = 
        'Protocolo: 00012 - D'#233'bitos Municipais - Gerado em 14/08/2007 17:' +
        '42:40'
      ParType = npqptUser
      Position = 20
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pCompet'
      ParType = npqptUser
      Position = 21
      Visible = False
    end
  end
  object TnpqSection
    Position = 100
    SectionIndex = 1
  end
  object TnpqSection
    Position = 148
    SectionIndex = 8
  end
  object TnpqSection
    Position = 166
    SectionIndex = 9
  end
  object TnpqSection
    Position = 182
    SectionIndex = 10
  end
  object TnpqSection
    Position = 200
    SectionIndex = 11
  end
  object TnpqSection
    Position = 250
    SectionIndex = 12
  end
  object TnpqShape
    Name = 'Linha horizontal2'
    Top = 37
    Left = 16
    Height = 4
    Width = 765
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqShape
    Name = 'Linha Vertical1'
    Top = 39
    Left = 9
    Height = 61
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical2'
    Top = 39
    Left = 773
    Height = 61
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Ret'#226'ngulo2'
    Top = 100
    Left = 16
    Height = 18
    Width = 765
    Pen.Width = 0
    Brush.Color = clSilver
    ObjectType = npqObjectRectangle
  end
  object TnpqLabel
    Name = 'Etiqueta9'
    Top = 102
    Left = 257
    Height = 14
    Width = 258
    Alignment = npqaCenter
    Caption = 'Documentos Entregues'
    Color = clSilver
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqShape
    Name = 'Linha Vertical18'
    Top = 148
    Left = 9
    Height = 18
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical19'
    Top = 150
    Left = 94
    Height = 15
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical9'
    Top = 150
    Left = 395
    Height = 16
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical11'
    Top = 150
    Left = 465
    Height = 16
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical45'
    Top = 150
    Left = 549
    Height = 15
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical7'
    Top = 148
    Left = 773
    Height = 18
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha horizontal3'
    Top = 164
    Left = 17
    Height = 2
    Width = 764
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqShape
    Name = 'Linha Vertical3'
    Top = 166
    Left = 9
    Height = 16
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical4'
    Top = 166
    Left = 94
    Height = 16
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical8'
    Top = 166
    Left = 395
    Height = 16
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical17'
    Top = 166
    Left = 465
    Height = 16
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical21'
    Top = 166
    Left = 549
    Height = 16
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical23'
    Top = 166
    Left = 773
    Height = 16
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha horizontal5'
    Top = 180
    Left = 17
    Height = 2
    Width = 535
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqShape
    Name = 'Linha Vertical44'
    Top = 182
    Left = 9
    Height = 18
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical54'
    Top = 182
    Left = 549
    Height = 18
    Width = 4
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical43'
    Top = 182
    Left = 773
    Height = 18
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha horizontal13'
    Top = 198
    Left = 17
    Height = 2
    Width = 763
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqShape
    Name = 'Linha horizontal1'
    Top = 248
    Left = 16
    Height = 2
    Width = 764
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqLabel
    Name = 'etiTitulo'
    Top = 74
    Left = 19
    Height = 22
    Width = 759
    Alignment = npqaCenter
    Caption = 'Protocolo por Empresa'
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqLabel
    Name = 'Etiqueta4'
    Top = 43
    Left = 567
    Height = 16
    Width = 205
    Alignment = npqaRightJustify
    Caption = 'Per'#237'odo: [pDataInicial] a [pDataFinal]'
  end
  object TnpqLabel
    Name = 'Etiqueta6'
    Top = 57
    Left = 567
    Height = 16
    Width = 205
    Alignment = npqaRightJustify
    Caption = '@var(gemVTempoPag;@PageNo)'
  end
  object TnpqShape
    Name = 'Linha Vertical6'
    Top = 116
    Left = 9
    Height = 32
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'etiLinha1'
    Top = 148
    Left = 16
    Height = 2
    Width = 764
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqLabel
    Name = 'Etiqueta24'
    Top = 150
    Left = 555
    Height = 16
    Width = 217
    Alignment = npqaCenter
    Caption = 'Visto do Cliente'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqLabel
    Name = 'Etiqueta7'
    Top = 43
    Left = 24
    Height = 16
    Width = 205
    Caption = 'Controle de Protocolos'
  end
  object TnpqLabel
    Name = 'Etiqueta12'
    Top = 150
    Left = 98
    Height = 16
    Width = 298
    Caption = 'Descri'#231#227'o'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqLabel
    Name = 'Etiqueta5'
    Top = 166
    Left = 98
    Height = 16
    Width = 298
    Caption = '[pDescricao]'
  end
  object TnpqLabel
    Name = 'Etiqueta11'
    Top = 150
    Left = 399
    Height = 16
    Width = 66
    Alignment = npqaRightJustify
    Caption = 'Vencimento'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqLabel
    Name = 'Etiqueta22'
    Top = 166
    Left = 399
    Height = 16
    Width = 66
    Alignment = npqaCenter
    Caption = '[pDataVcto]'
  end
  object TnpqLabel
    Name = 'Etiqueta30'
    Top = 150
    Left = 470
    Height = 16
    Width = 79
    Alignment = npqaRightJustify
    Caption = 'Valor'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqLabel
    Name = 'Etiqueta26'
    Top = 166
    Left = 470
    Height = 16
    Width = 79
    Alignment = npqaRightJustify
    Caption = '[pValor]'
  end
  object TnpqLabel
    Name = 'Etiqueta28'
    Top = 150
    Left = 21
    Height = 16
    Width = 74
    Caption = 'Data Lcto'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqShape
    Name = 'Linha Vertical5'
    Top = 200
    Left = 9
    Height = 50
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqShape
    Name = 'Linha Vertical12'
    Top = 200
    Left = 773
    Height = 50
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqLabel
    Name = 'Etiqueta3'
    Top = 233
    Left = 24
    Height = 16
    Width = 751
    Caption = '[pTexto]'
  end
  object TnpqShape
    Name = 'Linha Vertical10'
    Top = 115
    Left = 773
    Height = 33
    Width = 14
    Brush.Style = bsClear
    ObjectType = npqObjectVertLine
  end
  object TnpqLabel
    Name = 'Etiqueta13'
    Top = 217
    Left = 24
    Height = 16
    Width = 751
    Caption = '[pNomeEmpresa]'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqShape
    Name = 'Linha horizontal4'
    Top = 215
    Left = 17
    Height = 2
    Width = 762
    Brush.Style = bsClear
    ObjectType = npqObjectHorzLine
  end
  object TnpqLabel
    Name = 'Etiqueta8'
    Top = 183
    Left = 555
    Height = 16
    Width = 224
    Caption = 
      'Ass.: __________________________________________________________' +
      '___________________________'
  end
  object TnpqLabel
    Name = 'Etiqueta10'
    Top = 166
    Left = 20
    Height = 16
    Width = 75
    Caption = '[pDataLcto]'
  end
  object TnpqLabel
    Name = 'Etiqueta73'
    Top = 166
    Left = 555
    Height = 16
    Width = 224
    Caption = '[pTexto]'
  end
  object TnpqMemo
    Name = 'Memorando2'
    Top = 118
    Left = 20
    Height = 29
    Width = 751
    Memo.Strings = (
      
        'Declaramos para os devidos fins, que recebemos do(a) [pEscrit], ' +
        'os documentos abaixo descritos,  estando ciente dos valores e ve' +
        'ncimentos dos mesmos. ')
  end
  object TnpqLabel
    Name = 'Etiqueta1'
    Top = 200
    Left = 24
    Height = 16
    Width = 751
    Caption = '[pDescrProtocolo]'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
  end
  object TnpqParamItem
    Alias = 'ReportFor'
    Value = '1'
    ParType = npqptReportFor
    Caption = 'Modo Impress'#227'o'
    CtrlType = ntcComboBox
    CtrlNameValues = 'Gr'#225'fico=1;Texto=2'
    Position = 0
    Visible = False
    Hint = 
      'Para impress'#227'o do relat'#243'rio em "laser" ou "jato de tinta" use "G' +
      'r'#225'fico", ou para "matricial" use "Texto"'
  end
end
