SQL

--if结构---
/*语法:
     IF 条件1 THEN 语句1;
      [ELSIF 条件2 THEN 语句2;]
      ....
      [ELSE 语句n+1;]
     END IF;
*/

----if else if else--
set serveroutput on;
declare
    i integer:=1;
begin
     dbms_output.put_line('进入if结构:');
     if i = 1 then
        dbms_output.put_line('壹');
     elsif i = 2 then
        dbms_output.put_line('贰');
     else
        dbms_output.put_line('叁');
     end if;
     Exception WHEN OTHERS THEN
        dbms_output.put_line('发生了异常!');
end;
/

--case 结构--
/*
   语法:
      CASE  条件选择器
           WHEN 值1 THEN 语句1;
           ....
           WHEN 值n THEN 语句n;
           [ELSE 语句n+1;]
      END CASE;
*/
--可以根据不同的情形作不同的操作--
set serveroutput on;
declare
   username varchar2(10):='wsb';
begin
     case username
          WHEN 'wsb' then dbms_output.put_line('吴辰保');
          WHEN 'ch' then dbms_output.put_line('辰枫');
          WHEN 'xw' then dbms_output.put_line('小吴');
          else dbms_output.put_line('不知道是谁！！！');
     end case;         
     EXCEPTION WHEN others then
         dbms_output.put_line('发生了异常！！');
end;
/

 

--null结构： 显式地指明不进行任何操作--
set serveroutput on;
declare
    username varchar2(20):='wsb';
    pwd varchar2(20):='wsbwsb';
begin
     if username != 'wsb' THEN NULL;  --如果不为wsb，则不进行任何操作
     else dbms_output.put_line('偷偷的告诉你:wsb 的密码为:' || pwd || '保密的哦！  呵呵！！');
     end if;
     EXCEPTION WHEN OTHERS THEN
          dbms_output.put_line('你的程序有问题！都出异常了！！！ ');
end;
/

 

--loop 循环--
/*
   语法:
        LOOP 循环体 END LOOP;
   说明：
       这种循环结构称LOOP循环，终止条件通过在循环体中加入EXIT或EXIT WHEN来实现.
*/

--loop循环   1:采用if判断exit进行退出循环--
set serveroutput on;
declare
   sum_number integer:=20;
   i integer:=1;
begin
     loop
          dbms_output.put_line(i);
          i:= i + 1;
          if i = sum_number THEN
             exit;
          end if;
     end loop;
exception when others then
          dbms_output.put_line('哎呀！ 发生了异常！！');
end;
/

--loop循环   1:采用exit WHEN 条件 退出循环--
set serveroutput on;
declare
   sum_number integer:=20;
   i integer:=1;
begin
     loop
          dbms_output.put_line(i);
          i:= i + 1;
          exit WHEN i = sum_number;
     end loop;
exception when others then
          dbms_output.put_line('哎呀！ 发生了异常！！');
end;
/

 

---while 循环----
/*
  语法
       WHILE 条件 LOOP 循环体 END LOOP；
 
  说明：
       当表示条件成立时执行循环体,当表示条件不成立时则退出循环
*/
set serveroutput on;
DECLARE
    i int:=1;
    s int:=20;
begin
     WHILE i <= s LOOP
           dbms_output.put_line('当前i为:' || i);
           i := i + 1;
           EXIT WHEN i=10;   --亦可以添加按条件进行退出的语句
     END LOOP;    
end;
/

 

------for 循环-----
/*
  语法:
       FOR 循环变量 IN [REVERSE] 初始值 .. 终值 LOOP
       循环体
       END LOOP;
  说明：
       执行过程首先将循环变量赋以初值，若其未超过终值，则执行循环休。
       每次循环后循环变量自动加1，如果未超过终值，则继续执行循环体，
       直至循环变量超过终值时退出循环。如果使用关键字REVERSE,则每次
       循环后循环变量自动减1.
*/
set serveroutput on;
declare
     i int;
begin
     for i in 1 .. 10 LOOP
         dbms_output.put_line('第'|| i ||'次进入循环！！');
     END LOOP;
     EXCEPTION WHEN OTHERS THEN
         dbms_output.put_line('发生了异常！！！');
end;
/

 

 

