object TnrwReport
  DllName = 'nCtr\nCtrORDebitoGPS'
  DllNameSource = 'nCtr\nCtrORDebitoGPS.dpr'
  UseTable = nrwOnlyDLL
  Grid = nrwGridNone
  ChaveQuebraPagina = '[pControleCustoEmpresa]'
  object TnpqPowerParam
    SeparadoresUsar = False
    object TnpqParamItem
      Alias = 'pDataInicial'
      Value = '01/05/2008'
      ParType = npqptUser
      Caption = 'Data Inicial'
      Position = 1
      Requerid = True
      Dicionario = 'DICDATA'
    end
    object TnpqParamItem
      Alias = 'pDataFinal'
      Value = '31/05/2008'
      ParType = npqptUser
      Caption = 'Data Final'
      Position = 2
      Requerid = True
      Dicionario = 'DICDATA'
    end
    object TnpqParamItem
      Alias = 'pQuantCopia'
      Value = '1'
      ParType = npqptUser
      Caption = 'Quantidade de C'#243'pias'
      Position = 3
      Requerid = True
      Dicionario = 'DICINTEIRO4'
    end
    object TnpqParamItem
      Alias = 'pImpCodEmp'
      Value = '1'
      ParType = npqptUser
      Caption = 'Imprimir C'#243'digo Empresa'
      Position = 4
      Dicionario = 'DICSIMNAO'
      Hint = 'Imprimir c'#243'digo empresa'
    end
    object TnpqParamItem
      Alias = 'pImpValorTotal'
      Value = '1'
      ParType = npqptUser
      Caption = 'Impress'#227'o do Valor Total'
      Position = 5
      Requerid = True
      Dicionario = 'DICSIMNAO'
      Hint = 'Informe se deseja imprimir o valor total'
    end
    object TnpqParamItem
      Alias = 'pCalcularMultaJuros'
      Value = '1'
      ParType = npqptUser
      Caption = 'Calcular Multa/Juros'
      CtrlType = ntcComboBox
      Position = 6
      Requerid = True
      Dicionario = 'DICSIMNAO'
      Hint = 'Informe se deseja calcular multa/juros'
    end
    object TnpqParamItem
      Alias = 'pDataPgtoAtraso'
      Value = '28/03/2007'
      ParType = npqptUser
      Caption = 'Data Pagamento Atraso'
      Position = 7
      Requerid = True
      Dicionario = 'DICDATA'
      Expressoes.ExpressaoEnabled = 'IGUAL( PCALCULARMULTAJUROS , 1 )'
      Expressoes.ExpressaoRequired = 'IGUAL( PCALCULARMULTAJUROS , 1 )'
    end
    object TnpqParamItem
      Alias = 'pDeclGFIP'
      Value = '1'
      ParType = npqptUser
      Caption = 'Declarado GFIP'
      CtrlType = ntcComboBox
      CtrlNameValues = 
        'N'#227'o declarado (multa 8, 14 ou 20%)=1;Declarado/Dom'#233'sticos/Dispen' +
        'sados (multa 4, 7, 10%)=2'
      Position = 8
      Visible = False
    end
    object TnpqParamItem
      Alias = 'pImpRemun'
      Value = '1'
      ParType = npqptUser
      Caption = 'Imprimir Remunera'#231#227'o Terceiro/Funcion'#225'rio'
      Position = 9
      Requerid = True
      Dicionario = 'DICSIMNAO'
      Hint = 'Informe se deseja imprimir o valor da remunera'#231#227'o do terceiro'
    end
    object TnpqParamItem
      Alias = 'pImpGPSPaga'
      Value = '0'
      ParType = npqptUser
      Caption = 'Imprimir GPS Paga'
      Position = 10
      Requerid = True
      Dicionario = 'DICSIMNAO'
      Hint = 
        'Informe se deseja imprimir somente as GPS'#39's que n'#227'o possuem cr'#233'd' +
        'itos v'#237'nculados'
    end
    object TnpqParamItem
      Alias = 'pImpInferior'
      Value = '0'
      ParType = npqptUser
      Caption = 'Imprimir inferior limite'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Sim=1;Sim (Somente meses anteriores)=2;N'#227'o=0'
      Position = 11
      Requerid = True
    end
    object TnpqParamItem
      Alias = 'pFiltroTipoGPS'
      Value = '1;2;11;3;4;5;6;7;8'
      ParType = npqptUser
      Caption = 'Tipo GPS'
      CtrlType = ntcCheckListBoxScroll
      CtrlNameValues = 
        'Folha Normal=1;13'#186' Sal'#225'rio=2;Folha Complementar - Diferen'#231'a de S' +
        'al'#225'rio=10;Pagamento com Reten'#231#227'o Outras Empresas=11;Pagamento com Reten'#231#227'o Terceiro=3;Recebimentos ' +
        'com Reten'#231#227'o=4;Reclamat'#243'ria Trabalhista, Concilia'#231#227'o Pr'#233'via ou D' +
        'iss'#237'dio Coletivo=9;Funcion'#225'rio Folha Normal=5;Funcion'#225'rio 13'#186' Sa' +
        'l'#225'rio=6;Terceiro Folha Normal=7;Terceiro 13'#186' Sal'#225'rio=8;'
      Position = 12
    end
    object TnpqParamItem
      Alias = 'pCodigoGrupoProc'
      ParType = npqptUser
      Caption = 'Grupo Processamento'
      Position = 13
      Visible = False
      Consult = 'nfpaDCGrupoProcessam'
      ConsultFields = 'CodigoGrupoProc'
    end
    object TnpqParamItem
      Alias = 'pCodigoEmpresa'
      Value = '2'
      ParType = npqptUser
      Position = 14
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pCodigoEstab'
      Value = '1'
      ParType = npqptUser
      Position = 15
      ConsultFields = 'CodigoEstab'
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pClassifOrgan'
      Value = ' '
      ParType = npqptUser
      Position = 16
      ConsultFields = 'ClassifOrgan'
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pCodigoOutEmp'
      Value = ' '
      ParType = npqptUser
      Position = 17
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pCodigoFuncContr'
      Value = ' '
      ParType = npqptUser
      Position = 18
      ConsultFields = 'CodigoFuncContr'
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pCodigoTerc'
      Value = ' '
      ParType = npqptUser
      Position = 19
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pChaveDebitoGPS'
      Value = ' '
      ParType = npqptUser
      Position = 20
      Consult = 'nCtrDCDebitoGPS'
      ConsultFields = 'ChaveDebitoGPS'
      ConsultMultSelect = True
    end
    object TnpqParamItem
      Alias = 'pCodigoImposto'
      Value = ' '
      ParType = npqptUser
      Position = 21
    end
    object TnpqParamItem
      Alias = 'pVariacaoImposto'
      Value = ' '
      ParType = npqptUser
      Position = 22
    end
    object TnpqParamItem
      Alias = 'pOmiteObs'
      Value = '0'
      ParType = npqptUser
      Caption = 'Omitir Observa'#231#227'o'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Sim=1;N'#227'o=0'
      Position = 23
      Requerid = True
      Hint = 'Omite a Observa'#231#227'o'
    end
    object TnpqParamItem
      Alias = 'pModelo'
      Value = '1'
      ParType = npqptUser
      Caption = 'Modelo'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Gr'#225'fico=1;Pr'#233'-Impresso=2;Continuo=3'
      Position = 24
      Requerid = True
      Hint = 'Informe o modelo do relat'#243'rio'
    end
    object TnpqParamItem
      Alias = 'pOrdenacaoUm'
      Value = '1'
      ParType = npqptUser
      Caption = 'Ordena'#231#227'o'
      CtrlType = ntcComboBox
      CtrlNameValues = 
        'Empresa + Tipo GPS=1;Nome + Tipo GPS=2;Terceiro + Tipo GPS=3;Nom' +
        'e Terceiro + Tipo GPS=4;CNPJ=5'
      Position = 25
      ConsultMultSelect = True
      Expressoes.ExpressaoVisible = 'IN( PFILTROTIPOGPS , [ 7 , 8 ] )'
    end
    object TnpqParamItem
      Alias = 'pOrdenacaoDois'
      Value = '1'
      ParType = npqptUser
      Caption = 'Ordena'#231#227'o'
      CtrlType = ntcComboBox
      CtrlNameValues = 'Empresa + Tipo GPS=1;Nome + Tipo GPS=2;CNPJ=5'
      Position = 26
      ConsultMultSelect = True
      Expressoes.ExpressaoVisible = 'NOT( IN( PFILTROTIPOGPS , [ 7 , 8 ] ) )'
      Expressoes.ExpressaoValue = 'IF( DIFERENTE( PFILTROTIPOGPS , 7 ) , 1 , 0 )'
      Expressoes.ExpressaoClear = 'IN( PFILTROTIPOGPS , [ 7 , 8 ] )'
    end
    object TnpqParamItem
      Alias = 'pControleCustoEmpresa'
      ParType = npqptUser
      Position = 27
      Visible = False
    end
  end
  object TnpqSection
    Position = 86
    SectionIndex = 8
  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
