BPX4SEG (setegid) example
The following code sets the effective group ID of the
invoker to 1. For the callable service, see setegid (BPX1SEG, BPX4SEG) — Set the effective group ID.
AMODE 31 callers use BPX1SEG (setegid) example.
MVC GROUPID,=XL4'00000001' Value of new effective ID
SPACE ,
CALL BPX4SEG, Set effective group ID +
(GROUPID, Input: Group ID +
RETVAL, Return value: 0 or -1 +
RETCODE, Return code +
RSNCODE), Reason code +
MF=(E,PLIST) ----------------------------------