| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | ATFA250 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
Este ponto de entrada é chamado logo antes de a contabilização ser feita, após os registros de ativos terem sido atualizados no sistema. É uma oportunidade para adicionar ajustes ou validações nos registros, como cálculos extras ou verificações antes de que os dados sejam lançados nos sistemas contábeis.
If ExistBlock("AF250GRV") // PONTO DE ENTRADA ANTES DA COTABILIZACAO
Execblock("AF250GRV",.F.,.F.,Acols[nX])
EndIf |
// Implementação da função do ponto de entrada AF250GRV
User Function AF250GRV()
// Exemplo: adicionar uma verificação de integridade nos dados de um ativo
Local aCols := PARAMIXB[1] // Array de colunas com dados dos ativos
Local nPosICMS := Ascan(aHeader, {|x| Alltrim(x[2]) == "N1_ICMSAPR" })
Local nICMS := 0
Local i := 0
For i := 1 To Len(aCols)
// Verifica se o valor de ICMS é maior que um valor permitido
If aCols[i][nPosICMS] > 10000
// Gera uma mensagem de alerta
Help(" ", 1, "AF250_ALERT",, "O valor de ICMS ultrapassa o limite permitido.", 1, 0)
EndIf
Next i
Return |
|