[轉]MySQL預存程序例子，包含事務，參數，嵌套調用，遊標，迴圈等

From : http://www.php100.com/html/webkaifa/database/Mysql/2009/0418/1185.html

view plaincopy to clipboardprint?
drop procedure if exists pro_rep_shadow_rs;  
delimiter |  
----------------------------------  
-- rep_shadow_rs  
-- 用來處理資訊的增加，更新和刪除  
-- 每次只更新上次以來沒有做過的資料  
-- 根據不同的標誌位  
-- 需要一個輸出的參數，  
-- 如果返回為0，則調用失敗，交易回復  
-- 如果返回為1，調用成功，事務提交  
--  
-- 測試方法  
-- call pro_rep_shadow_rs(@rtn);  
-- select @rtn;  
----------------------------------  
create procedure pro_rep_shadow_rs(out rtn int)  
begin  
    -- 聲明變數，所有的聲明必須在非聲明的語句前面  
    declare iLast_rep_sync_id int default -1;  
    declare iMax_rep_sync_id int default -1;  
    -- 如果出現異常，或自動處理並rollback,但不再通知調用方了  
    -- 如果希望應用獲得異常，需要將下面這一句，以及啟動事務和提交事務的語句全部去掉  
    declare exit handler for sqlexception rollback;  
    -- 尋找上一次的  
    select eid into iLast_rep_sync_id from rep_de_proc_log where tbl='rep_shadow_rs';  
    -- 如果不存在，則增加一行  
    if iLast_rep_sync_id=-1 then  
      insert into rep_de_proc_log(rid,eid,tbl) values(0,0,'rep_shadow_rs');  
      set iLast_rep_sync_id = 0;  
    end if;  
      
    -- 下一個數字  
    set iLast_rep_sync_id=iLast_rep_sync_id+1;  
    -- 設定預設的傳回值為0：失敗  
    set rtn=0;  
      
    -- 啟動事務  
    start transaction;  
    -- 尋找最大編號  
    select max(rep_sync_id) into iMax_rep_sync_id from rep_shadow_rs;  
    -- 有新資料  
    if iMax_rep_sync_id>=iLast_rep_sync_id then  
        -- 調用  
        call pro_rep_shadow_rs_do(iLast_rep_sync_id,iMax_rep_sync_id);  
        -- 更新日誌  
        update rep_de_proc_log set rid=iLast_rep_sync_id,eid=iMax_rep_sync_id where tbl='rep_shadow_rs';  
    end if;  
      
    -- 運行沒有異常，提交事務  
    commit;  
    -- 設定傳回值為1 
    set rtn=1;  
end;  
|  
delimiter ;  
drop procedure if exists pro_rep_shadow_rs_do;  
delimiter |  
---------------------------------  
-- 處理指定編號範圍內的資料  
-- 需要輸入2個參數  
-- last_rep_sync_id 是編號的最小值  
-- max_rep_sync_id 是編號的最大值  
-- 無傳回值  
---------------------------------  
create procedure pro_rep_shadow_rs_do(last_rep_sync_id int, max_rep_sync_id int)  
begin  
    declare iRep_operationtype varchar(1);  
    declare iRep_status varchar(1);  
    declare iRep_Sync_id int;  
    declare iId int;  
    -- 這個用於處理遊標到達最後一行的情況  
    declare stop int default 0;  
    -- 聲明遊標  
    declare cur cursor for select id,Rep_operationtype,iRep_status,rep_sync_id from rep_shadow_rs where rep_sync_id between last_rep_sync_id and max_rep_sync_id;  
    -- 聲明遊標的異常處理，設定一個終止標記  
    declare CONTINUE HANDLER FOR SQLSTATE '02000' SET stop=1;  
      
    -- 開啟遊標  
    open cur;  
      
    -- 讀取一行資料到變數  
    fetch cur into iId,iRep_operationtype,iRep_status,iRep_Sync_id;  
    -- 這個就是判斷是否遊標已經到達了最後  
    while stop <> 1 do 
        -- 各種判斷  
        if iRep_operationtype='I' then  
            insert into rs0811 (id,fnbm) select id,fnbm from rep_shadow_rs where rep_sync_id=iRep_sync_id;  
        elseif iRep_operationtype='U' then  
        begin  
            if iRep_status='A' then  
                insert into rs0811 (id,fnbm) select id,fnbm from rep_shadow_rs where rep_sync_id=iRep_sync_id;  
            elseif iRep_status='B' then  
                delete from rs0811 where id=iId;  
            end if;  
        end;  
        elseif iRep_operationtype='D' then  
            delete from rs0811 where id=iId;  
        end if;   
          
        -- 讀取下一行的資料   
        fetch cur into iId,iRep_operationtype,iRep_status,iRep_Sync_id;  
    end while;  -- 迴圈結束  
    close cur; -- 關閉遊標  
 end;  
|