BPX1SLP (sleep) example

The following code suspends running for 8 seconds or until a signal is delivered (whichever comes first). For the callable service, see sleep (BPX1SLP, BPX4SLP) — Suspend execution of a process for an interval of time. AMODE 64 callers use BPX4SLP (sleep) example.
                                              
         MVC   SECONDS,=F'8'         8 seconds                          
         SPACE ,                                                        
         CALL  BPX1SLP,              Temporarily suspend execution     +
               (SECONDS,             Input: Sleep interval in seconds  +
               RETVAL),              Return value: 0 or sleep time     +
               VL,MF=(E,PLIST)       ----------------------------------