Howard Brazee <[EMAIL PROTECTED]> wrote: (with some reformatting) > Doing some more IEBPTPCH clean-up. > We have an old job that copies printed output from tape to print. > The proc is: > //TEBC PROC PRTM1='(A,,941S),FCB=941S,DEST=CENTRAL,COPIES=1' > //TEBC#1 EXEC PGM=IEBPTPCH *********************** PRINT SPOOL TAPE > //SYSIN DD DSN=UMS.PROD.DATA(PREFORMA),DISP=SHR > //SYSUT1 DD DSN=&DSN,UNIT=TAPE,DISP=(OLD,KEEP),VOL=SER=&TAPE > //SYSUT2 DD SYSOUT=&PRTM1 > //SYSPRINT DD SYSOUT=* > Trouble is, the output appears to be wider than the printer, double > spacing the printing, and getting TOF after two pages.
One, IEBPTPCH seems to always want to use carriage control, so RECFM should be FBA or FBM. In the version that I currently have a manual for LRRCL can be between 2 and 145, with a default of 121 for PRINT and 81 for PUNCH. The one I didn't remember, if the input LRECL is longer than the output LRECL it divides the line up into multiple output lines, with single space carriage control for such lines. Since you don't have LRECL or RECFM specified, it is hard to know what it might have done in the past. Most likely, IEBPTPCH isn't changing much. -- glen ---------------------------------------------------------------------- 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
