Product Line: | Microsiga Protheus | ||||
Industry: | Services | ||||
Module: | Fixed Asset | ||||
Routine: |
| ||||
Entry Point: | A012RCOL | ||||
Related Tickets | TTMZXE, TTSOHZ | ||||
Countries: | All | ||||
Database: | All | ||||
Tables: | SN1/SN3 | ||||
Operating Systems: | All | ||||
Versions/Release: | 12.1.6, 12.1.7 |
Entry point A012RCOL handles acols after changing the group.
Description: | Entry point A012RCOL handles acols after changing the group. |
Location: | It is a custom routine, so it is not part of the default menu. |
Events: | A012RCOL |
Source Program: | ATFA012.PRW |
Function: | AF012AFNG() |
Example: #include "Protheus.ch"Static aHeadxStatic aColxStatic lSalvei := .F.
User Function A012ALTG()Local nx
Wiki Markup |
---|
aHeadx := ParamIxb\[1\]aColx := ParamIxb\[2\]lSalvei := .T. |
MsgAlert("Entered into Entry Point A012ALTG")
Wiki Markup |
---|
//displays the first 3 fields of aHeadxFor nX := 1 TO 3MsgAlert( "Field " +Alltrim(Str(nX))+": "+aHeadx\[nX,2\])Next |
Return
User Function A012RCOL()Local nxMsgAlert("Entered into Entry Point A012RCOL")
Wiki Markup |
---|
If lSalvei//displays the first 3 fields of aHeadxFor nX := 1 TO 3MsgAlert("Field "+Alltrim(Str(nX))+": "+aHeadx\[nX,2\])NextEndIf |
Return