oracle 循环

来源:互联网 发布:摩飞榨汁机怎么样 知乎 编辑:程序博客网 时间:2024/05/17 21:22
--循环语句1LOOP……END LOOP2WHILE expression LOOP……END LOOP;3FOR counter IN [REVERSE]start_value..end_value LOOP……END LOOP;/***********************************************************************   LOOP***********************************************************************/DECLAREx number;BEGINx:=0;LOOPx:=x+1;/*IF x>=3 THENEXIT;END IF;*/EXIT WHEN x>=3;DBMS_OUTPUT.PUT_LINE('inner x='||x);END LOOP;DBMS_OUTPUT.PUT_LINE('outer x='||x);END;//***********************************************************************   WHILE***********************************************************************/DECLAREx number;BEGINx:=0;WHILE x<=3 LOOPx:=x+1;DBMS_OUTPUT.PUT_LINE('inner x='||x);END LOOP;DBMS_OUTPUT.PUT_LINE('outer x='||x);END;//***********************************************************************   FOR***********************************************************************/BEGINFOR x IN 1..5 LOOP --可以不用定义变量DBMS_OUTPUT.PUT_LINE('inner x='||x);END LOOP;DBMS_OUTPUT.PUT_LINE('END LOOP');END;/-- 从大到小BEGINFOR x IN REVERSE 1..5 LOOP --可以不用定义变量DBMS_OUTPUT.PUT_LINE('inner x='||x);END LOOP;DBMS_OUTPUT.PUT_LINE('END LOOP');END;//***********************************************************************   GOTO***********************************************************************/DECLAREx number;BEGINx:=0;<<repeat_loop>> --标签x:=x+1;DBMS_OUTPUT.PUT_LINE(x);if x<3 THENGOTO repeat_loop;END IF;END;/