zOs/SQL/EXLOBIN2
delete from A540769.EXLOBNTRIES;
insert into A540769.EXLOBNTRIES
(brokeruuid, accessid, qoplevel, permissions, topic, principal)
with u (ix, ll) as
(
select -1, cast(null as blob) from sysibm.sysDummy1
union all select 0, cast('' as blob) from sysibm.sysDummy1
union all select ix+1
, ll || blob(' <<< cat ix ' || char(ix) || ' >>> ') || ll
from u where ix < 22 and ix >= 0
)
select 'uuid ' || strip(ix)
, 'acce ' || strip(ix)
, 'qo', ix, ll
, 'princ ' || strip(ix)
from u
;
commit
;
call sqlUpdate , "insert into A540769.EXLOBNTRIES" ,
"(brokeruuid, accessid, qoplevel, permissions, topic, principal)",
"values('uuid"ix"', 'acces"ix"', 'qo'," ix,
", blob(repeat('topic" ix" '," 2**ix"))" ,
" || blob(repeat('topi2" ix" '," 2**ix"))" ,
" || blob(repeat('topi3" ix" '," 2**ix"))" ,
" || blob(repeat('topi4" ix" '," 2**ix"))" ,
" || blob(repeat('topi5" ix" '," 2**ix"))" ,
" || blob(repeat('topi6" ix" '," 2**ix"))" ,
" || blob(repeat('topi7" ix "'," 2**ix")), 'principal"ix"')"
end
call sqlCommit
$#out 20140203 13:33:45