--示例1  PL/SQL 的基本语法

                declare  --声明：变量、游标
  v_num number(5) :=5;  --变量名 [constant：常量] 数据类型  [赋值] 
begin    --程序开始
  DBMS_OUTPUT.PUT_LINE('v_num的当前值为：'|| v_num);
--  if v_num>=10  then 
--    null;    --什么都不执行，只是为了填充语法；
--  else 
--    v_num :=v_num+10;
--  end if;
  
  
  if v_num<10 then
      v_num :=v_num+10;
  end if;
  DBMS_OUTPUT.PUT_LINE('v_num的更新值为：'|| v_num);
--exception    --异常
end;  --结束
              
--示例2  输出李浩鑫的地址

                declare
  --查询结果必须 =1 否则无法存储，报错
  v_address VARCHAR2(20);  --用来存储查询出来的地址
  v_name VARCHAR2(20) :='李浩鑫';
begin
  select "Address" into v_address
  from "Student"
  where "StudentName"=v_name;
  DBMS_OUTPUT.PUT_LINE(v_name||'的地址是：'||v_address);
exception
  when others then
  DBMS_OUTPUT.PUT_LINE('没有查到相关信息');
end;

              
--示例3  查询学号为8的学生姓名，并输出

                declare
  v_name "Student"."StudentName"%type;  --引用表中字段的类型，作为变量数据类型
  v_no number(20) :=8;
begin
  select "StudentName" into v_name
  from "Student"
  where "StudentNo"=v_no;
  DBMS_OUTPUT.PUT_LINE(v_no||'的姓名是：'||v_name);
exception
when others then
  DBMS_OUTPUT.PUT_LINE('没有查到相关信息');
end;
              
--示例4  查询学号为8的学生姓名和电话，并输出

                declare
  v_stuInfo "Student"%ROWTYPE; --引用表中所有字段的类型作为变量（集合）的类型
  v_no number(20) :=8;
begin
  select * into v_stuInfo
  from "Student"
  where "StudentNo"=v_no;
  DBMS_OUTPUT.PUT_LINE(v_no||'的姓名是：'||v_stuInfo."StudentName");
  DBMS_OUTPUT.PUT_LINE(v_no||'的电话是：'||v_stuInfo."Phone");
exception
when others then
  DBMS_OUTPUT.PUT_LINE('没有查到相关信息');
end;
              
--示例5  条件判断1：根据小明的成绩获得奖励

                declare
  v_score number(10) :=85;
begin
  if v_score>80 then
    DBMS_OUTPUT.PUT_LINE('奖励一个鸡腿');
  elsif v_score>60 then    --注意：elsif !!
    DBMS_OUTPUT.PUT_LINE('什么都不奖励');
  else
    DBMS_OUTPUT.PUT_LINE('奖励男女混合双打');
  end if;
exception
  DBMS_OUTPUT.PUT_LINE('没有查到相关信息');
end;
              
--小练习：>90的-10，>60且<=90加10，<=60加20分
declare
  v_score "Result"."StudentResult"%TYPE;
  v_stuNo "Result"."StudentNo"%TYPE :=1;
  v_subNo "Result"."SubjectNo"%TYPE :=2;
begin
  --查询出指定学生的指定科目的成绩，并存入变量

                  select "StudentResult" into v_score 
  from "Result"
  where "StudentNo"=v_stuNo and "SubjectNo"=v_subNo;
  --根据规则，修改变量赋值
  if v_score >90 then
    v_score :=v_score-10; --修改变量值
  elsif v_score >=60 then
    v_score :=v_score+10;  --修改变量值
  else
    v_score :=v_score+20; --修改变量值
  end if;
  --将修改后的变量值写入数据表中
  update "Result" set "StudentResult"=v_score
  where "StudentNo"=v_stuNo and "SubjectNo"=v_subNo;
--exception
END;
              
--示例6    等值判断  case 类似于Java中switch结构

                DECLARE
  v_count number(10);  --表示学生表中的总人数
BEGIN
  select count(1) into v_count
  from "Student";
  
  CASE v_count
  WHEN 6 THEN
    DBMS_OUTPUT.PUT_LINE('一共有'||v_count||'个人');
  WHEN 7 THEN
    DBMS_OUTPUT.PUT_LINE('一共有'||v_count||'个人');
  ELSE
    DBMS_OUTPUT.PUT_LINE('一共有好多个人');
  END CASE;
END;
              
--示例7    等值判断  case

                DECLARE
  v_count number(10);  --表示学生表中的总人数
