db2數據庫存儲過程入門8

例10：

--在存儲過程中for循環進行遍歷分所有直接子分類
create procedure test17(in sid integer,out result varchar(2000))
language sql
begin
 
 declare sname varchar(500);
 set result = '';
 set sname = '';
 --使用for循環查詢dtdoctype中的數字，拼接到結果集中
 for xunhuan as
  select id,parentid,name from dtdoctype where parentid = sid
 do
    set result = concat(result,strip(DIGITS(id)));
    set result = concat(result,strip(DIGITS(parentid)));
    set result = concat(result,name);
    set result = concat(result,';'),
    --將查出來的數據，存入到實體表test_dtdoctype中
    sname = 'import：'||name;--name進行處理，將處理的name插入到表test_dtdoctype中
    insert into test_dtdoctype(id,parentid,name)values(id,parentid,sname);
 END FOR;
 
end;
---------------------------------------------------------
--在存儲過程中for循環進行遍歷分所有直接子分類
create procedure test18(in sid integer,out result varchar(2000))
language sql
begin
 
 declare snum integer;
 declare sname varchar(500);
 --建立一個臨時表
 declare global temporary table session.testdtdoctype
 (
  id integer,
  parentid integer,
  name varchar(500)
 );
 set result = '';
 set sname = '';
 set snum = 0;
 --使用for循環查詢dtdoctype中的數字，拼接到結果集中
 for xunhuan as
  select id,parentid,name from dtdoctype where parentid = sid
 do
    --將查出來的數據，存入到實體表test_dtdoctype中
    set sname = 'import：'||name;--name進行處理，將處理的name插入到表test_dtdoctype中
    insert into session.testdtdoctype(id,parentid,name)values(id,parentid,sname);
 END FOR;
 --查詢臨時表中的數據
 select count(*) into snum from session.testdtdoctype;
 set result = concat(result,strip(DIGITS(snum)));
 set result = concat(result,'條數據');
 
 drop table session.testdtdoctype;
end;