BPX4GPI (getpid) example

The following code gets the process ID of the caller. For the callable service, see getpid (BPX1GPI, BPX4GPI) — Get the process ID. AMODE 31 callers use BPX1GPI (getpid) example.
                                              
         CALL  BPX4GPI,              Get the process ID                +
               (RETVAL),             Returns value, Process ID         +
               MF=(E,PLIST)          ----------------------------------