REXX常用腳本(1)——提交JCL

功能：通過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