ITPub博客

首页 > 数据库 > Oracle > 2009-11-25 oracle学习日志——oracle编程基础(2)

2009-11-25 oracle学习日志——oracle编程基础(2)

原创 Oracle 作者:gutentagswh 时间:2009-11-25 16:49:18 0 删除 编辑

--简单的条件判断语句
--编写一个过程,可以输入一个雇员名,如果该雇员的工资低于2000

,就给该雇员工资增加10%
create or replace procedure swh_proc1(swhName varchar2) is
--声明
v_sal emp.sal%type;
begin
select sal into v_sal from emp where ename=swhName;
if v_sal<2000 then
update emp set sal=sal*1.1 where ename=swhName;
end if;
end;
--二重条件分支
--编写一个过程,可以输入一个雇员名,如果该雇员的补助不是0,

就在原来的基础上增加100;如果补助为0就把补助设为200
create or replace procedure swh_proc2(swhName varchar2) is
--声明
v_comm emp.comm%type;
begin
select comm into v_comm from emp where ename=swhName;
if v_comm<>0 then
update emp set comm=comm+100 where ename=swhName;
else
update emp set comm=200 where ename=swhName;
end if;
end;
--多重条件分支
--编写一个过程,可以输入一个雇员编号,如果该雇员的职位是

PRESIDENT就给他的工资增加1000,如果该雇员的职位是
--MANAGER,就给他的工资增加500,其他职位的雇员工资增加200.

create or replace procedure swh_proc3(swhNO number) is
v_job emp.job%type;
begin
select job into v_job from emp where empno=swhNO;
if v_job='PRESIDENT' then
update emp set sal=sal+1000 where empno=swhNO;
else if v_job='MANAGER' then
update emp set sal=sal+500 where empno=swhNO;
else
update emp set sal=sal+200 where empno=swhNO;
end if;
end if;
end;

--上面的循环语句也可以写成这样
create or replace procedure swh_proc3(swhNO number) is
v_job emp.job%type;
begin
select job into v_job from emp where empno=swhNO;
if v_job='PRESIDENT' then
update emp set sal=sal+1000 where empno=swhNO;
elsif v_job='MANAGER' then
update emp set sal=sal+500 where empno=swhNO;
else
update emp set sal=sal+200 where empno=swhNO;
end if;
end;
--循环语句 --loop
--假设有一张表users,表结构为users(userid,username),请编写一个过

程,可输入用户名,并循环添加10个用户到users
--表中,用户编号从1开始
--先创建users表
create table users(userNo number, userName varchar2(20));

create or replace procedure swh_proc4(swhName varchar2) is
--定义 :=表示赋值
v_num number:=1;
begin
loop
insert into users values(v_num,swhName);
--判断是否退出循环
exit when v_num=10;
v_num:=v_num+1;
end loop;
end;

--循环语句 --while循环

--假设有一张表users,表结构为users(userid,username),请编写一个过

程,可输入用户名,并循环添加10个用户到users
--表中,用户编号从1开始
--先创建users表
create table users(userNo number, userName varchar2(20));

create or replace procedure swh_proc4(swhName varchar2) is
--定义 :=表示赋值
v_num number:=1;
begin
while v_num<=10 loop
insert into users values(v_num,swhName);
--判断是否退出循环
v_num:=v_num+1;
end loop;
end;

[@more@]

来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/240707/viewspace-1029055/ ,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2009-11-19

  • 博文量
    11
  • 访问量
    6752