CLIST to write data in PS file

Thu, 07/26/2012 – 08:06

#1

CLIST to write data in PS file

The following CLIST code is an example code to write data to a PS file.

SET PS=&SYSUID..OUTPUT IF &SYSDSN(‘&PS’) =OK THEN + ¬† DELETE ‘&PS’ ALLOC DA(‘&PS’) F(OUTDD) NEW SPACE(20 20) TRACKS RELEASE + LRECL(80) RECFM(F B) DSORG(PS) OPENFILE OUTDD OUTPUT SET OUTDD=TEXT TO BE WRITTE IN FILE PUTFILE OUTDD CLOSFILE OUTDD

FREE FILE(OUTDD)

“; ; ; ;

Click the +1 button  below to share it with your friends and colleagues

Share this if you liked it!

Disclaimer