几种常用的DB2循环用法_DB2_数据库_程序员俱乐部

DB2循环的用途在DB2数据库中是很广泛的，下面就为您介绍四种常见的DB2循环用法，希望可以在您学习DB2循环方面有所帮助。

1．利用得到的游标在存储过程中循环：

class="dp-xml">
DECLARE CUR_FEESET CURSOR WITH RETURN TO CALLER FOR (  
SELECT  
--  
FROM 表  
WHERE 条件  
);  
OPEN CUR_FEESET;--得到游标  
--得到游标记录数  
SELECT  
count(CIF_CSTNO)  
into v_count  
FROM CB_CSTINF A ,CB_CSTBSNINF B  
WHERE A.CIF_STT<>'3' AND A.CIF_CSTNO = B.CBI_CSTNO ;   --  
FETCH CUR_FEESET INTO V_CSTNO,V_FEECODE,V_CSTLEVEL,V_FEEMODE;--  
WHILE V_COUNT>0 DO  
 ……..  
FETCH CUR_FEESET INTO V_CSTNO,V_FEECODE,V_CSTLEVEL,V_FEEMODE;--  
END WHILE; --  
 

２．另一种db2标准循环格式(leave、iterate 用法)：

SET V_COUNT = LENGTH(V_VALIDAUTHCOMBOS);--  
 
SET V_INDEX = 0;--  
 
AUTHLOOP:  
LOOP  
      IF V_INDEX >= V_COUNT THEN  
LEAVE AUTHLOOP;--相当于break  
      END IF;--  
....  
      SET V_INDEXV_INDEX = V_INDEX + 1;--  
      .......  
      IF 条件　THEN  
     ITERATE AUTHLOOP;-- 相当于continue  
      END IF;--  
END LOOP;--  

3.截取字符串的循环（设V_TEMP=‘CB1001|CB1002|CB1003|’）：

SET V_LENGTH = LENGTH(V_TEMP);  
    WHILE V_LENGTH>0 DO   
SET V_POS = POSSTR(V_TEMP,'|');  
SET V_CURRENT_BSN = SUBSTR( V_TEMP, 1, V_POS-1 );  
SET V_TEMP = SUBSTR( V_TEMP, V_POS+1 );  
SET V_LENGTH = LENGTH(V_TEMP);   
--最后一个字段，不再截取  
SET V_BSNTYPE = V_CURRENT_BSN;  
    END WHILE;    

4.游标循环（不用open 游标）：

DROP PROCEDURE TESTFOR;  
    CREATE PROCEDURE TESTFOR()  
    LANGUAGE SQL  
    BEGIN  
    DECLARE V_TEMP1 VARCHAR(2);  
    DECLARE V_TEMP2 VARCHAR(70);  
    FOR V1 AS CURSOR1 CURSOR FOR  
SELECT STUDENT_ID AS TEMP1,STUDENT_NAME AS TEMP2 FROM STUDENT  
    DO   
DELETE FROM STUDENT WHERE STUDENT_ID = TEMP1;  
SET V_TEMP1 = TEMP1;  
SET V_TEMP2 = TEMP2;  
    END FOR;  
    COMMIT;  
    END;