rpuhlman
New User
Joined: 11 Jun 2007 Posts: 80 Location: Columbus, Ohio
|
|
|
|
MD,
Try IDCAMS REPRO:
Code: |
//STEP0001 EXEC PGM=IDCAMS
//INFILE DD DSN=VSAM.DATASET.NAME,DISP=SHR <-- EXAMPLE
//OUTFILE DD DSN=GDG.DATASET.NAME(+1), |
// DISP=(NEW,CATLG,DELETE), |
// UNIT=????, |
// SPACE=(CYL,(??,??),RLSE), |
// RECFM=??,LRECL=??, |
// DCB=(MODEL.DSCB) <-- ONLY!
//SYSIN DD *
REPRO INFILE(INFILE) OUTFILE(OUTFILE)
/*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=* |
|
|