//DECPRINT PROC DSN=, DATA SET NAME OF TAPE FILE // FILE=, NUMBER OF FILE ON TAPE // VOLSER= VOLUME SERIAL OF TAPE //* //* REFER: SYS2.PROCLIB(DECPRINT) //* //* DOC: PRINT A TAPE FILE BUILT BY THE DEC/IBM UTILITY. //* //COPY EXEC PGM=IEBGENER //SYSIN DD DUMMY //SYSPRINT DD SYSOUT=A //SYSUT2 DD SYSOUT=A //SYSUT1 DD DSN=&DSN,DISP=OLD, // UNIT=TAPE,VOL=(,RETAIN,,,SER=&VOLSER), // LABEL=(&FILE,SL)