BPX4GEU (geteuid) example

The following code gets the effective user ID of the caller. For the callable service, see geteuid (BPX1GEU, BPX4GEU) — Get the effective user ID. AMODE 31 callers use BPX1GEU (geteuid) example.

                                              
         CALL  BPX4GEU,              Get the effective user ID         +
               (RETVAL),             Return value: effective user ID   +
               MF=(E,PLIST)          ----------------------------------