条件控制语句

来源：互联网发布：西华师范大学网络教育编辑：程序博客网时间：2024/06/04 19:11

-- Start

IF THEN

DECLARE  ISTEST BOOLEAN := TRUE;  BEGIN  IF ISTEST THEN    DBMS_OUTPUT.PUT_LINE('TEST');  END IF;  END;/

IF THEN ELSE

DECLARE  ISTEST BOOLEAN := TRUE;  BEGIN  IF ISTEST THEN    DBMS_OUTPUT.PUT_LINE('TEST1');  ELSE    DBMS_OUTPUT.PUT_LINE('TEST2');  END IF;END;/

IF THEN ELSIF

DECLARE  SCORE NUMBER(5, 2) := 78.50;  BEGIN  IF SCORE >= 90 THEN    DBMS_OUTPUT.PUT_LINE('非常优秀');  ELSIF SCORE >= 80 THEN    DBMS_OUTPUT.PUT_LINE('优秀');  ELSIF SCORE >= 70 THEN    DBMS_OUTPUT.PUT_LINE('良好');  ELSIF SCORE >= 60 THEN    DBMS_OUTPUT.PUT_LINE('及格');  ELSE    DBMS_OUTPUT.PUT_LINE('不及格');  END IF;END;/

Simple CASE

DECLARE  GRADE CHAR(1) := 'B';BEGIN  CASE GRADE    WHEN 'A' THEN DBMS_OUTPUT.PUT_LINE('优秀');    WHEN 'B' THEN DBMS_OUTPUT.PUT_LINE('良好');    WHEN 'C' THEN DBMS_OUTPUT.PUT_LINE('及格');    WHEN 'D' THEN DBMS_OUTPUT.PUT_LINE('不及格');    ELSE DBMS_OUTPUT.PUT_LINE('未知');  END CASE;END;/

Searched CASE

DECLARE  GRADE CHAR(1) := 'B';BEGIN  CASE     WHEN GRADE = 'A' THEN DBMS_OUTPUT.PUT_LINE('优秀');    WHEN GRADE = 'B' THEN DBMS_OUTPUT.PUT_LINE('良好');    WHEN GRADE = 'C' THEN DBMS_OUTPUT.PUT_LINE('及格');    WHEN GRADE = 'D' THEN DBMS_OUTPUT.PUT_LINE('不及格');    ELSE DBMS_OUTPUT.PUT_LINE('未知');  END CASE;END;/

--更多参见：Oracle PL/SQL 精萃

-- 声明：转载请注明出处

-- Last Edited on 2015-01-02

-- Created by ShangBo on 2015-01-01

-- End

0 0