210 Глава6
реплицируйте (r) один оператор EXEC, затем перезапишите оператор EXEC своим
оператором JOB.) Этот оператор JOB должен иметь следующий вид:
//youridA JOB 1
Вместо «yourid» введите свой идентификатор пользователя, оставив «A», после чего
передайте на выполнение этот JCL-код и нажмите PF3, чтобы сохранить файл
и выйти из редактора.
6. В главном меню ISPF найдите SDSF (описываемый в разделе 7.9.5, «Использование
SDSF»). Вы можете использовать функцию разделения экрана для создания нового
экранного сеанса, вследствие чего получается один сеанс DSLIST и другой сеанс
для SDSF.
7. В меню SDSF введите
PREFIX yourid*
, после чего введите
ST
(Status Panel). Оба
переданных задания должны быть в списке. Введите
S
(select) слева от любого из
заданий, затем перейдите к предыдущей и последующей странице для просмотра
сообщений, сгенерированных при выполнении. Нажмите PF3 для выхода.
8. Еще раз отредактируйте JCLTEST и вставьте в конец следующие строки:
//CREATE DD DSN=yourid.MYTEST,DISP=(NEW,CATLG),
// UNIT=SYSDA,SPACE=(TRK,1)
9. Передайте для выполнения содержимое JCLTEST, созданного выше, нажмите PF3
(сохранение и выход из редактора), после чего просмотрите выходные данные это-
го задания в SDSF. Обратите внимание на то, что имеется два задания с одинаковым
именем. Последним запускалось задание с более высоким значением JOBID.
а) Чему равен код завершения? Если он выше нуля, перейдите в конец списка вы
-
ходных данных, чтобы просмотреть сообщение об ошибке JCL. Исправьте
JCLTEST и повторно передайте задание на выполнение. Повторяйте до тех пор,
пока не будет получено условие code=0000.
б) Перейдите в панель Data Set List Utility (=3.4) и введите
yourid.MYTEST в поле
DSNAME level. Какой том использовался для хранения набора данных?
в) Введите
DEL /
в нумерованный левый столбец (command) набора данных,
чтобы удалить набор данных. Может возникнуть сообщение о подтверждении,
запрашивающее подтверждение удаления набора данных.
г) Мы увидели, что пакетное выполнение программы IEFBR14, не требующей
входных или выходных данных, возвращает код завершения 0 (успешное вы-
полнение), если не возникало ошибок JCL. Хотя IEFBR14 не осуществляет опе-
рации ввода-вывода, выполняется чтение JCL-инструкций и их выполнение
системой. Эта программа полезна для создания (DISP=NEW) и удаления
[DISP=(OLD,DELETE)] наборов данных в операторе DD.
10. Из любой панели ISPF введите в Command Field ==>
TSO SUBMIT JCL(JCLERROR)
Ваш идентификатор пользователя является префиксом (старшим квалификато-
ром) набора данных JCL, содержащего раздел JCLERROR.
а) Система запросит ввести суффикс для сгенерированной карты задания. Запом
-
ните имя и номер задания, выводимый в сообщениях передачи на выполнение.