Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF) |
Function: | ATFA030 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
Entry Point AF030VLBX is useful for validating items to be posted in the routines for manual posting or automatic posting of assets. It allows adding customized rules and validations that are not available in the standard product.
The customer can use this entry point to implement specific validations for assets selected at the time of posting, in accordance with their business needs.
lRet := ExecBlock("AF030VLBX",.F.,.F.,{"ATFA030","MAN"})
#Include 'Protheus.ch'
User function AF030VLBX()
Local lRet := .T.
Local cRotina := paramixb[1]
Local cManuAuto := paramixb[2]
If cManuAuto == "MAN"
msgAlert("Manual Posting")
lRet := .t.
ElseIf cManuAuto == "AUTO"
msgAlert("Automatic Posting")
lRet := .t.
EndIf
Return(lRet)
Important