PL/SQL-->流程控制

PL/SQL-->流程控制

      类似于高级语言，流程控制语句是PL/SQL语言的重要组成部分。这些流程控制语句使得PL/SQL加大了代码的灵活性和多样性，大大简化了程序的编写。下面将列出流程控制语句并给出具体事例。

一、顺序结构

      按代码的书写顺序依次执行

      --在下面的示例中将逐步执行代码

              scott@ORCL> declare v_ename varchar2(20);
                  2  v_job emp.job%type;
                  3  v_no  emp.empno%type;
                  4  begin
                  5      v_no:=&inputno;
                  6      select ename,job into v_ename,v_job from emp where empno=v_no;
                  7      dbms_output.put_line('Employee Name: '||v_ename);
                  8      dbms_output.put_line('Employee Job : '||v_job);
                  9  end;
                10  /

              Enter value for inputno: 7788
              old    5:    v_no:=&inputno;
              new    5:    v_no:=7788;
              Employee Name: SCOTT
              Employee Job : ANALYST

              PL/SQL procedure successfully completed.     

二、条件分支结构

      1.IF ... THEN ... END IF

              IF condition THEN
                      statement
              END IF;

              判断condition是否成立，成立就执行IF 与END IF 之间的语句。

              --例：输入员工编号，查询其工资，如果他们的职位是CLERK，则工资增加10%，再显示修改前后的工资数。

                      DECLARE
                              v_empid emp.empno%TYPE;
                              v_job emp.job%TYPE;
                              v_old_sal emp.sal%TYPE;
                              v_new_sal emp.sal%TYPE;
                      BEGIN
                              v_empid:=&inputid;
                              SELECT job,sal INTO v_job,v_old_sal FROM emp WHERE empno=v_empid;
                              IF v_job='CLERK' THEN
                                      v_new_sal:=v_old_sal*1.1;
                                      UPDATE emp SET sal=v_new_sal WHERE empno=v_empid;
                                      DBMS_OUTPUT.PUT_LINE('Old sal:'||v_old_sal);
                                      DBMS_OUTPUT.PUT_LINE('New sal:'||v_new_sal);
                              END IF;
                      EXCEPTION
                              WHEN NO_DATA_FOUND THEN
                                      DBMS_OUTPUT.PUT_LINE('Not FOUND RECORD');
                      END;
                      /

      2.IF ... THEN ... ELSE ... END IF

              IF condition THEN
                      statements1;
              ELSE
                      statements2;
              END IF;

              判断condition是否成立，成立就执行IF 与ELSE 之间的语句，

              否则执行ELSE 与END IF之间的语句。

              --例：输入员工编号,查询其工资,如果他们的职位是CLERK,则工资增加10%,如果不是CLERK,工资增加8%,再显示修改前后的工资数。

                      DECLARE
                              v_empid emp.empno%TYPE;