Description | The entry point AF010EXC is run after selecting the Delete option and before the deletion screen opens. If it returns True, it allows deletion regularly. If it returns False, deletion is not performed. |
---|---|
Examples | #INCLUDE "Protheus.ch" User Function AF010EXC() Local lOk := .T. If lOkAlert ("Deleting") Else lOk :=.F. Alert ("Cannot delete!") Endif
|
Language | Portuguese(Brazil) |
---|---|
Versions | Microsiga_Protheus10 and Microsiga_Protheus11 |
Operating Systems Supported | All |
Compatible with the following Databases | All |
Return | Logical. T or F |
Call events of the Entry Point | If ExistBlock("AF010EXC") lOk:= ExecBlock("AF010EXC",.F.,.F.) EndIf |
Source Program | ATFA010A.PRW |