功能:通过REXX提交JCL作业
扩展:与循环语句结合可以自动批量处理一些重复性作业
脚本如下:其中小写内容可以进行客户化
/**********************REXX********************************************************/
ADDRESS TSO
X=MSG('OFF')
"DELSTACK"
"NEWSTACK"
QUEUE "//jobname JOB NOTIFY=&SYSUID "
QUEUE "//stepname EXEC PGM=IEFBR14 "
QUEUE "//SYSPRINT DD SYSOUT=* "
QUEUE "//ddname DD DSN=dsname,DISP=(OLD,DELETE,DELETE)"
QUEUE "// "
QUEUE "XX"
"SUBMIT * END(XX)"
EXIT