In this example, a three-member partitioned library is created.
The input data is contained solely in the control data set.
//UPDATE JOB ...
//STEP1 EXEC PGM=IEBUPDTE,PARM=NEW
//SYSPRINT DD SYSOUT=A
//SYSUT2 DD DSNAME=OUTLIB,UNIT=disk,DISP=(NEW,CATLG),
// VOLUME=SER=111112,SPACE=(TRK,(50,,10)),
// DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SYSIN DD DATA
./ ADD NAME=MEMB1,LEVEL=00,SOURCE=0,LIST=ALL
(Data statements, sequence numbers in columns 73 through 80)
./ ADD NAME=MEMB2,LEVEL=00,SOURCE=0,LIST=ALL
(Data statements, sequence numbers in columns 73 through 80)
./ ADD NAME=MEMB3,LEVEL=00,SOURCE=0,LIST=ALL
(Data statements, sequence numbers in columns 73 through 80)
./ ENDUP
/*
The control statements are as follows:
- SYSUT2 DD defines the new partitioned master, OUTLIB. Enough space
is allocated to allow for subsequent modifications without creating
a new master data set.
- SYSIN DD defines the control data set, which follows in the input
stream. The data set contains the utility control statements and the
data to be placed as three members in the output partitioned data
set.
- The ADD function statements indicate that subsequent data statements
are to be placed as members in the output partitioned data set. Each
ADD function statement specifies a member name for subsequent data
and indicates that the member and control statement is listed in the
message data set.
- The data statements contain the data to be placed in each member
of the output partitioned data set.
- ENDUP signals the end of control data set input.
Because sequence numbers (other than blank numbers) are included
within the data statements, no NUMBER detail statements are included
in the example.