/* REXX *** */
Parse Arg Secs
If Secs = '' then Do
   Say 'Please specify a seconds value as a parameter'
   Exit 4
   End
PARSE SOURCE . . . . . . Envir .
If Envir \= 'SH' then ,
IF SYSCALLS('ON')>3 THEN
    DO
    SAY 'Unable to establish the SYSCALL environment'
    SAY 'Return code was 'RC
    Exit 8
    END
ADDRESS SYSCALL 'sleep 'Secs
Exit 0