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)          ----------------------------------