v_empno emp.empno%type:=&no;
v_ename emp.ename%type;
v_emp emp%rowtype;
修改输入员工的工资加上%10
declare
v_empno emp.empno%type:=&no;
v_ename emp.ename%type;
v_sal emp.sal%type;
begin
update emp set sal=sal*1.1 where empno=v_empno returning ename,sal into v_ename,v_sal;
dbms_output.put_line('员工名:'||v_ename||'新工资'||v_sal);
end;
/
输出所有记录
declare
v_num int;
v_emp emp%rowtype;
begin
select count(*) into v_num from emp;
for i in 1..v_num loop
select empno,ename,job,mgr,hiredate,sal,comm,deptno into v_emp from (select rownum r,emp.* from emp) where r=i;
dbms_output.put_line(v_emp.empno||chr(9)||v_emp.ename);
end loop;
end;
1、声明
cursor 游标名 is 查询语句;
2、打开
open 游标名;
3、提取(一次提取一行)
fetch 游标名 into 变量;
4、关闭
close 游标;
声明放在 declare里
declare
cursor rs is select * from emp;
v_emp emp%rowtype;
v_num int;
begin
select count(*) into v_num from emp;
open rs;
dbms_output.put_line('empno'||chr(9)||'ename'||chr(9)||'job');
for i in 1..v_num loop
fetch rs into v_emp;
dbms_output.put_line(v_emp.empno||chr(9)||v_emp.ename||chr(9)||v_emp.job);
end loop;
close rs;
end;
While版的 循环输出
declare
cursor rs is select * from emp;
v_emp emp%rowtype;
begin
open rs;
fetch rs into v_emp;
while rs%found loop
dbms_output.put_line(v_emp.ename);
fetch rs into v_emp;
end loop;
close rs;
end;
/
查询 工作 为** 的员工
declare
cursor rs(v_job varchar2) is select * from emp where job=v_job;
r_emp emp%rowtype;
begin
open rs('&Job');
loop
dbms_output.put_line(r_emp.ename||chr(9)||r_emp.job);
fetch rs into r_emp;
exit when rs%notfound;
end loop;
close rs;
end;
SQL
DDL:create alter drop
DML:insert update delete select
DCL:grant revoke
TCL:commit rollback savepoint
PL/SQL procedureal过程
程序块的基本结构
声明变量 常量
分支循环
Cursor==******游标=====ResultSet
存储过程
函数
异常
包
触发器
-----------------------
BEGIN
--执行部分
END;
dbms_output.put_line();
set serveroutput on
begin
end;
执行使用/
常用符号 .退出
/ 执行
'字符串类型单引号
:= 赋值符号
每句话有用分号结束
注释
单行注释 --
多行注释 /**/
名称 类型;
i int;
j constant int;
declare
--声明
begin
--执行
end;
练习:定义一个变量 有键盘输入
定义一个常量 hello
输出 常量和变量的值
例如 hello Tom
dbms_output.put_line();
dbms_output.put()
dbms_output.new_line() --没有参数
在pl/sql程序块中使用sql
在使用select查询时必须使用select into
需要注意:select into 只可以查到一行记录,不可以多也不可少。
DML:INSERT UPDATE DELETE SELECT
DDL:CREATE ALTER DROP --DDL 在pl/sql程序块中无法直接执行
DCL:GRANT REVOKE --DCL 在pl/sql程序块中无法直接执行
TCL:COMMIT ROLLBACK SAVEPOINT
练习
输入员工编号输出员工姓名
declare
v_empno number(4):=&no;
v_ename varchar2(20);
begin
select ename into v_ename from emp where empno=v_empno;
dbms_output.put_line(v_ename);
end;
输入一个数值判断成绩级别
0-59 差
60-80 可
81-90 良
91-100 优
其他值为输入错误
declare
v_i int:=&no;
begin
if v_i between 0 and 100 then
if v_i between 0 and 59 then
dbms_output.put_line('差');
else if v_i between 60 and 80 then
dbms_output.put_line('可');
else if v_i between 81 and 90 then
dbms_output.put_line('良');
else if v_i between 91 and 100 then
dbms_output.put_line('优');
end if;
end if;
end if;
end if;
else
dbms_output.put_line('输入的范围应该为0-100');
end if;
end;
if
case 两种格式
1 等值判断
case 变量
when 值1 then
....
when 值2 then
....
else
....
end case;
2 表达式判断
case
when 表达式1 then
....
when 表达式2 then
....
else
....
end case;
loop
--循环体;
exit;
end loop;
while 条件 loop
--循环体
end loop;
作业
--1 输入员工编号显示员工详细信息
declare
v_id int:=&1;
v_empno int;
v_ename varchar2(20);
v_job varchar2(20);
v_mgr int;
v_hiredate varchar2(20);
v_sal int;
v_comm int;
v_deptno int;
begin
select empno,ename into v_empno,v_ename from emp where empno=v_id;
dbms_output.put_line(v_empno||' '||v_ename);
end;
/
2 输入员工编号完成员工工资的调整
10部门 增长0.5%
20部门 增长1.0%
30部门 增长1.5%
40部门 增长2.0%
declare
v_id int:=&1;
v_deptno int;
begin
select deptno into v_deptno from emp where empno=v_id;
if v_deptno=10 then
update emp set sal=sal+sal*(0.5/100) where deptno=10;
else if v_deptno=20 then
update emp set sal=sal+sal*(1/100) where deptno=20;
else if v_deptno=30 then
update emp set sal=sal+sal*(1.5/100) where deptno=30;
else if v_deptno=40 then
update emp set sal=sal+sal*(2.0/100) where deptno=40;
end if;
end if;
end if;
end if;
end;
/