BPX1SPG (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 64 callers use BPX4SPG (setpgid) example.

                                              
         MVC   PROCID,=A(0)          Process ID - current to leader     
         MVC   GROUP,=A(0)           Group ID - current to leader       
         SPACE ,                                                        
         CALL  BPX1SPG,              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                       +
               VL,MF=(E,PLIST)       ----------------------------------