zOs/TX/PER17LOD

//A540769L  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=A540769
//*MAIN CLASS=LOG SYSTEM=S14
//S1       EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD'                  00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//INDUMMY   DD DUMMY
//SYSIN    DD *
LISTDEF LST INCLUDE TABLESPACE DA540769.A150A
LOAD DATA LOG NO
    WORKDDN(TSYUTS, TSOUTS)
    RESUME NO REPLACE COPYDDN(TCOPYS)  INDDN INDUMMY
    STATISTICS INDEX(ALL KEYCARD) REPORT NO UPDATE ALL
  INTO TABLE A540769.$TMF150A1