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.