Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAFIS) |
Function: | ATFA250 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46030 |
You can use this entry point to perform user validations at cancellation.
To first call the record, it must first have gone through all default system validations.
If lCancela .AND. ExistBlock("AF250CAN") lCancela := Execblock("AF250CAN",.F.,.F.,{aCols,nCnt}) lCancela := IIF(ValType(lCancela) == "L",lCancela,.T.) EndIf |
User Function AF250CAN() // Variables received via PARAMIXB Local aCols := PARAMIXB[1] // Array containing all item records Local nCnt := PARAMIXB[2] // Number of records in array Local lRet := .F. // Example of use If SN3->N3_IDBAIXA = "2" // customer validation lRet := .T. EndIf Return lRet |
|