<snip> a report of our NJE activity from SMF <snip> If you simply want print info, eg forms, lines, dest, then a simply SAS of SMF06 might do.
//CHKJOBT EXEC SAS 00150000 //WORK DD SPACE=(CYL,(200,200)) 00170001 //SMF DD DISP=SHR,DSN=ASD.CNKELJJ.SMF06.J02.JULAUG 00200001 //SYSOUT DD DUMMY 00210000 //SYSIN DD * 00220000 OPTIONS DATE ERRORS=2 NUMBER SOURCE /*SOURCE2*/ ; 00281000 DATA SMF06 (KEEP = SYSOUT FCB UCS FORMS) ; 00290001 FORMAT LINES COMMA7.0 ; 00330000 INFILE SMF TRUNCOVER MISSOVER /* OBS=050 */ ; 00340000 INPUT @11 SID $4. 00350000 @15 JOB $8. 00360000 @39 SYSOUT $1. 00370000 @48 LINES PIB4. 00371000 /* @53 NODS PIB1. */ 00372000 @54 FORMS $4. 00373001 @65 JOBNOS $4. 00374000 @69 PRTDEV $8. 00375000 @77 FCB $4. 00376000 @81 UCS $4. 00377000 @ ; 00380000 IF _N_ = 1 THEN XYZ = DATEPART(JOB) ; 00390000 *IF SUBSTR(PRTDEV,1,3) EQ 'NJE' THEN DELETE ; /* local ptr only */ 00393000 IF SUBSTR(UCS,1,3) EQ 'VPS' THEN DELETE ; /* not vps */ 00394000 RETURN ; 00420000 00430000 PROC SORT DATA=SMF06 OUT=SORTED NODUPS; 00440001 BY SYSOUT ; 00450001 PROC PRINT DATA=SORTED NOOBS U N ; 00460001 TITLE " UNIQUE SYSOUT FOR J02 JUL 01,2000 THRU AUG 06 "; 00470001 /* Jack Kelly 202-502-2390 (Office) ---------------------------------------------------------------------- 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