| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | CTBA102,CTBA103,CTBA105,CTBXVLD,CTBA104,CTBXMI |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46829 |
O ponto de entrada CT105TOK é utilizado para validar o lançamento contábil após a validação realizada pela função MSGETDB. Esse ponto de entrada permite customizar a validação contábil, verificando, por exemplo, se os valores de débito e crédito estão corretos ou se outras regras contábeis específicas precisam ser aplicadas. O retorno da função é um valor booleano, onde true indica que a validação foi bem-sucedida, e false sinaliza que o lançamento contém inconsistências e não pode ser processado.
Esse ponto de entrada oferece flexibilidade para os usuários ajustarem as regras de negócios, garantindo que as validações de conformidade específicas sejam atendidas.
lRet := ExecBlock("CT105TOK",.f.,.f.,{nValDeb,nValCrd,;
aTotRdpe[1][1],;
nTotInf }) |
User Function CT105TOK()
Local nValDeb := PARAMIXB[1]
Local nValCrd := PARAMIXB[2]
Local nTotRdpe := PARAMIXB[3] // valor a debito
Local nTotInf := PARAMIXB[4] //
Local lRet := .T.
// Verifica se há divergência no valor de lançamento e total de débitos
If nTotInf != nTotRdpe // Exemplo de verificação de valores totais
MsgAlert("Total de débito não confere. Verifique o lançamento.")
Return .F.
EndIf
Return lRet |
|