Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF) |
Function: | ATFA050 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
Entry Point AF050SPS is activated to perform validations before running the Procedure responsible for calculating depreciation and indexation. This entry point allows adding customized rules, ensuring that required conditions are met before performing financial calculations on fixed assets.
Handling of EP in the system
lRet := ExecBlock("AF050SPS",.F.,.F.)
EP Example
#Include "PROTHEUS.ch"
#INCLUDE "rwmake.ch"
User Function AF050SPS()
Local lRet := .F.
If MsgYesNo ("Confirm execution of Procedure?")
lRet:= .T.
MsgAlert("Execution successful")
Else
MsgAlert("Execution canceled")
EndIf
Return lRet
Important !!