BPX4SPG (setpgid) example

The following code places the invoking process in its own process group (zeros indicate that the process group ID is to be set to the process ID). For the callable service, see setpgid (BPX1SPG, BPX4SPG) — Set a process group ID for job control. AMODE 31 callers use BPX1SPG (setpgid) example.

                                              
         MVC   PROCID,=A(0)          Process ID - current to leader     
         MVC   GROUP,=A(0)           Group ID - current to leader       
         SPACE ,                                                        
         CALL  BPX4SPG,              Set process group ID for Job Ctl  +
               (PROCID,              Input: Process to be placed in grp+
               GROUP,                Input: Target group               +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------