JCL Trick to create duplicate output file
Posted: Fri Sep 17, 2010 8:00 pm
Anybody aware of IBM z/OS JCL trick to create a duplicate of an application program's output file in parallel of the writes to that output? I have a very high-volume weekly process of staging data from our mainframe system applications to MAS "shared" disk for ETL into an analytical database system. We have added a "test" disk area also and the desire is to keep both production and test at the same level...without impacting the performance of the production process (of course).
JCL Code Snippet for the application program output file
Thanks for any thought and ideas!
Chris.
JCL Code Snippet for the application program output file
//GB305.OUTFILE DD DSN=GB.#0983864.PPMO.MILS
X/OUTFILE DD DSN=OUTFILE,
X/ DISP=OLD,LABEL=EXPDT=98000,
X/ UNIT=&MAS,VOL=SER=&BFL,
X/ DCB=RECFM=FB,FREE=CLOSE
IEFC653I SUBSTITUTION JCL - DSN=OUTFILE,DISP=OLD,LABEL=EXPDT=98000,UNIT=MASMIL,VOL=SER=BFL140,DCB=RECFM=FB,
FREE=CLOSE
X/OUTFILE DD DSN=OUTFILE,
X/ DISP=OLD,LABEL=EXPDT=98000,
X/ UNIT=&MAS,VOL=SER=&BFL,
X/ DCB=RECFM=FB,FREE=CLOSE
IEFC653I SUBSTITUTION JCL - DSN=OUTFILE,DISP=OLD,LABEL=EXPDT=98000,UNIT=MASMIL,VOL=SER=BFL140,DCB=RECFM=FB,
FREE=CLOSE
Thanks for any thought and ideas!
Chris.