zOs/WK/NZ24CNT

//YRPACNT JOB (CP00,KE50),
//         MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
//         NOTIFY=&SYSUID
//*MAIN CLASS=LOG
//S01      EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN  DD *
    DSN SYSTEM(DBTF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
    SELECT COUNT(*)
        FROM OA1T.TNZ240A1
        WITH UR