BPX1GEU (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 64 callers use BPX4GEU (geteuid) example.
                                              
         CALL  BPX1GEU,              Get the effective user ID         +
               (RETVAL),             Return value: effective user ID   +
               VL,MF=(E,PLIST)       ----------------------------------