--------------------<snip>------------------
Hi List -
How about an AMS Repro that gets a zero completion code, an a good
output record count,
AND Creates an unusable output dataset.
//STEP1 EXEC PGM=IDCAMS,REGION=8M
//SYSPRINT DD SYSOUT=*
//DD1 DD DISP=SHR,DSN=MY.VSAM.CLUSTER
//DD2 DD DSN=MY.UNUSABLE,UNIT=SYSDA,DISP=(,CATLG,DELETE),
// DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VB),
// SPACE=(CYL,(7,1,43),RLSE)
//SYSIN DD *
REPRO IFILE(DD1) OFILE(DD2)
Notice that there are directory blocks - coded in error.
Yep, an unusable PDS, with no warning or error messages.
------------------<unsnip>----------------------
"Probable User Error" :-)
You defined a PDS, then overwrote the directory. Put DCB=DSORG=PS on the
DD statement to recover the contents. Put a member name on the DSNAME to
avoid the problem in the future, or remove the direct space from the
SPACE parameter.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
