Description | Entry point AF060BUT to create user button. |
---|---|
Notes | (from version 12.1.6) |
Examples | User Function AF060BUT() Local aRotX := PARAMIXB aRotX := {{"BUTTON AF060BUT","U_Af060ts1",0,2}} Return(aRotX) User function Af060ts1() MsgAlert("Call of the Entry Point AF060BUT") Return |
Preview | |
See also | |
Language | Portuguese(Brazil) |
Versions | Microsiga_Protheus12 |
Operating Systems Supported | All |
Compatible with the following Databases | All |
Updates | |
Parameters | aRotX = Array with the menu information. |
Return | Array with the addition of the user menu. |
Call events of the Entry Point | If ExistBlock("AF060BUT") aRotNew := ExecBlock("AF060BUT",.F.,.F.,{aRot}) For nX := 1 To len(aRotNew) aAdd(aRot,aRotNew[nX]) Next Endif |
Variables | Local aRotX := PARAMIXB[1] |
Source Program | ATFA060.PRW |