Rexx代码以更改jcl中的单词并提交

Question

Rexx代码可更改jcl中的单词并提交。

有一个JCL代码。要求是在执行“ C ALL JOB1 JOB2”之后运行作业。

Answer 1

有几种方法可以做到这一点。我建议使用ISPF骨架

ISPF斯凯尔顿

rexx是

ADDRESS TSO "ALLOC DD(OUTSKEL) DS('"OUTSKPDS"') SHR"
job="job2" /* job1 */
'FTOPEN'
'FTINCL SAMPSKEL'
'FTCLOSE LIBRARY(OUTSKEL) NAME('WORKMEM')'

骨骼变成

//&job. job

请参阅Executing a DFSORT using REXX

编辑宏

您可以使用编辑宏。 rexx

'address ispexec edit dataset(my.job.to.edit) macro(mymacro)'

宏大概是

address isredit 'macro' 
address isredit 'c job1 job2 all'
address isredit 'sub'

读/写

Jou可以逐行读取JCL，根据需要更改每一行并编写新的JCL数据集文件