Producto: |
TOTVS Backoffice
|
Línea de producto: | Línea Protheus |
Segmento: | Servicios |
Módulo: | TOTVS Backoffice (Línea Protheus) - Activo fijo (SIGAATF)
|
Función: | ATFA250 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46030 |
Este punto de entrada se llama justo antes de que se haga la contabilización, después de que los registros de activos se hayan actualizado en el sistema. Es una oportunidad para agregar ajustes o validaciones a los registros, como cálculos o comprobaciones adicionales antes de que los datos se registren en los sistemas de contabilidad.
If ExistBlock("AF250GRV") // PUNTO DE ENTRADA ANTES DE CONTABILIZAR Execblock("AF250GRV",.F.,.F.,Acols[nX]) EndIf
// Implementación de la función de punto de entrada AF250GRV User Function AF250GRV() // Ejemplo: Agregar una comprobación de integridad a los datos de un activo Local aCols := PARAMIXB[1] // Array de columnas con datos de activos Local nPosICMS := Ascan(aHeader, {|x| Alltrim(x[2]) == "N1_ICMSAPR" }) Local nICMS := 0 Local i := 0 For i := 1 To Len(aCols) // Verifica si el valor de ICMS es superior a un valor permitido If aCols[i][nPosICMS] > 10000 // Genera un mensaje de alerta Help(" ", 1, "AF250_ALERT",, "El valor de ICMS excede el límite permitido.", 1, 0) EndIf Next i Return
¡Importante!