...
Implementada melhoria com a criação do Ponto de Entrada PLQRYTISS.
O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.
Totvs custom tabs box |
---|
tabs | Passo 01, Passo 02, Passo 03, Passo 04 |
---|
ids | passo1,passo2 |
---|
|
Totvs custom tabs box items |
---|
default | yes |
---|
referencia | passo1 |
---|
| 1. Aplique o ponto de entrada PLQRYTISS. |
Totvs custom tabs box items |
---|
default | no |
---|
referencia | passo2 |
---|
| 2. O mesmo é acionado na geração dos demonstrativos de pagamento/análise de conta. |
|
Nota |
---|
|
Não alterar o nome das colunas no Select no Relatório de Pagamento, pois é utilizado posteriormente no código pra geração correta do demonstrativo, segue nome das colunas destacados em negrito: Sum(BD7_VALORI) A, SUM(BD7_VLRMAN) M, Sum(BD7_VLRPAG) P, Sum(BD7_VLRGLO)+Sum(BD7_VLRGTX) G, SUM(E2_IRRF) / count(1) IR, SUM(E2_ISS) / count(1) ISS, SUM(E2_INSS) / count(1) INSS, SUM(E2_PIS) / count(1) PIS, SUM(E2_COFINS) / count(1) COF, SUM(E2_CSLL) / count(1) CSLL |
Ponto de Entrada PLQRYTISS
Programa fonte: | PLSTISSON |
---|
Função: | Informe o Nome do(s) produto(s) a ser utilizado ou “Todos” |
---|
Parâmetros: | Nome | Tipo | Descrição | Obrigatório |
---|
cTipRel | Caracter | Tipo de demonstrativo | Sim | cSql | Caracter | Query a ser modificada | Sim | cCodRDA | Caracter | Código da RDA | Não | cdatPag | Caracter | Data de Vencimento real do Titulo | Não | cCompeten | Caracter | Competência do Vencimento real do Titulo | Não | cPEGinSql | Caracter | Código da PEG | Não |
|
---|
Retorno | Nome | Tipo | Descrição | Obrigatório |
---|
cSql | Caracter | Query do demonstrativo modificada | Sim |
|
---|
Exemplo:
Bloco de código |
---|
language | c# |
---|
firstline | 1 |
---|
title | Exemplo |
---|
linenumbers | true |
---|
|
#Include 'Protheus.ch'
User Function PLQRYTISS()
LOCAL cTipRel := paramixb[1]
LOCAL cSql := paramixb[2]
LOCAL cCodRDA := paramixb[3]
LOCAL cdatPag := paramixb[4]
LOCAL cCompeten := paramixb[5]
LOCAL cPEGinSql := paramixb[6]
if cTipRel =='1' //Demonstrativo de pagamento
//Regra 1
ElseIf cTipRel == '4'//Demonstrativo de analise de conta
//Regra 2
Endif
return cSql |
...