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.
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
If lCancela .AND. ExistBlock("AF250CAN")
lCancela := Execblock("AF250CAN",.F.,.F.,{aCols,nCnt})
lCancela := IIF(ValType(lCancela) == "L",lCancela,.T.)
EndIf |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
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
|
| Aviso | ||
|---|---|---|
| ||
|