BPX4GEG (getegid) example
The following code gets the effective group ID of the
caller. For the callable service, see getegid (BPX1GEG, BPX4GEG) — Get the effective group ID.
AMODE 31 callers use BPX1GEG (getegid) example.
CALL BPX4GEG, Get the effective group ID +
(RETVAL), Return value: effective group ID +
MF=(E,PLIST) ----------------------------------