DT PE Manipular a Query que Busca os Reembolsos dos Beneficiários no Imposto de Renda

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

Necessidade de alterar a query que realiza a busca pelos reembolsos dos beneficiários no relatório de demonstrativo de imposto de renda (PLSR997).

03. SOLUÇÃO

Implementado três pontos de entrada onde será possível manipular as querys que buscam os reembolsos dos beneficiários no contas a receber, contas a pagar e folha de pagamento (situação quando não houver títulos).

04. DEMAIS INFORMAÇÕES

Ponto de Entrada: PL997RRE

Descrição: Esse ponto de entrada é chamado a cada cliente financeiro encontrado, para buscar reembolsos no contas a receber.

Parâmetros: PARAMIXB com 7 posição

• • PARAMIXB[1]: Query do Padrão (Tipo Caracter)
  • PARAMIXB[2]: Operadora (Tipo Caracter)
  • PARAMIXB[3]: Empresa de (Tipo Caracter)
  • PARAMIXB[4]: Empresa até (Tipo Caracter)
  • PARAMIXB[5]: Código do cliente (Tipo Caracter)
  • PARAMIXB[6]: Código da loja do cliente(Tipo Caracter)
  • PARAMIXB[7]: Ano (Tipo Caracter)

Retorno: String (Query customizada)

#Include "Protheus.ch"

User Function PL997RRE()

    Local cQueryCustom := ""
    Local cQueryPadrao := PARAMIXB[1]
    Local cOperadora := PARAMIXB[2]
    Local cDeEmpresa := PARAMIXB[3]
    Local cAteEmpresa := PARAMIXB[4]
    Local cCodCliente := PARAMIXB[5]
    Local cLojaCliente := PARAMIXB[6]
    Local cAno := PARAMIXB[7]

    // Tratamento da query que realiza a busca dos reembolsos do Contas a Receber
    cQueryCustom := cQueryPadrao

Return cQueryCustom 

Ponto de Entrada: PL997RPA

Descrição: Esse ponto de entrada é chamado uma vez, para realizar a busca de reembolsos no contas a pagar.

Parâmetros: PARAMIXB com 7 posição

• • PARAMIXB[1]: Query do Padrão (Tipo Caracter)
  • PARAMIXB[2]: Operadora (Tipo Caracter)
  • PARAMIXB[3]: Empresa de (Tipo Caracter)
  • PARAMIXB[4]: Empresa até (Tipo Caracter)
  • PARAMIXB[5]: Matricula de (Tipo Caracter)
  • PARAMIXB[6]: Matricula até (Tipo Caracter)
  • PARAMIXB[7]: Ano (Tipo Caracter)

Retorno: String (Query customizada)

#Include "Protheus.ch"

User Function PL997RPA()

    Local cQueryCustom := ""
    Local cQueryPadrao := PARAMIXB[1]
    Local cOperadora := PARAMIXB[2]
    Local cDeEmpresa := PARAMIXB[3]
    Local cAteEmpresa := PARAMIXB[4]
    Local cDeMatricula := PARAMIXB[5]
    Local cAteMatricula := PARAMIXB[6]
    Local cAno := PARAMIXB[7]

    // Tratamento da query que realiza a busca dos reembolsos do Contas a pagar
    cQueryCustom := cQueryPadrao

Return cQueryCustom

Ponto de Entrada: PL997RFO

Descrição: Esse ponto de entrada é chamado para realizar a busca dos reembolsos para folha de pagamento, ou seja, quando não é encontrado nenhum título no financeiro.

Parâmetros: PARAMIXB com 7 posição

• • PARAMIXB[1]: Query do Padrão (Tipo Caracter)
  • PARAMIXB[2]: Operadora (Tipo Caracter)
  • PARAMIXB[3]: Empresa de (Tipo Caracter)
  • PARAMIXB[4]: Empresa até (Tipo Caracter)
  • PARAMIXB[5]: Contrato de (Tipo Caracter)
  • PARAMIXB[6]: Contrato até (Tipo Caracter)
  • PARAMIXB[7]: Subcontrato de (Tipo Caracter)
  • PARAMIXB[8]: Subcontrato até (Tipo Caracter)
  • PARAMIXB[9]: Matricula de (Tipo Caracter)
  • PARAMIXB[10]: Matricula até (Tipo Caracter)
  • PARAMIXB[11]: Ano (Tipo Caracter)

Retorno: String (Query customizada)

#Include "Protheus.ch"

User Function PL997RFO()

    Local cQueryCustom := ""
    Local cQueryPadrao := PARAMIXB[1]
    Local cOperadora := PARAMIXB[2]
    Local cDeEmpresa := PARAMIXB[3]
    Local cAteEmpresa := PARAMIXB[4]
    Local cDeContrato := PARAMIXB[5]
    Local cAteContrato := PARAMIXB[6]
    Local cDeSubContrato := PARAMIXB[7]
    Local cAteSubContrato := PARAMIXB[8]
    Local cDeMatricula := PARAMIXB[9]
    Local cAteMatricula := PARAMIXB[10]
    Local cAno := PARAMIXB[11]

    // Tratamento da query que realiza a busca dos reembolsos para folha de pagamento
    cQueryCustom := cQueryPadrao

Return cQueryCustom

05. ASSUNTOS RELACIONADOS

        Não se aplica