zOs/SQL/RTSINSJ
//YRTSINSP JOB (CP00,KE50),'DB2 RTS', 00010000
// MSGCLASS=E,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//SUBTORR2 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT2 DD SUBSYS=(CSM,'SYSTEM=RR2,SYSOUT=(A,INTRDR)')
//SYSUT1 DD *,DLM='}e'
//YRTSINSP JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=E,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//YRTSINSP JOB (CP00,KE50),'DB2 RTS', 00010000
// MSGCLASS=E,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=DBOF ,SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
select current timestamp from sysibm.sysDummy1;
insert into A540769.rtsHistTs
select r.*, current timestamp insertTst
from sysibm.sysTableSpaceStats r
where dbName like 'NI02%'
;
select current timestamp from sysibm.sysDummy1;
commit;
select current timestamp from sysibm.sysDummy1;
insert into A540769.rtsHistIx
select r.*, current timestamp insertTst
from sysibm.sysIndexSpaceStats r
where dbName like 'NI02%'
;
select current timestamp from sysibm.sysDummy1;
commit;
select current timestamp from sysibm.sysDummy1;
}e end of job to $toRz ****************************************