zOs/TX/QBLOBINS

delete from QTXCRY.tQblobOri
;
insert into QTXCRY.tQBLobOri
    (name, text, ix, lob1, fEnd)
    with u (ix, ll) as
    (
       select -1, cast(null as clob) from sysibm.sysDummy1
       union all select -2, cast(null as clob) from sysibm.sysDummy1
       union all select 0, cast('' as clob) from sysibm.sysDummy1
       union all select ix+1
          , clob('<' || strip(ix+1) || '--- ') || ll
          || clob(' ---' || strip(ix+1) || '--- ') || ll
          || clob(' ---' || strip(ix+1) || '>')
           from u where ix < 20 and ix >= 0
     )     -- 20 --> 22MB, groesser gibt meist abend
    select 'name ' || strip(ix)
         , 'text ' || strip(ix)
         , ix
         , ll
         , 'end ' || strip(ix)
        from u where ix < 99
;
commit