In this example, members and their aliases (groups) are copied
from a PDSE to a PDSE (full data set copy). See
Copying Program Objects (COPYGRP and COPYGROUP Statements) for
information about copying groups.
//CPYGRP JOB ...
//STEP1 EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=A
//DDIN DD DSNAME=PDSESETA,DISP=SHR
//DDOUT DD DSNAME=PDSESETB,LIKE=PDSESETA,DSNTYPE=LIBRARY,
// DISP=(NEW,CATLG)
//SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1,1))
//SYSIN DD *
GROUPCPY COPYGRP INDD=DDIN,OUTDD=DDOUT
/*
The control statements are discussed below:
- DDIN DD defines the input data set, PDSESETA, which is a partitioned
data set extended.
DDOUT DD defines the output data set, PDSESETA,
which is a partitioned data set extended.
The LIKE subparameter
indicates that the DCB and SPACE attributes for PDSESETB are to be
copied from PDSESETA. The DSNTYPE subparameter defines the new data
set as a PDSE.
The Storage Management Subsystem chooses an
appropriate volume for the allocation.
- SYSUT3 DD defines a temporary spill data set.
- SYSIN DD defines the control data set, which follows in the input
stream. The data set contains a COPYGRP statement, an INDD statement,
and an OUTDD statement.
- COPYGRP indicates the start of the copy operation.
The INDD
parameter shows PDSESETA as the input data set.
The OUTDD parameter
shows PDSESETB as the output data set.