JCL-файл для создания PDS и участника

Question

Как написать файл JCL, который будет создавать PDS и член в пределах того же PDS?

Answer 1

Вы можете установить член в новый PDS только в том случае, если вы его запишете. Если вы сделаете что-то вроде этого:

//S1  EXEC PGM=IEFBR14          
//PDS  DD DSN=USER.TEST.PDS(NEWMEM),DISP=(NEW,CATLG),  
//   SPACE=(TRK,(1,1,24)),UNIT=DISK,      
//   LRECL=80,RECFM=FB,BLKSIZE=6080 

... вы получите каталоги PDS, но элемент не будет сохранен. Если вы выполняете программу, которая пишет члену, например:

//S2  EXEC PGM=IEBGENER          
//SYSUT1 DD *             
//SYSUT2 DD DSN=USER.TEST.PDS(NEWMEM),DISP=(NEW,CATLG),  
//   SPACE=(TRK,(1,1,24)),UNIT=DISK,      
//   LRECL=80,RECFM=FB,BLKSIZE=6080      
//SYSPRINT DD SYSOUT=*           
//SYSIN DD DUMMY 

... тогда член будет сохранен.

Похоже, вы хотите создать пустой элемент для более поздней работы или шага. Обычно это необязательно, поскольку BPAM создает элемент, если он не существует, и перезаписывает существующий элемент, если он это делает.

Answer 2

IEBCOPY Работает также для вас. Он используется для создания PDS или для копирования одного PDS на другое частично или полностью путем выбора или опускания необходимых членов PDS. Он объединяет оба вышеупомянутых шага в один ... Надеюсь, я разъяснил вам. Вернитесь, если вам нужен синтаксис JOB для этого.