zOs/TX/PER10SPU

select current timestamp from sysibm.sysDummy1
;
insert into QZ92CRT.tqz91Per10
    with r as
        (select floor( rand() * 200) * 100000 r from sysibm.sysDummy1 )
    select mod(r, 100000)
        , value(r , ( select max(key)
                           from QZ92CRT.tqz91Per10
                           where key between r.r
                                     and r.r + 90123
                    ) + 1)
        , char(current timestamp) || ' ' || r
      from r
;
select current timestamp from sysibm.sysDummy1
;
commit
;
select current timestamp from sysibm.sysDummy1
;
with s as
(
  select text t
    from QZ92CRT.tqz91Per10
    where text < '9'
    fetch first 10 rows only
)
select count(*)
    from s
    with cs
;
select current timestamp from sysibm.sysDummy1
;