In the following sample, ESDS files with the qualifier EDS.+ are exported at the record level. ESDS files with the qualifier DDS.+ are exported at the CI level. KSDS or RRDS files with the high-level qualifier DDS.+ are exported at the record level, whether the ESDS files are exported at the CI or record level.
//EXPORT JOB ,FAVER EXPORT JOB //EXPORT EXEC PGM=GVEXPORT //FVROUT0 DD DSN=FAVER.BK1.FILE,DISP=(NEW,CATLG),UNIT=TAPE //SYSPRINT DD SYSOUT=A //SYSUDUMP DD SYSOUT=A //SYSIN DD * EXPORT CLUSTER CL=EDS.+ CL=DDS.+ CILEVEL
|
Copyright © 2011 CA.
All rights reserved.
|
|