---GOTO 语句---
/*
    语句：
       GOTO <<label>>;
    说明:
       1、GOTO语句是一条件无条件转移语句，能够使程序从某处无条件转移到
       由标签所标识的语句。 
       2、程序中过多的使用GOTO语句使程序变得复杂，这各结构性性较差的代
       码是很难被理解和维护的，因此PL/SQL提倡尽量不要使用GOTO语句，PL/
       SQL还禁止使用GOTO语句从外层跳转到内层语句、循环体、IF语句和CASE
       语句中.
*/
SET SERVEROUTPUT on;
DECLARE
    NUM BINARY_INTEGER:=1;
BEGIN
     LOOP
         dbms_output.put_line(NUM);
         NUM:=NUM+1;
         IF NUM > 10 THEN GOTO label1;
            dbms_output.put_line('GOTO后面的语句');
         END IF;
     END LOOP;
     <<label1>>  
     dbms_output.put_line('<<label1>>处！！！');
     --NULL; 此处加上null没有报错
END;
/

 

 

 

 

 

-----------------------游标--------------------------
/*
  使用游标的步骤:
    1、声明游标
    2、打开游标
    3、推进游标
    4、关闭游标
   
  2、游标的属性并非返回一个类型，而是返回可以在表达式中使用的值。
 
  3、游标有四个属性: %FOUND、%NOTFOUND、%ISOPEN、%ROWCOUNT 

  4、
 
  %FOUND：若当前FETCH语句成功取出一行数据，则%FOUND返回TRUE;否则
  返回FALSE
  %NOTFOUND与%FOUND相反
 
  %ISOPEN判断当前的游标是否打开;用于判断游标的状态 
   
  %ROWCOUNT：返回游标已检索的数据行个数  推进一次为1，推进两次为2
 
*/

SET SERVEROUTPUT ON;
DECLARE
    CURSOR MYCURSOR IS SELECT  SID,SNAME FROM STUDENT;
    V_SID STUDENT.SID%TYPE;
    V_SNAME STUDENT.SNAME%TYPE;
BEGIN
     --打开游标
     OPEN MYCURSOR;
     --推进游标
     FETCH MYCURSOR INTO V_SID,V_SNAME;
     LOOP
         --先判断游标的状态:是否找到数据
         IF MYCURSOR%FOUND THEN
            dbms_output.put_line(TO_CHAR(MYCURSOR%ROWCOUNT) || TO_CHAR(V_SID) || TO_CHAR(V_SNAME));
            --推进游标
            FETCH MYCURSOR INTO V_SID,V_SNAME;
         --如果没有找到数据退出循环
         ELSIF MYCURSOR%NOTFOUND THEN EXIT;  
         END IF;
     END LOOP;
     --关闭游标
     IF MYCURSOR%ISOPEN THEN CLOSE MYCURSOR;
     END IF;
END;
/

 

 

-----------------常量的定义-------------------
/*
  语法:
       变量名 constant  类型[ :=初始值];
 
*/
---输出常量的值----
SET SERVEROUTPUT on;
declare
    author constant varchar2(30):='吴辰保';
begin
    dbms_output.put_line('常量值为:' || author);
end;
/
--试图改变常量的值----
SET SERVEROUTPUT on;
declare
    author constant varchar2(30):='吴辰保';
begin
    dbms_output.put_line('常量值为:' || author);
    author := 'hahaha';   --产生错误：表达式 'AUTHOR' 不能用作赋值目标
end;
/

 

 

-------------------------触发器------------------------------

 

 

 

 

 

 

 

 

select * from t_person;

 

--设置输出的格式--
set serveroutput on;

declare
       username varchar2(30);
       password varchar2(30);
       author constant varchar2(30) := '吴辰保';
begin
      select name,password into username,password from t_person where id = 1;
      dbms_output.put_line('用户名:' || username);
      dbms_output.put_line('密码  :' || password);
      dbms_output.put_line('作者  :' || author);
end;

---读取clob数据---
set serveroutput on;
declare
        bookContext clob;
        out_put varchar2(100);
        num1 integer :=20;   --表示长度
        num2 integer := 5;   --表示开始的位置(非索引)
begin
    SELECT chapter_text into bookContext FROM my_book_text where chapter_id = 5;
    dbms_lob.read(bookContext,num1,num2,out_put);  
    dbms_output.put_line(out_put);
    dbms_output.put_line(length(out_put));
    EXCEPTION WHEN OTHERS THEN
    dbms_output.put_line('发生了异常！');
end;
/