This will issue any TSO command, but security-wise I think it opens a barn door.
Save it as member TSOCMD in your SYSREXX lib.

/* general TSO command                   rexx */
 address tso arg(1)                         
 Exit 0  

Sample use (@ is my SYSREXX command char):

@TSOCMD LISTCAT ENT(SYS1.HELP)

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to