On Fri, 18 Jul 2008 19:09:30 -0400, Farley, Peter x23353 <[EMAIL PROTECTED]> wrote:
>I guess I'll have to wait until Monday and give it to my sysprogs. > >Thanks for trying to help. > >Peter I use PGM=SDSF and have two ways to capture job output in batch dating back to early SDSF. 1) Using FILTER and FIND //* //* CAPTURE SPOOL OUTPUT TO SEQUENTIAL DATA SET //* //CAPTURE EXEC PGM=SDSF,PARM='' //ISFIN DD * PREFIX MYJBNM* H FILTER JOBID EQ JOB02785 FIND MYJBNMP ++S PRINT FILE OUTDD01 PRINT PRINT CLOSE /* //ISFOUT DD SYSOUT=* //OUTDD01 DD DISP=(NEW,CATLG),DSN=MYJBNM.JOB02785, // UNIT=SYSALLDA,SPACE=(TRK,(20,2)), // DCB=(DSORG=PS,RECFM=VBA,BLKSIZE=0,LRECL=255) //* // 2) Using Select. //* //STEP001 EXEC PGM=SDSF //ISFOUT DD SYSOUT=* //ISFIN DD * PRE KTOMIAK* OWNER * H S KTOMIAKK JOB00207 F KTOMIAKK ++? F JESJCL ++S PRINT FILE DDNAME PRINT PRINT CLOSE END /* //DDNAME DD DISP=(NEW,CATLG),DSN=KTOMIAK.JOBOUT.JOB00207, // UNIT=SYSDA,SPACE=(TRK,(45,45),RLSE), // DCB=(DSORG=PS,RECFM=VB,BLKSIZE=0,LRECL=255) //* ---------------------------------------------------------------------- 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
