展会信息港展会大全

oraclegoto语句介绍
来源:互联网   发布日期:2016-01-28 13:08:50   浏览:1704次  

导读:一 定义: The Oracle PL/SQL GOTO statement is a sequential control structure available in Oracle. The GOTO statement immediately transfers program control (called branching) unconditionally to a named statement label or block label. The st...

一 定义:

The Oracle PL/SQL GOTO statement is a sequential control structure available in Oracle. The GOTO statement immediately transfers program control (called "branching") unconditionally to a named statement label or block label. The statement or label name must be unique in the block.

属于plsql控制语句,用于程序控制非条件跳至指定标签<<???>>。不易控制和维护,慎用!

二 例子:

1、简单GOTO 语句,判断数字是否为质数:

?

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

DECLARE

p VARCHAR2(30);

n PLS_INTEGER := 37; -- test any integer > 2 for prime

BEGIN

FOR j IN 2 .. round(sqrt(n)) LOOP

IF n MOD j = 0 THEN

-- test for prime

p := ' is not a prime number'; -- not a prime number

GOTO print_now;

END IF;

END LOOP;

p := ' is a prime number';

<<print_now>>

dbms_output.put_line(to_char(n) || p);

END;

/

2、使用null避免报错:

?

1

2

3

4

5

6

7

8

9

10

11

12

DECLARE

done BOOLEAN;

BEGIN

FOR i IN 1 .. 50 LOOP

IF done THEN

GOTO end_loop;

END IF;

<<end_loop>> -- not allowed unless an executable statement follows

NULL; -- add NULL statement to avoid error

END LOOP; -- raises an error without the previous NULL

END;

/

3、使用goto分出一个环绕块:

?

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

-- example with GOTO statement

DECLARE

v_last_name VARCHAR2(25);

v_emp_idNUMBER(6) := 120;

BEGIN

<<get_name>>

SELECT last_name

INTO v_last_name

FROM employees

WHERE employee_id = v_emp_id;

BEGIN

dbms_output.put_line(v_last_name);

v_emp_id := v_emp_id + 5;

IF v_emp_id < 120 THEN

GOTO get_name; -- branch to enclosing block

END IF;

END;

END;

/

----------------------

dylan presents.

赞助本站

人工智能实验室
AiLab云推荐
展开

热门栏目HotCates

Copyright © 2010-2024 AiLab Team. 人工智能实验室 版权所有    关于我们 | 联系我们 | 广告服务 | 公司动态 | 免责声明 | 隐私条款 | 工作机会 | 展会港