BPX1ALR (alarm) example

The following code schedules an alarm in 5 seconds. For the callable service, see alarm (BPX1ALR, BPX4ALR) — Set an alarm. AMODE 64 callers use BPX4ALR (alarm) example.

                                              
         MVC   SECONDS,=F'5'                                            
         SPACE ,                                                        
         CALL  BPX1ALR,              Schedule Alarm                    +
               (SECONDS,             Input: Time before SIGALRM        +
               RETVAL),              Return value: 0 or -1             +
               VL,MF=(E,PLIST)       ----------------------------------