Suggestion: If you are licensed for DFSMSdss, and you want to use a system-determined block size:
COPY DS(INCLUDE(dsn)) + CATALOG DELETE OUTDYN(outvol) ALLDATA(*) REBLOCK(*) ADRDSSU will preserve the reference date. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html