zOs/JCL/SQLWB
//Y540769K JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG,SYSTEM=R24
//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
select current timestamp from sysibm.sysdummy1;
SELECT count(*), ts FROM oa1p.VWB207A1V
where ts < '2009-07-16-08.56.00.000000'
group by ts
order by ts
with ur
//SYSIN3 DD *
select current timestamp from sysibm.sysdummy1;
SELECT TS FROM oa1p.VWB207A1V WHERE TS
> '1111-11-11-11.11.11.111111'
and ts < '2009-07-16-08.56.00.000000'
order by ts desc
with UR;
select current timestamp from sysibm.sysdummy1;
//SYSINCC DD *
select current timestamp from sysibm.sysdummy1;
SELECT TS FROM oa1p.VWB207A1V WHERE TS
> '2009-07-10-08.55.36.320613'
-- and CURRENT TIMESTAMP - 368 DAYS
fetch first 10 rows only
with cs;
select current timestamp from sysibm.sysdummy1;