OraclePLSQL语句实例
/**
* plsql：某个项⽬对效率要求⽐较⾼的时候⽤，⼀般不⽤，⼤多数项⽬写的是夸数据库平台的，⽤不上。
* pssql⼤多数能做的东西，java都能替代它。在某些特殊的地⽅要求⽤plsql的时候你才会⽤。
*
* 变量声明的规则：
* 1、变量名不能使⽤保留字，如from、select等
* 2、第⼀个字符必须是字母
* 3、变量名最多包含30个字符
* 4、不要与数据库的表或者列同名
* 5、每⼀⾏只能声明⼀个变量
*
* 常⽤变量类型
* 1、 binary_integer：整数，主要⽤于计数⽽不是⽤来表⽰字段类型
* （Oracle本⾝⾮常注重效率，他的很多设计都是为了效率）
* 2、number：数字类型
* 3、char：定长字符串
* 4、varchar2：变长字符串
* 5、date：⽇期
* 6、long：长字符创，最长2GB
* 7、boolean：布尔类型，可以取为true、false和null值
*
*/
set serveroutput on;--默认是关闭的
begin
dbms_output.put_line('HelloWorld');
end;--输出HelloWorld
declare
v_name varchar2(20);
begin
v_name:='mynaem';
dbms_output.put_line(v_name);
end;
declare
v_num number :=0;
begin
v_num :=2/v_num;
dbms_output.put_line(v_num);
exception      --处理异常
when others then
dbms_output.put_line('error');
end;
declare
v_tem number(1);
v_count binary_integer :=0;
v_sal number(7,2):=4000.00;
v_date date:=sysdate;
v_pi constant number(3,2):=3.14; --sql⾥⾯也有常量
v_valid boolean:=false; --不能打印布尔类型的值
v_name varchar2(20) not null:='MyName'; --定义变量还能有限制
begin
dbms_output.put_line('v_temp value:' || v_temp);
end;
declare
v_empno number(4);
v_pno%type;--该变量的类型跟随另⼀变量的类型
v_empno3 v_empno2%type;
v_empno3 v_empno2%type;
begin
dbms_output.put_line('Test');
end
--Table变量类型
declare
/**
* type表⽰我定义了⼀种类型，名称叫tyep_table_emp_empno
* is table说明这是⼀个数组，这个数组⾥⾯装着pno%type类型的数据
* index by说明他的下表是由binary_ingeger来索引
*/
type tyep_table_emp_empno is table pno%type index by binary_ingeger;
v_empnos type_table_emp_empno;
begin
v_empnos(0):=7369;
v_empnos(2):=7839;
v_empnos(-1):=9999;--在Oracle⾥⾯，这个下标值可以取负值
dbms_output.put_line(v_empnos(-1));
end
--Record变量类型
declare
type type_record_dept is record
(
deptno dept.deptno%type,
dname dept.dname%type,
loc dept.loc%type
);
v_temp type_record_dept;
begin
v_temp.deptno:=50;
v_temp.dname:='aaaa';
v_temp.loc:='bj';
dbms_output.put_line(v_temp.deptno||' '||v_temp.dname);
end
--使⽤%rowtype声明record变量
declare
v_temp dept%rowtype;--更具dept表的字段来
begin
v_temp.deptno:=50;
v_temp.dname:='aaaa';
v_temp.loc:='bj';
dbms_output.put_line(v_temp.deptno||' '||v_temp.dname);
end
declare
v_deptno emp2.deptno%type:=10;
v_count number;
begin
update emp2 set sal=sal/2 where deptno=v_deptno;--update、insert、delete可以直接⽤
select deptno into v_deptno from emp2 where empno=7369;--select语句必须和into⼀起使⽤且保证有且只有⼀条记录 select count(*) into v_count from emp2;
dbms_output.put_line(sql%rowcount||'条记录被影响');--rowcount代表刚刚执⾏完的这条sql语句到底影响了多少条记录            --sql代表的是刚刚执⾏完的那条sql语句
commit;--⽤完之后要commit
end
/**
* plsql中的判断
*/
begin--create table语句在plsql⾥⾯不能单独执⾏
execute immediate 'create table T(nnn varchar2(20) default ''aaa'')';
end
declare
v_sal emp.sal%type;
begin
select sal into v_sal from emp where empno=7369;
if(v_sal<1200) then
dbms_output.put_line('low');
elsif(v_sal<2000) then --⼩⼼elsif中间没有e
dbms_output.put_line('middle');
else
dbms_output.put_line('high');
end if;
end
/**
* plsql 中的循环
*/
declare
i binary_integer:=1;
begin
loop --plsql⾥⾯的循环以loop开头，以end loop结尾
dbms_output.put_line(i);
i:=i+1;
exit when(i>=11);
end loop;
end
declare
j binary_integer:=1;
begin
while j<11 loop
dbms_output.put_line(j);
j:=j+1;
end loop;
end
begin
for k in 1..10 loop --相当于java⾥⾯增强的for循环
dbms_output.put_line(k);
end loop;
for k in reverse 1..10 loop
dbms_output.put_line(k);
end loop;
end
/**
* plsql⾥⾯的错误处理
* too_many_rows, no_data_found
* 这个东西了解下就够了
*/
declare
v_temp number(4);
begin
select empno into v_temp from emp where deptno=10; exception
when too_many_rows then
dbms_output.put_line('太多条记录了');
when others then
dbms_output.put_line('error');
end
/**
* 创建记录错误的⽇志表
*/
create table errorlog
create table errorlog
(
id number primary key,
errcode number,
errmsg varchar2(1024),
errdate date
);
create sequence seq_errorlog_id start with 1 increment by 1;
declare
sql存储过程实例v_deptno dept.deptno%type :=10;
v_errcode number;
v_errmsg varchar2(1024);
begin
delete from dept where deptno=v_deptno;
commit;
exception
when others then
rollback;--捕获到异常后⾸先要回滚
v_errcode:=SQLCODE;--SQLCODE代表出错的代码，Oracle⾥⾯出错代码都是负数  v_errmsg:=SQLERRM;--SQLERRM代表出错信息
insert into errorlog values(seq_val,v_errcode,v_errmsg,sysdate); commit;
end
/**
* 游标
*/
declare--loop循环
cursor c is select * from emp;
v_emp c%rowtype; --将v_emp定义为游标c的类型
begin
open c;
loop
fetch c into v_emp;
exit when (c%notfound)--如果不着记录就返回
dbms_output.put_line(ame);
end loop;
close c;
end
declare--while循环
cursor c is select * from emp;
v_emp c%rowtype; --将v_emp定义为游标c的类型
begin
open c;
fetch c into v_emp;
while(c%found) loop
dbms_output.put_line(ame);
fetch c into v_emp;
end loop;
close c;
end
declare--for循环:cursor 不需要打开或者关闭，所以for循环是我们平时⽤得最多的循环 cursor c is select * from emp;
begin
for v_emp in c loop;
dbms_output.put_line(ame);
end loop;
end
--带参数的游标
declare
cursor c(v_deptno emp.deptno%type, v_job emp.job%type)
is
select ename,sal from emp where deptno=v_deptno and job=v_job;
begin
for v_temp in c(30,'CLERK') loop
dbms_output.put_line(ame);
end loop;
end
--⼤多数的游标是⽤来读取的，也有部分游标是⽤来更新的（只需了解）declare
cursor c
is
select * from emp2 for update;
begin
for v_temp in c loop
if(v_temp.sal<2000)then
update emp2 set sal=sal*2 where current of c;
elseif(v_temp.sal=5000)then
delete from emp2 where current of c;
end if;
end loop;
commit;
end
/**
* 创建存储过程(存储过程创建了不代表她已经执⾏了)
* Oracle的存储过程，即便我们有语法错误，依然会被创建。执⾏的时候会报错。 */
create or replace procedure p
is
cursor c is
select * from emp2 for update;
begin
for v_temp in c loop
if(v_temp.sal<2000)then
update emp2 set sal=sal*2 where current of c;
elseif(v_temp.sal=5000)then
delete from emp2 where current of c;
end if;
end loop;
commit;
end
exec p;--执⾏存储过程
/**
* 带参数的存储过程
*  in是传⼊参数
*  out是传出参数（存储过程是没有返回值的）
*  如果没有写，默认是in
*  in out 即传⼊⼜传出
*/
create or replace procedure p
(v_a in number, v_b number, v_ret out number, v_temp in out number)
is
begin
if(v_a>v_b)then
v_ret:=v_a;
else
v_ret:=v_b;
end if;
v_temp:=v_temp+1;
end
--调⽤过程

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。