BPX1SIP (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 64 callers use BPX4SIP (sigpending) example.
                                              
         CALL  BPX1SIP,              Determine pending signals         +
               (SIGRET,              Signal mask return area (XL8)     +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------