zOs/SQL/REF

-- set current sqlid = 'S100447';
select t.*, hex(wk003gen), hex(1234), hex(generate_unique())
from A540769.TWK003A t;
delete from A540769.TWK003A where wk003id = '72';
select * from A540769.TWK003A;
;
xx
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('7',     '7',  null);
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('71',     '71', '7');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('72',     '72', '7');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('73',     '73', '7');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('711',     '711', '71');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('712',     '712', '71');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('721',     '721', '72');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('732',     '732', '73');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('7211',    '7211', '721');
insert into A540769.TWK003A (wk003id, wk003txt, wk003for)
                    values  ('72111',    '72111', '7211');
commit;
select * from A540769.TWK003A;
;
xx
xx
delete from A540769.TWK003A where wk003id = '05';
select * from A540769.TWK003A;
xx
update      A540769.TWK003A set  wk003for = '05'
                    where wk003id = '04';