Как включить библиотеку JCL PDS в программу REXX
Я пишу программу Rexx для автоматизации последовательной подачи заданий. Кодекс выглядит так:
/*REXX*/
Address ISPEXEC "LIBDEF ISPPLIB DATASET ID('XXX.YYY.PANELS')
Address ISPEXEC "LIBDEF ISPMLIB DATASET ID('XXX.YYYY.JCLLIB')
isf_rc=ISFACALLS('ON')
Addres ISPEXEC "Display Panel(Panel1)"
if rc<>0 then do
say isf_rc
end
if zcmd==1 then do /*zcmd is a variable defined in the Panel to capture user input*/
Address TSO "SUBMIT (JCLMEM01)"
end
Сообщение об ошибке: Набор данных JCLMEM01 не найден.
Как мне решить эту ошибку?
1 ответ
При публикации сообщений вам необходимо включить полный текст со ссылкой на сообщение. Пожалуйста, добавьте это (вставьте из эмулятора) в свой вопрос.
TSO SUBMIT
команда (когда не используется из ISPF Editor
) требует dataset
, PDS Member
это не набор данных. PDS и участник вместе считаются набором данных.
"SUBMIT XXX.YYYY.JCLLIB(JCLMEM01)"
Вы всегда должны искать любые сообщения, которые вы получаете. Это поможет вам в 99% случаев. В Rexx также посмотрите, как использовать Trace
,