db2存储过程小例子

create or replace procedure viewstat_logins_pro(In counts Bigint)
language sql
begin
declare i Bigint default 1;
--拼接随机时间
declare timestr varchar(19);
declare from_user varchar(64);
declare daytime Bigint;
declare longtime Bigint default 0;
while i<=counts do
set daytime = cast(rand()*30 as Bigint)+1;
set timestr='2017-03-'||daytime||' 20:00:00';
set longtime=longtime+i;
set from_user='from_user'|| cast(rand()*1000000 as Bigint)||'_'||longtime;
INSERT INTO DB2INST2.table_name(ID,from_userid) VALUES(i,from_user);
if mod(i,10000)=0 then
commit;
end if;
set i = i + 1;
end while;
end;

create or replace procedure viewstat_log_del(In counts Bigint)
language sql
begin
declare i Bigint default 1;
while i<=counts do
delete from DB2INST2.table_name where ID in(select ID from DB2INST2.tablename order by ID fetch first 10000 rows only);
commit;
set i = i + 1;
end while;
end;

call viewstat_logins_pro(1000);
call viewstat_log_del(10000000);
commit;