BPX4SIP (sigpending) example

The following code retrieves the mask used for pending and blocked signals. For the callable service, see sigpending (BPX1SIP, BPX4SIP) — Examine pending signals. AMODE 31 callers use BPX1SIP (sigpending) example.
                                              
         CALL  BPX4SIP,              Determine pending signals         +
               (SIGRET,              Signal mask return area (XL8)     +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------