PL/SQL 是在我们常用语言上的扩展,使SQL语句有了结构化程序设计的特性,也就是我们常说的3种流程结构

  1. 顺序结构
  2. 分支结构
  3. 循环结构

这里我们不用存储过程,先单纯的用PL/SQL做连续,还是oracle pl/sql这本书上的例子

--创建个员工表create table t_emp(id number(10) not null, --主键IDname varchar2(10), --姓名job varchar2(30), --工作money number(10,2), --薪资deptno number --部门编码);--定义主键alter table t_emp add constraint emp_id primary key(id);--创建自增长序列create sequence seq_empincrement by 1 --每次加1start with 1 --开始于1nomaxvalue --不设置最大值minvalue 1--最小值1,可以设置nominvalue 无最小值nocycle --不循环cache 5 --缓存5insert into t_emp (id,name,job,money,deptno) values (seq_emp.nextval,'张三','后台开发','1000',1);insert into t_emp (id,name,job,money,deptno) values (seq_emp.nextval,'李四','前段','800',1);insert into t_emp (id,name,job,money,deptno) values (seq_emp.nextval,'王五','测试','700',2);insert into t_emp (id,name,job,money,deptno) values (seq_emp.nextval,'赵六','运维','600',3);commit;

在流程之前普及下PL/SQL中的关系运算符文章连接:http://www.yiibai.com/plsql/plsql_operators.html

算数运算符




db2 存储过程 有问题回滚 db2存储过程loop循环_db2存储过程 可以使用游标循环嵌套吗


关系运算符


db2 存储过程 有问题回滚 db2存储过程loop循环_SQL_02


比较运算符


db2 存储过程 有问题回滚 db2存储过程loop循环_db2 存储过程 有问题回滚_03


逻辑运算符


db2 存储过程 有问题回滚 db2存储过程loop循环_db2存储过程 可以使用游标循环嵌套吗_04


这个是简单的顺序流程

--声明declare--定义变量t_money1 number;t_money2 number;t_sumMoney number;begin  --查询id为1的员工工资 赋值给变量t_money1  select money into t_money1 from t_emp where id = '1';  -- 查询id为2的员工工资,赋值给变量2  select money into t_money2 from t_emp where id = '2';  --plsql中 等号 用:= 计算两个员工的工资和  t_sumMoney := t_money1+t_money2;  --结果输出  dbms_output.put_line('两员工工资和为'||t_sumMoney);end;

输出结果


db2 存储过程 有问题回滚 db2存储过程loop循环_赋值_05


--查询指定员工,判断职务,如果是开发加薪20%,测试加薪10%,运维加薪10%,前段加薪15%declare-- constant表示常量,这里我们定义常量常量add_kaifa constant number := 0.20;add_ceshi constant number := 0.10;add_yunwei constant number := 0.10;add_qianduan constant number := 0.15;v_job varchar2(50);begin   select job into v_job from t_emp te where te.id = 1;  if v_job ='后台开发'  then    update t_emp te set te.money = te.money*(1+add_kaifa) where te.id = 1;    elsif v_job ='测试'  then    update t_emp te set te.money = te.money*(1+add_ceshi) where te.id = 1;    elsif v_job='运维'  then     update t_emp te set te.money = te.money*(1+add_yunwei) where te.id = 1;    elsif v_job='前段'  then    update t_emp te set te.money = te.money*(1+add_qianduan) where te.id = 1;  end if;--显示处理的信息dbms_output.put_line('id为:'||1||'员工加薪成功');--定义异常exception  when no_data_found  thendbms_output.put_line('未找到员工');end;

这里需要注意是elsif 不是elseif 或者else if

--正确的写法if 条件 then 执行的方法 eslif 条件 then

PL/SQL中的循环大体有三种,loop. while-loop ,for-loop 。这里先展示一个loop
给所有员工按照职位进行加薪

-- loop 循环为员工加薪declare-- constant表示常量,这里我们定义常量常量add_kaifa constant number := 0.20;add_ceshi constant number := 0.10;add_yunwei constant number := 0.10;add_qianduan constant number := 0.15;v_job varchar2(50);--定义游标,游标查询后并不会对表数据进行锁表,如果使用了for update 就会对查询的数据锁表cursor list_job is select job from t_emp for update;begin   open list_job;--打开游标   loop      fetch list_job into v_job;--提取游标值     exit when list_job%notfound;--当循环到最后一个退出循环   if v_job ='后台开发'  then    update t_emp te set te.money = te.money*(1+add_kaifa) where current of list_job;--当需要更新或删除被update的数据需使用current of    elsif v_job ='测试'  then    update t_emp te set te.money = te.money*(1+add_ceshi) where current of list_job;    elsif v_job='运维'  then     update t_emp te set te.money = te.money*(1+add_yunwei) where current of list_job;    elsif v_job='前段'  then    update t_emp te set te.money = te.money*(1+add_qianduan) where current of list_job;  end if;  --输出提示  dbms_output.put_line ('职位为:'||v_job||'的员工加薪成功');    end loop;    --异常处理  close list_job;--关闭游标exception   when no_data_found  then   dbms_output.put_line('未找到员工');end;

在PL/SQL中能直接使用DDL语句进行增删查

--PL/SQL直接使用DDL语句declarev_job varchar2(50);begin  select job into v_job from t_emp where id = '1';  dbms_output.put_line(v_job);end;

但是不能直接使用DML语句进行建表等数据库操作,不过我们可以通过变量赋值的方式进行

--PL/SQL DML语句使用declarev_createTable varchar2(100) :='create table t_emp(id number(10) not null,name varchar2(10),job varchar2(30),money number(10,2),deptno number);' begin  execute immediate v_createTable;--执行DML语句end;