In this example, a key-sequenced cluster, ZZZ.EXAMPLE.KSDS1, is
exported from a user catalog, HHHUCAT1. The cluster is copied to a
portable file, TAPE2, and its catalog entries are modified to prevent
the cluster's data records from being updated, added to, or erased.
//EXPORT1 JOB ...
//STEP1 EXEC PGM=IDCAMS
//RECEIVE DD DSNAME=TAPE2,UNIT=(TAPE,,DEFER),
// DISP=NEW,VOL=SER=003030,
// DCB=(BLKSIZE=6000,DEN=3),LABEL=(1,SL)
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
EXPORT -
ZZZ.EXAMPLE.KSDS1 -
OUTFILE(RECEIVE) -
TEMPORARY -
INHIBITSOURCE
/*
Job control language statement:
- RECEIVE DD describes the portable file, a magnetic tape file,
that is to receive a copy of the cluster's records. The DCB BLKSIZE
parameter overrides the EXPORT default of 2048 to improve performance.
The EXPORT command copies key-sequenced cluster, ZZZ.EXAMPLE.KSDS1,
and its cataloged attributes to a portable file, TAPE2. The parameters
are:
- ZZZ.EXAMPLE.KSDS1 identifies the cluster to be exported.
- OUTFILE points to the RECEIVE DD statement. The RECEIVE DD statement
describes the portable file, TAPE2, that is to contain a copy of the
cluster.
- TEMPORARY specifies that the cluster is not to be deleted. The
cluster's catalog entry is marked "temporary" to indicate that
another copy of the cluster exists and that the original copy can
be replaced. (See the IMPORT Example, Import a Key-Sequenced Cluster: Example 3.)
- INHIBITSOURCE specifies that the copy of the cluster that remains
in the original system, as a result of TEMPORARY, cannot be modified.
User programs are allowed only to read the cluster's records.