BEGIN
  select count(1) into v_count
  from "Student";
  
  CASE   --如果when后是条件判断，那么case后不加变量
  WHEN v_count<=3 THEN
    DBMS_OUTPUT.PUT_LINE('一共有好少个人');
  WHEN v_count>=4 and v_count<=8 THEN
    DBMS_OUTPUT.PUT_LINE('一共有4-8个人');
  ELSE
    DBMS_OUTPUT.PUT_LINE('一共有好多个人');
  END CASE;
END;
              
--示例8   循环  loop：默认是一个无限循环，需要exit人工（强制）退出

                DECLARE
  v_num number(10) :=1;
BEGIN
  LOOP  --循环开始
    v_num :=v_num+2;  --循环操作
    DBMS_OUTPUT.PUT_LINE(v_num);--循环操作
  IF v_num>=20 THEN    --根据需求
    EXIT;  --退出Loop循环
  END IF; 
END LOOP;  --退出循环结构
END;

--示例9   while循环
DECLARE
  v_num number(10) :=1;
BEGIN
  while v_num<=20 loop
--    v_num :=v_num+2;  --循环操作
    DBMS_OUTPUT.PUT_LINE(v_num);--循环操作
  end loop;
END;
              
--示例10  for循环

                DECLARE
  v_num number(10) :=1;
BEGIN
  for i in 1..20 loop
    DBMS_OUTPUT.PUT_LINE(v_num);--循环操作
    v_num :=v_num +2;
  IF v_num>=20 THEN    --根据需求
    EXIT;  --退出Loop循环
  END IF; 
  end loop;
END;

              
--示例11  异常：exception

                DECLARE
  v_count number;  --默认长度255
  v_excep exception;
  v_excep2 exception;
BEGIN
  select count(1) into v_count
  from "Student" where "StudentNo"=1;
  if v_count>1 then
    raise v_excep; --raise：抛出  抛出一个异常对象
  elsif v_count=1 then
    DBMS_OUTPUT.PUT_LINE('找到了学号为1的学生');
  elsif v_count=0 then
    raise v_excep2;
  end if;
EXCEPTION  --处理异常
  when v_excep then  --匹配异常
    DBMS_OUTPUT.PUT_LINE('捕获到异常，学号有重复');
  when v_excep2 then
    DBMS_OUTPUT.PUT_LINE('不存在此学生');
  when others then  --捕获异常
    DBMS_OUTPUT.PUT_LINE('其他异常');
END;
              
--示例12  动态SQL，向表中插入一条数据

                DECLARE
  v_no number(4) :=7;  --参数变量
  v_name VARCHAR2(20) := 'Oracle';  --参数变量
  v_hour number(4) := 40;  --参数变量
  v_gradeId number(4) :=3;  --参数变量
  
  v_sql_str  VARCHAR2(255);  --存储sql语句变量
BEGIN
  --编写SQL语句，并设置占位符“:1”
  v_sql_str :='INSERT into "Subject" values(:1,:2,:3,:4) ';
  --用参数填充占位符
  --execute：执行  immediate：立即  using：使用
  execute immediate v_sql_str using v_no,v_name,v_hour,v_gradeId;
  commit;  --提交
END;
              
--示例13  游标，类似于Java中的迭代器

                DECLARE
  v_name "Student"."StudentName"%TYPE;
  v_phone "Student"."Phone"%TYPE;
  v_Address "Student"."Address"%TYPE;

--声明游标  cursor：光标
cursor c_stu is 
  select "StudentName","Phone","Address"  
  from "Student" where "StudentNo"=2;
BEGIN
  --打开游标
  open c_stu;
  --提取游标中的信息，并存入变量
  fetch c_stu into v_name,v_phone,v_Address;
  --输出信息
  DBMS_OUTPUT.PUT_LINE('姓名:'||v_name);
  DBMS_OUTPUT.PUT_LINE('电话:'||v_phone);
  DBMS_OUTPUT.PUT_LINE('地址:'||v_Address);
  
  --关闭游标
  close c_stu;
END;
              
--示例14   使用游标遍历多条结果

                DECLARE
  v_name "Student"."StudentName"%TYPE;
  v_phone "Student"."Phone"%TYPE;
  v_Address "Student"."Address"%TYPE;
  
  cursor c_stu is
  select "StudentName","Phone","Address" from "Student";
BEGIN
  --使用for循环遍历多条数据时，不需要打开游标，不需要提取，不需要关
  for stu in c_stu loop
    v_name :=stu."StudentName";
    v_phone :=stu."Phone";
    v_Address :=stu."Address";
    DBMS_OUTPUT.PUT_LINE('姓名:'||v_name);
    DBMS_OUTPUT.PUT_LINE('电话:'||v_phone);
    DBMS_OUTPUT.PUT_LINE('地址:'||v_Address);
  end loop;
END;