zOs/SQL/MFHISV0

declare global temporary table session.key
   ( MF150001 char(16)
   ) ccsid ebcdic on commit delete rows
;
select current timestamp , 'start' from sysibm.sysDummy1
;
insert into session.key
  select mf150001
    from oa1p.tmf150a1
    where mf150013 between '23.09.2013' and '30.09.2013'
    order by mf150013
    fetch first 500 rows only
;
select count(*)
    from session.key
;
select current timestamp , 'key' from sysibm.sysDummy1
;
insert into oa1p.tmf150h1
  select MF150001
       , MF150002
       , MF150003
       , MF150004
       , MF150005
       , MF150006
       , MF150007
       , MF150008
       , MF150009
       , MF150010
       , MF150011
       , MF150012
       , MF150013
       , MF150014
       , MF150015
       , MF150016
       , MF150017
       , MF150018
       , MF150019
       , MF150020
       , MF150021
       , MF150022
       , MF150023
       , MF150024
       , MF150025
       , MF150026
       , MF150027
       , MF150028
       , MF150029
       , MF150030
       , MF150031
       , MF150032
       , MF150033
       , MF150034
       , MF150035
       , MF150036
       , MF150037
       , MF150038
       , MF150039
       , MF150040
       , MF150041
       , MF150042
       , MF150043
       , MF150044
       , MF150045
       , MF150046
       , MF150047
       , MF150051
       , MF150052
       , MF150053
       , MF150054
       , MF150055
       , MF150056
       , MF150059
       , MF150060
       , MF150062
       , MF150063
       , MF150064
       , MF150065
       , MF150066
       , MF150067
       , MF150068
       , MF150069
       , MF150070
       , MF150071
       , MF150072
       , MF150073
       , MF150074
       , MF150075
       , MF150076
       , MF150077
       , MF150078
       , MF150079
       , MF150080
       , MF150081
       , MF150082
       , MF150083
       , MF150084
       , MF150085
       , MF150086
       , MF150087
       , MF150088
       , MF150089
       , MF150090
       , MF150091
       , MF150092
       , MF150019A
  from oa1p.tmf150a1
    where mf150001 in (select mf150001 from session.key)
;
select current timestamp , 'ins h' from sysibm.sysDummy1
;
delete from oa1p.tmf150a1
    where mf150001 in (select mf150001 from session.key)
;
select current timestamp , 'del a' from sysibm.sysDummy1
;
delete from session.key
;
select current timestamp , 'start' from sysibm.sysDummy1
;
insert into session.key
  select mf150001
    from oa1p.tmf150a1
    where mf150013 between '23.09.2013' and '30.09.2013'
    order by mf150013
    fetch first 500 rows only
;
select count(*)
    from session.key
;
select current timestamp , 'key' from sysibm.sysDummy1
;
insert into oa1p.tmf150h1
  select MF150001
       , MF150002
       , MF150003
       , MF150004
       , MF150005
       , MF150006
       , MF150007
       , MF150008
       , MF150009
       , MF150010
       , MF150011
       , MF150012
       , MF150013
       , MF150014
       , MF150015
       , MF150016
       , MF150017
       , MF150018
       , MF150019
       , MF150020
       , MF150021
       , MF150022
       , MF150023
       , MF150024
       , MF150025
       , MF150026
       , MF150027
       , MF150028
       , MF150029
       , MF150030
       , MF150031
       , MF150032
       , MF150033
       , MF150034
       , MF150035
       , MF150036
       , MF150037
       , MF150038
       , MF150039
       , MF150040
       , MF150041
       , MF150042
       , MF150043
       , MF150044
       , MF150045
       , MF150046
       , MF150047
       , MF150051
       , MF150052
       , MF150053
       , MF150054
       , MF150055
       , MF150056
       , MF150059
       , MF150060
       , MF150062
       , MF150063
       , MF150064
       , MF150065
       , MF150066
       , MF150067
       , MF150068
       , MF150069
       , MF150070
       , MF150071
       , MF150072
       , MF150073
       , MF150074
       , MF150075
       , MF150076
       , MF150077
       , MF150078
       , MF150079
       , MF150080
       , MF150081
       , MF150082
       , MF150083
       , MF150084
       , MF150085
       , MF150086
       , MF150087
       , MF150088
       , MF150089
       , MF150090
       , MF150091
       , MF150092
       , MF150019A
  from oa1p.tmf150a1
    where mf150001 in (select mf150001 from session.key)
;
select current timestamp , 'ins h' from sysibm.sysDummy1
;
delete from oa1p.tmf150a1
    where mf150001 in (select mf150001 from session.key)
;
select current timestamp , 'del a' from sysibm.sysDummy1
;
rollback
;
select current timestamp , 'rollBack' from sysibm.sysDummy1
;