Код Rexx для изменения слова в jcl и отправки

Код Rexx для изменения слова в jcl и отправки.

Есть код JCL. Требуется запустить задание после выполнения «C ALL JOB1 JOB2».


person deepaklearner    schedule 25.08.2018    source источник
comment
Что вы пробовали???   -  person Bruce Martin    schedule 26.08.2018


Ответы (1)


Есть несколько способов сделать это. Я бы посоветовал скелетоны ISPF

ISPF Скелтон

Рекс это

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

Скелет становится

//&job. job

см. Выполнение DFSORT с использованием REXX

Редактировать макрос

Вы можете использовать макрос редактирования. Рекс

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

и макрос примерно

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

Читай пиши

Джоу мог читать JCL построчно, изменять каждую строку по мере необходимости и писать новый файл набора данных JCL.

person Bruce Martin    schedule 25.08.2018