zOs/JCL/SUSEC

//A540769L  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
//         NOTIFY=A540769
//*
//*     su/sec cpu für jedes system dieses sysplex im
//*             dd ppxsrpts
//*     job von Gion Cabernard
//*
//*MAIN CLASS=LOG
//SUSEC   EXEC PGM=ERBRMFPP
//SYSPRINT DD SYSOUT=*
//MFPMSGDS DD SYSOUT=*
//SYSRPTS  DD SYSOUT=*
//PXSRPTS DD SYSOUT=*
//*PPXSRPTS DD DISP=SHR,DSN=A540769.TMP.TEXK(SUSEC)  vba, maxRecL=1024
//SYSIN    DD *
 SYSRPTS(WLMGL(POLICY))
 DINTV(2400)
 NOSUMMARY
 SYSOUT(T)