Description | The entry point AF010CHP allows you to manipulate and validate the reg. no. when entering it. |
|---|---|
Notes | |
Examples | User Function AF010CHP() Local cChapa := Paramixb[1] Local lRepChapa := Paramixb[2] Local lRet := .T. Alert("Entry point AF010CHP run") If !lRepChapa cChapa := "12 " // manipulate reg. no. EndIf // validate the manipulation dbSelectArea("SN1") dbSetOrder(2) If dbSeek(xFilial("SN1")+cChapa) .Or. Empty(cChapa) Alert("Reg. no. blank or existing") lRet := .F. EndIf Return lRet |
Preview | |
See also | |
Language | Portuguese(Brazil) |
Versions | Previous_Versions |
Operating Systems Supported | All |
Compatible with the following Databases | All |
Updates | |
Parameters | cChapa, lRepChapa |
Return | lRet |
Call events of the Entry Point | IF ExistBlock("AF010CHP") lRet := ExecBlock("AF010CHP",.F.,.F., {cChapa,lRepChapa}) |
Variables | |
Source Program | ATFA010A.PRW |