Oracle中PL/SQL的用法总结 |
本文标签:Oracle,PL/SQL用法 一、PLSQL基本结构1、基本数据类型变量1. 基本数据类型
在PL/SQL中使用的数据类型和Oracle数据库中使用的数据类型,有的含义是完全一致的,有的是有不同的含义的 。 2. 基本数据类型变量的定义方法变量名 类型标识符[not null]:=值; declare age number(3):=26; --长度为3,初始值为26 begin commit; end; 其中,定义常量的语法格式: 常量名 constant 类型标识符 [not null]:=值; declare pi constant number(9):=3.1415926;--为pi的数字型常量,长度为9,初始值为3.1415926 begin commit; end; 2、表达式变量、常量经常需要组成各种表达式来进行运算,下面介绍在PL/SQL中常见表达式的运算规则 。 1. 数值表达式 PL/SQL程序中的数值表达式是由数值型常数、变量、函数和算术运算符组成的, set serveroutput on Declare result integer; begin result:=10+3*4-20+5**2; dbms_output.put_line('运算结果是:'||to_char(result)); end; dbms_output.put_line函数输出只能是字符串,因此利用to_char函数将数值型结果转换为字符型 。 2. 字符表达式字符表达式由字符型常数、变量、函数和字符运算符组成,唯一可以使用的字符运算符就是连接运算符“||” 。 3. 关系表达式关系表达式由字符表达式或数值表达式与关系运算符组成,可以使用的关系运算符包括以下9种 。 4. 逻辑表达式逻辑表达式由逻辑常数、变量、函数和逻辑运算符组成,常见的逻辑运算符包括以下3种 。 3、PLSQL函数PL/SQL程序中提供了很多函数供扩展功能,除了标准SQL语言的函数可以使用外,最常见的数据类型转换函数有以下3个 。 4、系统输出打印利用pl/sql在数据库服务器端打印一句话: BEGIN DBMS_OUTPUT.PUT_LINE('Hello PL/SQL'); END; pl/sql程序中对大小写不敏感(打印声明的变量) set serveroutput on DECLARE v_char varchar2(20):='a'; v_char1 varchar2(20):='b'; BEGIN DBMS_OUTPUT.PUT_LINE(v_char); DBMS_OUTPUT.PUT_LINE(v_char1); END; pl语句块是pl/sql里最小的编程块,其中可以再嵌套begin end begin dbms_output.put_line('Hello World'); dbms_output.put_line('2*3='||(2*3)); dbms_output.put_line('what''s'); end; 5、PL/SQL中的变量声明所有变量必须在declare中声明,程序中不允许声明 。 declare v_number1 number; v_number2 number(3,2) ; v_number3 binary_integer :=1; v_name varchar2(20) :='kettas'; v_date date :=sysdate; v_long long :='ni hao'; v_b boolean := true; begin if (v_number1 is null) then dbms_output.put_line( 'hello'); end if; dbms_output.put_line(v_number1); dbms_output.put_line(v_number2); dbms_output.put_line(v_number3); dbms_output.put_line(v_name); dbms_output.put_line(v_date); dbms_output.put_line(v_long); --dbms_output.put_line(v_b); --执行该句ORACLE提示“调用'PUT_LINE' 时参数个数或类型错误” end; 备注: DECLARE v_Number number(4,3):=123.12312;--实际精度6位大于上限精度值4位,提示“ORA-06502:PL/SQL: 数字或值错误 : 数值精度太高” BEGIN DBMS_OUTPUT.PUT_LINE(v_Number); END; DECLARE v_Number number(7,3):=4555; --实际精度7位等于上限精度值,可以存储 BEGIN DBMS_OUTPUT.PUT_LINE(v_Number); END; 二、变量赋值方式oracle中变量赋值方式是值拷贝而非引用 declare v_number1 number:=100; v_number2 number; begin v_number2:=v_number1; v_number1:=200; dbms_output.put_line(v_number1); --200 dbms_output.put_line(v_number2); --100 end; 三、PLSQL复合类型1、记录类型recordrecord类型最常用,声明的时候可以加not null,但必须给初始值,如果record类型一致可以相互赋值,如果类型不同,里面的字段恰好相同,不能互相赋值 。引用记录型变量的方法是“记录变量名.基本类型变量名” 。 declare type t_first is record( idnumber(3), namevarchar2(20) ); v_first t_first; begin v_first.id:=1; v_first.name:='cheng'; dbms_output.put_line(v_first.id); dbms_output.put_line(v_first.name); end; record类型变量间赋值 declare type t_first is record( id number, name varchar2(20) ); v_first t_first; v_second t_first; begin v_first.id:=1; v_first.name:='susu'; v_second:=v_first;--相互赋值 v_first.id:=2; v_first.name:='kettas'; dbms_output.put_line(v_first.id); dbms_output.put_line(v_first.name); dbms_output.put_line(v_second.id); dbms_output.put_line(v_second.name); end; 2、表类型变量table语法如下: 1. 定义一维表类型变量declare type t_tb is table of varchar2(20)index by binary_integer; v_tb t_tb; begin v_tb(100):='hello'; v_tb(98):='world'; dbms_output.put_line(v_tb(100)); dbms_output.put_line(v_tb(98)); end; 类型为record的表类型变量 declare type t_rd is record(id number,namevarchar2(20)); type t_tb is table of t_rd index bybinary_integer; v_tb2 t_tb; begin v_tb2(100).id:=1; v_tb2(100).name:='hello'; --dbms_output.put_line(v_tb2(100).id); --dbms_output.put_line(v_tb2(100).name); dbms_output.put_line(v_tb2(100).id||' '||v_tb2(100).name); end; 2. 定义多维表类型变量该程序定义了名为tabletype1的多维表类型,相当于多维数组,table1是多维表类型变量,将数据表tempuser.testtable中recordnumber为60的记录提取出来 declare type tabletype1 is table of testtable%rowtypeindex by binary_integer; table1 tabletype1; begin select * into table1(60) fromtempuser.testtable where recordnumber=60; dbms_output.put_line(table1(60).recordnumber||table1(60).currentdate); end; 备注:在定义好的表类型变量里,可以使用count、delete、first、last、next、exists和prior等属性进行操作,使用方法为“表变量名.属性”,返回的是数字 。 set serveroutput on declare type tabletype1 is table ofvarchar2(9) index by binary_integer; table1 tabletype1; begin table1(1):='成都市'; table1(2):='北京市'; table1(3):='青岛市'; dbms_output.put_line('总记录数:'||to_char(table1.count)); dbms_output.put_line('第一条记录:'||table1.first); dbms_output.put_line('最后条记录:'||table1.last); dbms_output.put_line('第二条的前一条记录:'||table1.prior(2)); dbms_output.put_line('第二条的后一条记录:'||table1.next(2)); end; 四、 %type和%rowtype使用%type定义变量,为了让PL/SQL中变量的类型和数据表中的字段的数据类型一致,Oracle 9i提供了%type定义方法 。这样当数据表的字段类型修改后,PL/SQL程序中相应变量的类型也自动修改 。 create table student( id number, name varchar2(20), age number(3,0) ); insert into student(id,name,age) values(1,'susu',23); --查找一个字段的变量 declare v_name varchar2(20); v_name2 student.name%type; begin select name into v_name2 from studentwhere rownum=1; dbms_output.put_line(v_name2); end; --查找多个字段的变量 declare v_id student.id%type; v_name student.name%type; v_age student.age%type; begin select id,name,age into v_id,v_name,v_age fromstudent where rownum=1; dbms_output.put_line(v_id||' '||v_name||' '||v_age); end; --查找一个类型的变量,推荐用* declare v_student student%rowtype; begin select * into v_student from student whererownum=1; dbms_output.put_line(v_student.id||' '||v_student.name||' '||v_student.age); end; --也可以按字段查找,但是字段顺序必须一样,不推荐这样做 declare v_student student%rowtype; begin select id,name,age into v_student from student whererownum=1; dbms_output.put_line(v_student.id||' '||v_student.name||' '||v_student.age); end; declare v_student student%rowtype; begin select id,name,age intov_student.id,v_student.name,v_student.age from student where id=1; --select * intov_student.id,v_student.name,v_student.age from student where id=1; dbms_output.put_line(); end; 备注:insert,update,delete,select都可以,createtable,droptable不行 。DPL,DML,和流程控制语句可以在pl/sql里用,但DDL语句不行 。 declare v_name student.name%type:='wang'; begin insert into student(id,name,age)values(2,v_name,26); end; begin insert into student(id,name,age)values(5,'hehe',25); end; declare v_name student.name%type:='hexian'; begin update student set name=v_name where id=1; end; begin update student set name='qinaide' whereid=2; end; 五、PLSQL变量的可见空间变量的作用域和可见性,变量的作用域为变量申明开始到当前语句块结束 。 当外部过程和内嵌过程定义了相同名字的变量的时候,在内嵌过程中如果直接写这个变量名是没有办法访问外部过程的变量的,可以通过给外部过程定义一个名字<<outername>>,通过outername变量名来访问外部过程的变量(待测试..) 。 declare v_i1binary_integer:=1; begin declare v_i2binary_integer:=2; begin dbms_output.put_line(v_i1); dbms_output.put_line(v_i2); end; dbms_output.put_line(v_i1); --dbms_output.put_line(v_i2); 解开后执行Oracle会提示“必须说明标识符'V_I2'” end; 六、PLSQL流程控制if判断declare v_b boolean:=true; begin if v_b then dbms_output.put_line('ok'); end if; end; if else判断 declare v_b boolean:=true; begin if v_b then dbms_output.put_line('ok'); else dbms_output.put_line('false'); end if; end; if elsif else判断 declare v_name varchar2(20):='cheng'; begin if v_name='0701' then dbms_output.put_line('0701'); elsif v_name='cheng' then dbms_output.put_line('cheng'); else dbms_output.put_line('false'); end if; end; loop循环注意推出exit是推出循环,而不是推出整个代码块 declare v_i binary_integer:=0; begin loop if v_i>10 then exit; end if; v_i:=v_i+1; dbms_output.put_line('hehe'); end loop; dbms_output.put_line('over'); end; loop简化写法 declare v_i binary_integer :=0; begin loop exit when v_i>10; v_i :=v_i+1; dbms_output.put_line('hehe'); end loop; dbms_output.put_line('over'); end; while循环declare v_i binary_integer:=0; begin while v_i<10 loop dbms_output.put_line('hello'||v_i ); v_i:=v_i+1; end loop; dbms_output.put_line('over'); end; for循环注意不需要声明变量 begin for v_i in 0..10 loop dbms_output.put_line('hello'||v_i); end loop; dbms_output.put_line('over'); end; 七、PLSQL异常处理1、声明异常异常名 EXCEPTION; 2、抛出异常RAISE 异常名 3、处理异常抛出异常后的逻辑代码不会被继续执行 begin dbms_output.put_line(1/0); exception when othersthen dbms_output.put_line('error'); end; declare e_myException exception; begin dbms_output.put_line('hello'); raisee_myException; --raise抛出异常,用此关键字,抛出后转到自定义的e_myException ,执行其里面的putline函数后,再跳到end处,结束PL/SQL块,raise接下面的2句不会继续执行 。 dbms_output.put_line('world'); dbms_output.put_line(1/0); exception whene_myException then dbms_output.put_line(sqlcode); --当前会话执行状态,错误编码 dbms_output.put_line(sqlerrm); --当前错误信息 dbms_output.put_line('my error'); when othersthen dbms_output.put_line('error'); end; 八、PLSQL游标和goto语句备注:下面提到的游标为静态cursor,包括显示和隐式 。 declare cursor c_studentis select * from book; begin open c_student; close c_student; end; 第二种游标的定义方式,用变量控制结果集的数量 。 declare v_id binary_integer; cursor c_student isselect * from book where id>v_id; begin v_id:=10; open c_student; close c_student; end; 第三种游标的定义方式,带参数的游标,用的最多 。 declare cursor c_student(v_idbinary_integer) is select * from book where id>v_id; begin open c_student(10); close c_student; end; 游标的使用,一定别忘了关游标 。 declare v_student book%rowtype; cursor c_student(v_idbinary_integer) is select * from book where id>v_id; begin open c_student(10); fetch c_student intov_student; close c_student; dbms_output.put_line(v_student.name); end; 如何遍历游标fetch游标的属性 %found,%notfound,%isopen,%rowcount 。
注: create table BOOK ( ID VARCHAR2(10) not null, BOOKNAME VARCHAR2(10) not null, PRICE VARCHAR2(10) not null, CID VARCHAR2(10) not null ); --insert create or replace procedure say_hello( i_name in varchar2, o_result_msg out varchar2 ) as v_price varchar2(100); e_myException exception; begin insert into book(id,bookname,price)values (1,2,3); o_result_msg := 'success'; exception when others then rollback; o_result_msg := substr(sqlerrm, 1, 200); end; --update or delete create or replace procedure say_hello( i_name in varchar2, o_result_msg out varchar2 ) as v_price varchar2(100); e_myException exception; begin update book set price = '55' wherebookname = i_name; delete from book where bookname =i_name; if sql%notfound then raisee_myException; end if; /* if sql%rowcount = 0 then--写法2 raisee_myException; end if; */ o_result_msg := 'success'; exception when e_myException then rollback; o_result_msg := 'update or delete dail'; end; --select create or replace procedure say_hello( i_name in varchar2, o_result_msg out varchar2 ) as v_price varchar2(100); e_myException exception; begin select price into v_price from bookwhere bookname = i_name; o_result_msg := 'success'; exception when no_data_found then rollback; o_result_msg := 'select into dail'; end; loop方式遍历游标 declare v_bookname varchar2(100); cursor c_book(i_idnumber) is select bookname from book where id = i_id; begin Open c_book(i_id); Loop Fetch c_bookinto v_bookname; exit whenc_student%notfound; update book set price = '33' where bookname = v_bookname; End Loop; Close c_book; end; 或 declare v_bookname varchar2(100); cursor c_book(i_idnumber) is select bookname from book where id = i_id; begin Open c_book(i_id); Fetch c_book intov_bookname; While c_book%Found Loop update book set price = '33' where bookname = v_bookname; Fetch c_book intov_bookname; End Loop; Close c_book; end; while循环遍历游标,注意,第一次游标刚打开就fetch,%found为null,进不去循环 declare v_bookname varchar2(100); cursor c_book(i_id number) isselect bookname from book where id = i_id; begin Open c_book(i_id); while nvl(c_book%found,true)--或这种写法:while c_book%found is null or c_book%foundloop Fetchc_book into v_bookname; updatebook set price = '33' where bookname = v_bookname; End Loop; Close c_book; end; for循环遍历,最简单,用的最多,不需要 声明v_student,Open和Close游标和fetch操作(不用打开游标和关闭游标,实现遍历游标最高效方式) declare cursor c_book(i_id number) isselect bookname from book where id = i_id; begin for cur in c_book(i_id) --直接将入参i_id传入cursor即可 loop updatebook set price = '53' where bookname = cur.bookname; end loop; end; goto例子,一般不推荐使用goto,会使程序结构变乱 declare i number:=0; begin if i=0 then gotohello; end if; <<hello>> begin dbms_output.put_line('hello'); gotoover; end; <<world>> begin dbms_output.put_line('world'); gotoover; end; <<over>> dbms_output.put_line('over'); end; 九、Oracle存储过程在谈存储过程书写中的一些规则时,先看一下执行它的规则,在命令窗口执行存储过程sp_get_product_prompt set serveroutput on var ret1 varchar2(200); var ret2 varchar2(200); exec sp_get_product_prompt(83,:ret1,:ret2); --或execute print ret1; print ret2; 或 set serveroutput on declare ret1 varchar2(200); ret2 varchar2(200); begin sp_get_product_prompt(83,ret1,ret2); dbms_output.put_line(ret1); dbms_output.put_line(ret2); end; 存储过程入参,不论类型,缺省情况下值都为null,入参和出参不能有长度,其中关键字as可以替换成is,存储过程中变量声明在as和begin之间,同时,存储过程中可以再调用其它的存储过程,如果要保证存储过程之间的事务处理不受影响,可以定义为自治事务 。 create or replace procedure say_hello( v_name in varchar2, v_flag number, o_ret out number ) as begin if v_name is null and v_flag is null then --v_name和v_flag都等于null o_ret := 10; else o_ret := 100; end if; end; 对于入参为null情况下给予缺省值 create or replace procedure say_hello( i_name in varchar2, i_flag number, o_ret out number ) as v_name varchar2(100); begin if i_name is null then v_name := '0'; else v_name := i_name; end if; insert into phone(..,wname..,)values(..,v_name,..); end; 或直接在insert语句中调用nvl函数赋缺省值 insert intophone(..,wname..,) values(..,nvl(v_name,' '),..); ----如果将' '写成'',则insert进来的v_name值还是为''等价于null值 带一个参数的存储过程 create or replace procedure say_hello(v_name in varchar2) as begin --v_name:='a'; --存储过程入参v_name不能做为赋值目标 dbms_output.put_line('hello '||v_name); end; 存储过程输入参数作为变量进行条件判断create or replace procedure say_hello( i_opFlag in number ) as v_name varchar2(100); begin if i_opFlag = 1 then v_name :='0'; else v_name :='haha'; end if; dbms_output.put_line('hello'||v_name); end; 利用存储过程中定义的变量对入参的空值处理:create or replace procedure say_hello( i_name in varchar2 ) as v_name varchar2(100); begin if i_name is null then v_name :='0'; else v_name :=i_name;--将入赋值给定义变量 end if; dbms_output.put_line('hello'||v_name); end; 多个参数的存储过程create or replace procedure say_hello( v_first_name in varchar2, v_last_name in varchar2) as begin dbms_output.put_line('hello'||v_first_name||'.'||v_last_name); end; out输出参数用于利用存储过程给一个或多个变量赋值,类似于返回值 create or replaceprocedure say_hello( v_name in varchar2, v_content out varchar2 ) begin v_content:='hello'||v_name; end; 调用: declare v_con varchar2(200); v_in varchar2(20):='wang'; begin say_hello(v_in,v_con); dbms_output.put_line(v_con); end; in out参数,既赋值又取值create or replace procedure say_hello(v_name in outvarchar2) as begin v_name:='hi '||v_name; end; 调用: declare v_inout varchar2(20):='wangsu'; begin say_hello(v_inout); dbms_output.put_line(v_inout); end; 对存储过程入参赋缺省值create or replace procedure say_hello( v_name varchar2 default 'susu', v_content varchar2 default 'hello' ) as begin dbms_output.put_line(v_name||''||v_content); end; 调用:(用指明形参名的方式调用更好) begin say_hello(); end; 或 begin say_hello('cheng'); end; 或 begin say_hello(v_name=>'cheng'); end; 十、PLSQL中的functionFUNCTION和PROCEDURE的区别1、函数有返回值,过程没有 过程有零个或多个参数,没有返回值 。 函数和过程都可以通过参数列表接收或返回零个或多个值,函数和过程的主要区别不在于返回值,而在于他们的调用方式,过程是作为一个独立执行语句调用的,函数以合法的表达式的方式调用 。 create or replace function func(v_name in varchar2) return varchar2 is begin return(v_name||' hello'); end; 调用: declare v_name varchar2(20); begin v_name:=func('cheng'); dbms_output.put_line(v_name); end; 带out参数的函数create or replace function func( v_name in varchar2, v_content out varchar2 ) return varchar2 is begin v_content:=v_name||' hello'; return v_content; end; 调用: declare v_name varchar2(20); v_name1 varchar2(20); begin v_name1:=func('susu',v_name);--返回v_name值 dbms_output.put_line(v_name1);--打印func结果 dbms_output.put_line(v_name);--打印v_name结果 end; 带in out 参数的函数create or replace function func( v_name in out varchar2) return varchar2 is begin v_name:=v_name||' hello'; return 'cheng'; end; 调用: declare v_inout varchar2(20):='world'; v_ret varchar2(20); begin v_ret:=func(v_inout);--返回调用v_inout值(作为出参) dbms_output.put_line(v_ret);--打印func结果 dbms_output.put_line(v_inout);--返回v_name结果 end; 到此这篇关于Oracle中PL/SQL用法的文章就介绍到这了 。希望对大家的学习有所帮助,也希望大家多多支持 。 |