In any case, I will strongly recommend that you use the REXX/SDSF API rather
than TSO GETMSG, i.e.:
/* Demo REXX/SDSF API system command */
zz=isfcalls('ON')
isfdelay=2 /* value for WAIT */
Address SDSF ISFSLASH "'d prog,apf' (WAIT)"
if rc<>0 then say 'Console failed rc' rc
else do n=1 to isfulog.0
say '->'isfulog.n
end
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
