BPX4SUI (setuid) example

The following code sets the real, effective, and saved user IDs to 1. For the callable service, see setuid (BPX1SUI, BPX4SUI) — Set user IDs. AMODE 31 callers use BPX1SUI (setuid) example.

                                              
         MVC   USERID,=XL4'00000001' Value of new user ID               
       MVC   USERID,..             User ID to be set from a getuid      
         SPACE ,                                                        
         CALL  BPX4SUI,              Set user ID                       +
               (USERID,              Input: User ID to be set          +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------