Producto: | TOTVS Backoffice |
---|---|
Línea de producto: | Línea Protheus |
Segmento: | Servicios |
Módulo: | TOTVS Backoffice (Línea Protheus) - Activo fijo (SIGAATF) |
Función: | ATFA050 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46748 |
El punto de entrada ATF050LOG permite realizar validaciones personalizadas antes de la ejecución del cálculo de depreciación y corrección monetaria en la rutina Cálculo mensual (ATFA050). Se utiliza para ejecutar las validaciones antes de ejecutar la Procedure en el cálculo de la depreciación y en la corrección monetaria, en la rutina Cálculo mensual (ATFA050).
If !ExecBlock("ATF050LOG") Return EndIf
#Include "PROTHEUS.ch" #INCLUDE "rwmake.ch" User Function ATF050LOG() Local cTipDepr := AllTrim(GetMv("MV_TIPDEPR")) Local lret := .T. If cTipDepr <> "0" lret:= .F. Alert("Depreciación no es proporcional") EndIf Return lRet
Importante