...
LP | Fato Gerador | ON | OFF (CTBAFIN) |
|---|
| 589 | Cancelamento de compensação de títulos contas a pagar | X | X |
| 597 | Compensação contas a pagar | X | X |
...
Contabilização por registro da tabela
A contabilização da Compensação de Contas a Pagar (FINA340) quando configurada no lançamento padrão com a regra da tabela SE5, estará posicionada no registro que possui o preenchimento abaixo:
...
...
...
Esse registro é referente ao título que foi a a contra partida do PA/NDF, exemplo: NF, TX, DP. Portanto, o posicionamento das tabelas SE2, SA2 e SED estarão disponíveis de acordo com o título referente ao SE5 posicionado.
Contabilização por Variáveis
...
| Totvs custom tabs box |
|---|
| tabs | Online,Off-line,Exemplo |
|---|
| ids | online,offline,exemplo |
|---|
|
| Totvs custom tabs box items |
|---|
| default | yes |
|---|
| referencia | online |
|---|
| A seguir a lista de variáveis que podem ser utilizadas na configuração do Lançamento Padrão 597 (Compensação Contas a pagar) para contabilização online da Compensação a pagar (FINA340): VALOR - Armazena o valor compensado VALOR2 - Valor de Acréscimo VALOR3 - Valor de Decréscimo VALOR4 - Variação da correção monetária VLRINSTR - Armazena o valor compensado nSldReal - Armazena o valor compensado na moeda correspondente do título ABATIMENTO - Valores de abatimentos REGVALOR - Recno do registro atual STRLCTPAD - Chave do título principal+número do documento Essas variáveis são alimentadas com os dados do registro posicionado de onde partiu a compensação. Enquanto que para os registros selecionados para compensar, é feita a contabilização pela SE5. Na contabilização on-line, não é possível alterar a filial de contabilização, sendo contabilizado na filial do processo de compensação (filial do título de partida da compensação).
Exemplo: Selecionar a NF1 e clicado em Compensar. Na tela de seleção dos títulos a compensar, selecionar a PA1 e PA2. Ao contabilizar on-line, as informações da NF1 estarão nas variáveis de contabilização. Já as informações da compensação de cada PA, terão seus respectivos registros da SE5 posicionados.
Variáveis Estorno: VALOR - Armazena o valor compensado VLRINSTR - Armazena o valor compensado |
| Totvs custom tabs box items |
|---|
| default | no |
|---|
| referencia | offline |
|---|
| Ao forçarmos o posicionamento dos títulos a serem compensados, a contabilização trará os dois títulos (ex: NF x PA), contabilizando o valor dos dois títulos, podendo gerar duplicidade na contabilização. As variáveis disponíveis para a contabilização off-line (CTBAFIN): VALOR - Armazena o valor compensado VALOR2 - Valor de Acréscimo VALOR3 - Valor de Decréscimo REGVALOR - RECNO do registro atual STRLCTPAD - Chave do título principal+número do documento Obs.: Estas variaveis estão disponiveis tanto para a compensação quanto para o estorno. Essas variáveis são alimentadas com os dados do registro posicionado de onde partiu a compensação. Enquanto que para os registros selecionados para compensar, é feita a contabilização pela SE5. |
| Totvs custom tabs box items |
|---|
| default | no |
|---|
| referencia | exemplo |
|---|
| Exemplo: LP597 Preencher no campo CT5_HIST: U_HIST597() Criar a seguinte função:
| Bloco de código |
|---|
| language | java |
|---|
| theme | Midnight |
|---|
| firstline | 1 |
|---|
| linenumbers | true |
|---|
| User function HIST597()
Local aSaveSE5 := SE5->(GetArea())
Local aSaveSE2 := SE2->(GetArea())
Local xRet := Nil
If REGVALOR <> 0
SE2->(dbGoto(REGVALOR))
xRet:= "TESTE TIPO: "+ SE2->E2_TIPO + " RECNO: "+ ALLTRIM(STR(SE2->(RECNO())))
Else
xRet:= "TESTE TIPO: "+ SE5->E5_TIPO + " TIPODOC: "+SE5->E5_TIPODOC + " RECNO: "+ ALLTRIM(STR(SE5->(RECNO())))
Endif
RestArea(aSaveSE2)
RestArea(aSaveSE5)
Return(xRet) |
|
|
...