Oracle PL/SQL语言基础（二）

　 2009-10-17　【打印】　【收藏】

函数

　　函数是命名了的、存储在数据库中的PL/SQL程序块。函数接受零个或多个输入参数，有一个返回值，返回值的数据类型在创建函数时定义。定义函数的语法如下：

FUNCTION name [{parameter[,parameter,...])] RETURN datatypes IS
[local declarations]
BEGIN
execute statements
[EXCEPTION
exception handlers]
END [name]


　　过程

　　存储过程是一个PL/SQL程序块，接受零个或多个参数作为输入(INPUT)或输出(OUTPUT)、或既作输入又作输出(INOUT)，与函数不同，存储过程没有返回值，存储过程不能由SQL语句直接使用，只能通过EXECUT命令或PL/SQL程序块内部调用，定义存储过程的语法如下：

PROCEDURE name [(parameter[,parameter,...])] IS
[local declarations]
BEGIN
execute statements
[EXCEPTION
exception handlers ]
END [name]


　　包(package)

　　包其实就是被组合在一起的相关对象的集合，当包中任何函数或存储过程被调用，包就被加载入内存中，包中的任何函数或存储过程的子程序访问速度将大大加快。
包由两个部分组成：规范和包主体(body),规范描述变量、常量、游标、和子程序，包体完全定义子程序和游标。

　　触发器(trigger)

　　触发器与一个表或数据库事件联系在一起的，当一个触发器事件发生时，定义在表上的触发器被触发。

变量和常量

　　变量存放在内存中以获得值，能被PL/SQL块引用。你可以把变量想象成一个可储藏东西的容器，容器内的东西是可以改变的。

　　声明变量

　　变量一般都在PL/SQL块的声明部分声明，PL/SQL是一种强壮的类型语言，这就是说在引用变量前必须首先声明，要在执行或异常处理部分使用变量，那么变量必须首先在声明部分进行声明。

　　声明变量的语法如下：

Variable_name [CONSTANT] databyte [NOT NULL][:=|DEFAULT expression]


　　注意:可以在声明变量的同时给变量强制性的加上NOT NULL约束条件，此时变量在初始化时必须赋值。

　　给变量赋值

　　给变量赋值有两种方式：

　　. 直接给变量赋值

　　　X:=200;
　　　Y=Y+(X*20);

　　. 通过SQL Select INTO 或FETCH INTO给变量赋值

Select SUM(SALARY),SUM(SALARY*0.1)
INTO TOTAL_SALARY,TATAL_COMMISSION
FROM EMPLOYEE
Where DEPT=10;

　　常量

　　常量与变量相似，但常量的值在程序内部不能改变，常量的值在定义时赋予，，他的声明方式与变量相似，但必须包括关键字CONSTANT。常量和变量都可被定义为SQL和用户定义的数据类型。

ZERO_VALUE CONSTANT NUMBER:=0;


　　这个语句定了一个名叫ZERO_VALUE、数据类型是NUMBER、值为0的常量。

　　标量(scalar)数据类型

　　标量(scalar)数据类型没有内部组件，他们大致可分为以下四类：

　　　. number
　　　. character
　　　. date/time
　　　. boolean

　　表1显示了数字数据类型；表2显示了字符数据类型；表3显示了日期和布尔数据类型。

　　表1 Scalar Types:Numeric

Datatype
Range
Subtypes
description

BINARY_INTEGER
-214748-2147483647
NATURAL
NATURAL
NPOSITIVE
POSITIVEN
SIGNTYPE
用于存储单字节整数。
要求存储长度低于NUMBER值。
用于限制范围的子类型(SUBTYPE):
　NATURAL:用于非负数
　POSITIVE:只用于正数
　NATURALN:只用于非负数和非NULL值
　POSITIVEN:只用于正数，不能用于NULL值
　SIGNTYPE:只有值:-1、0或1.

NUMBER
1.0E-130-9.99E125
DEC
DECIMAL
DOUBLE
PRECISION
FLOAT
INTEGERIC
INT
NUMERIC
REAL
SMALLINT
存储数字值，包括整数和浮点数。可以选择精度和刻度方式，语法：
number[（[,]）]。
缺省的精度是38,scale是0.

PLS_INTEGER
-2147483647-2147483647

与BINARY_INTEGER基本相同，但采用机器运算时，PLS_INTEGER提供更好的性能 。


　　表2 字符数据类型

datatype
rang
subtype
description

CHAR
最大长度32767字节
CHARACTER
存储定长字符串，如果长度没有确定，缺省是1

LONG
最大长度2147483647字节

存储可变长度字符串

RAW
最大长度32767字节

用于存储二进制数据和字节字符串，当在两个数据库之间进行传递时，RAW数据不在字符集之间进行转换。

LONGRAW
最大长度2147483647

与LONG数据类型相似，同样他也不能在字符集之间进行转换。

ROWID
18个字节

与数据库ROWID伪列类型相同，能够存储一个行标示符，可以将行标示符看作数据库中每一行的唯一键值。

VARCHAR2
最大长度32767字节
STRINGVARCHAR
与VARCHAR数据类型相似，存储可变长度的字符串。声明方法与VARCHAR相同


　　表3 DATE和BOOLEAN

datatype
range
description

BOOLEAN
TRUE/FALSE
存储逻辑值TRUE或FALSE,无参数

DATE
01/01/4712 BC
存储固定长的日期和时间值，日期值中包含时间


　　LOB数据类型

　　LOB(大对象,Large object) 数据类型用于存储类似图像，声音这样的大型数据对象，LOB数据对象可以是二进制数据也可以是字符数据，其最大长度不超过4G。LOB数据类型支持任意访问方式，LONG只支持顺序访问方式。LOB存储在一个单独的位置上，同时一个"LOB定位符"(LOB locator)存储在原始的表中，该定位符是一个指向实际数据的指针。在PL/SQL中操作LOB数据对象使用ORACLE提供的包DBMS_LOB.LOB数据类型可分为以下四类：

　　. BFILE
　　. BLOB
　　. CLOB
　　. NCLOB

　　操作符

　　与其他程序设计语言相同，PL/SQL有一系列操作符。操作符分为下面几类：

　　. 算术操作符

　　. 关系操作符

　　. 比较操作符

　　. 逻辑操作符

　　算术操作符如表4所示

operator
operation

+ 加
- 减
/ 除

* 乘
** 乘方


　　关系操作符主要用于条件判断语句或用于where子串中，关系操作符检查条件和结果是否为true或false,表5是PL/SQL中的关系操作符

operator
operation


大于操作符

>=
大于或等于操作符

=
等于操作符

!=
不等于操作符


不等于操作符

:=
赋值操作符


　　表6 显示的是比较操作符

operator
operation

IS NULL
如果操作数为NULL返回TRUE

LIKE
比较字符串值

BETWEEN
验证值是否在范围之内

IN
验证操作数在设定的一系列值中


　　表7.8显示的是逻辑操作符

operator
operation

AND
两个条件都必须满足

or
只要满足两个条件中的一个

NOT
取反


　　执行部分

　　执行部分包含了所有的语句和表达式,执行部分以关键字BEGIN开始，以关键字EXCEPTION结束，如果EXCEPTION不存在，那么将以关键字END结束。分号分隔每一条语句，使用赋值操作符:=或Select INTO或FETCH INTO给每个变量赋值，执行部分的错误将在异常处理部分解决，在执行部分中可以使用另一个PL/SQL程序块，这种程序块被称为嵌套块

　　所有的SQL数据操作语句都可以用于执行部分，PL/SQL块不能再屏幕上显示Select语句的输出。Select语句必须包括一个INTO子串或者是游标的一部分，执行部分使用的变量和常量必须首先在声明部分声明，执行部分必须至少包括一条可执行语句，NULL是一条合法的可执行语句，事物控制语句COMMIT和ROLLBACK可以在执行部分使用，数据定义语言(Data Definition language)不能在执行部分中使用，DDL语句与EXECUTE IMMEDIATE一起使用或者是DBMS_SQL调用。

　　执行一个PL/SQL块

　　SQL*PLUS中匿名的PL/SQL块的执行是在PL/SQL块后输入/来执行，如下面的例子所示：

declare
　v_comm_percent constant number:=10;
begin
　update emp
　set comm=sal*v_comm_percent
　where deptno=10;
　end
SQL> /
PL/SQL procedure successfully completed.

SQL>


　　命名的程序与匿名程序的执行不同，执行命名的程序块必须使用execute关键字：

create or replace procedure update_commission
　(v_dept in number,v_pervent in number default 10) is
begin
　update emp
　set comm=sal*v_percent
　where deptno=v_dept;
end

SQL>/

Procedure created

SQL>execute update_commission(10,15);

PL/SQL procedure successfully completed.

SQL>


　　如果在另一个命名程序块或匿名程序块中执行这个程序，那么就不需要EXECUTE关进字。

declare
　v_dept number;
begin
　select a.deptno
　into v_dept
　from emp a
　where job='PRESIDENT'
　update_commission(v_dept);
end
SQL>/
　PL/SQL procedure successfully completed
SQL>


　控制结构

　　控制结构控制PL/SQL程序流程的代码行,PL/SQL支持条件控制和循环控制结构。

　　语法和用途

　　　IF..THEN

　　语法：

IF condition THEN
　Statements 1;
　Statements 2;
　....
END IF


　　IF语句判断条件condition是否为TRUE，如果是，则执行THEN后面的语句，如果condition为false或NULL则跳过THEN到END IF之间的语句，执行END IF后面的语句。

　　IF..THEN...ELSE

　　语法:

IF condition THEN
　Statements 1;
　Statements 2;
　....
ELSE
　Statements 1;
　Statements 2;
　....
END IF


　　如果条件condition为TRUE,则执行THEN到ELSE之间的语句，否则执行ELSE到END IF之间的语句。

　　IF 可以嵌套，可以在IF 或IF ..ELSE语句中使用IF或IF..ELSE语句。

if (a>b) and (a>c) then
　　g:=a;
else
　　g:=b;
　　if c>g then
　　　g:=c;
　　end if
end if


　　IF..THEN..ELSIF

　　语法：

IF condition1 THEN
　statement1;
ELSIF condition2 THEN
　statement2;
ELSIF condition3 THEN
　statement3;
ELSE
　statement4;
END IF;
　statement5;


　　如果条件condition1为TRUE则执行statement1,然后执行statement5,否则判断condition2是否为TRUE,若为TRUE则执行statement2,然后执行statement5,对于condition3也是相同的，如果condition1，condition2，condition3都不成立，那么将执行statement4,然后执行statement5。

　　循环控制

　　循环控制的基本形式是LOOP语句，LOOP和END LOOP之间的语句将无限次的执行。LOOP语句的语法如下：

　　LOOP
　　　statements;
　　END LOOP

　　LOOP和END LOOP之间的语句无限次的执行显然是不行的，那么在使用LOOP语句时必须使用EXIT语句，强制循环结束，例如：

X:=100;
LOOP
　X:=X+10;
　IF X>1000 THEN
　　EXIT;
　END IF
END LOOP;
Y:=X;


　　此时Y的值是1010.

　　EXIT WHEN语句将结束循环，如果条件为TRUE，则结束循环。

X:=100;
LOOP
X:=X+10;
EXIT WHEN X>1000;
X:=X+10;
END LOOP;
Y:=X;


　　WHILE..LOOP

　　WHILE..LOOP有一个条件与循环相联系，如果条件为TRUE,则执行循环体内的语句，如果结果为FALSE,则结束循环。

X:=100;
WHILE X。

　　标记程序块


[DECLARE]
... ... ...
BEGIN
........
[EXCEPTION]
.......
END label_name


　　标记循环


LOOP
.........

loop
..........

loop
....

EXIT outer_loop WHEN v_condition=0;
end loop innermost_loop;
..........
END LOOP inner_loop;
END LOOP outer_loop;


　　GOTO语句

　　语法：

　　GOTO LABEL;

　　执行GOTO语句时，控制会立即转到由标签标记的语句。PL/SQL中对GOTO语句有一些限制，对于块、循环、IF语句而言，从外层跳转到内层是非法的。

X ：=100;
FOR V_COUNTER IN 1..10 LOOP
　IF V_COUNTER =4 THEN
　　GOTO end_of_loop
　END IF
　X:=X+10;
　
　NULL
END LOOP

Y:=X;


　　注意：NULL是一个合法的可执行语句。

　　嵌套

　　程序块的内部可以有另一个程序块这种情况称为嵌套。嵌套要注意的是变量，定义在最外部程序块中的变量可以在所有子块中使用，如果在子块中定义了与外部程序块变量相同的变量名，在执行子块时将使用子块中定义的变量。子块中定义的变量不能被父块引用。同样GOTO语句不能由父块跳转道子块中，反之则是合法的。

《OUTER BLOCK》
DECLARE
　A_NUMBER INTEGER；
　B_NUMBER INTEGER；
BEGIN
　--A_NUMBER and B_NUMBER are available here
　
　DECLARE
　C_NUMBER INTEGER
　B_NUMBER NUMBER(20)
BEGIN
　C_NUMBER:=A_NUMBER;
　C_NUMBER=OUTER_BLOCK.B_NUMBER;
END SUB_BLOCK;
END OUT_BLOCK;


　　小结

　 我们在这篇文章中介绍了PL/SQL的基础语法以及如何使用PL/SQL语言设计和运行PL/SQL程序块，并将PL/SQL程序整合到Oracle服务器中,虽然PL/SQL程序作为功能块嵌入Oracle数据库中，但PL/SQL与ORACLE数据库的紧密结合使得越来越多的Oracle数据库管理员和开发人员开始使用PL/SQL。
---------------------------------------------------------------------------------------------------
oracle常用Script
----------------
1、查看当前所有对象
-------------------
SQL> select * from tab;

2、建一个和a表结构一样的空表
-----------------------------
SQL> create table b as select * from a where 1=2;

SQL> create table b(b1,b2,b3) as select a1,a2,a3 from a where 1=2;

3、察看数据库的大小，和空间使用情况
--------------------------------
SQL> col tablespace format a20
SQL> select b.file_id　　文件ID,
　　b.tablespace_name　　表空间,
　　b.file_name　　　　　物理文件名,
　　b.bytes　　　　　　　总字节数,
　　(b.bytes-sum(nvl(a.bytes,0)))　　　已使用,
　　sum(nvl(a.bytes,0))　　　　　　　　剩余,
　　sum(nvl(a.bytes,0))/(b.bytes)*100　剩余百分比
　　from dba_free_space a,dba_data_files b
　　where a.file_id=b.file_id
　　group by b.tablespace_name,b.file_name,b.file_id,b.bytes
　　order by b.tablespace_name
　　/
　　dba_free_space --表空间剩余空间状况
　　dba_data_files --数据文件空间占用情况

4、查看现有回滚段及其状态
-----------------------------
SQL> col segment format a30
SQL> Select SEGMENT_NAME,OWNER,TABLESPACE_NAME,SEGMENT_ID,FILE_ID,STATUS FROM DBA_ROLLBACK_SEGS;

5、查看数据文件放置的路径
---------------------------
SQL> col file_name format a50
SQL> select tablespace_name,file_id,bytes/1024/1024,file_name from dba_data_files order by file_id;

6、显示当前连接用户
---------------------
SQL> show user

7、把SQL*Plus当计算器
----------------------
SQL> select 100*20 from dual;

8、连接字符串
-----------
SQL> select 列1||列2 from 表1;
SQL> select concat(列1,列2) from 表1;

9、查询当前日期
---------------
SQL> select to_char(sysdate,'yyyy-mm-dd,hh24:mi:ss') from dual;

10、用户间复制数据
-----------------
SQL> copy from user1 to user2 create table2 using select * from table1;

11、视图中不能使用order by，但可用group by代替来达到排序目的
-----------------------------------------------------------
SQL> create view a as select b1,b2 from b group by b1,b2;

12、通过授权的方式来创建用户
---------------------------
SQL> grant connect,resource to test identified by test;

SQL> conn test/test
--------------------------------------------------------------------------------------------------
CHAR,VARCHAR,VARCHAR2类型的区别与使用
-------------------------------------
区别：
1．CHAR的长度是固定的，而VARCHAR2的长度是可以变化的， 比如，存储字符串"abc"，对于CHAR (20)，表示你存储的字符将占20个字节(包括17个空字符)，而同样的VARCHAR2 (20)则只占用3个字节的长度，20只是最大值，当你存储的字符小于20时，按实际长度存储。
2．CHAR的效率比VARCHAR2的效率稍高。
3．目前VARCHAR是VARCHAR2的同义词。工业标准的VARCHAR类型可以存储空字符串，但是oracle不这样做，尽管它保留以后这样做的权利。Oracle自己开发了一个数据类型VARCHAR2，这个类型不是一个标准的VARCHAR，它将在数据库中varchar列可以存储空字符串的特性改为存储NULL值。如果你想有向后兼容的能力，Oracle建议使用VARCHAR2而不是VARCHAR。

何时该用CHAR，何时该用varchar2？
CHAR与VARCHAR2是一对矛盾的统一体，两者是互补的关系.
VARCHAR2比CHAR节省空间，在效率上比CHAR会稍微差一些，即要想获得效率，就必须牺牲一定的空间，这也就是我们在数据库设计上常说的‘以空间换效率'。
VARCHAR2虽然比CHAR节省空间，但是如果一个VARCHAR2列经常被修改，而且每次被修改的数据的长度不同，这会引起‘行迁移'(Row Migration)现象，而这造成多余的I/O，是数据库设计和调整中要尽力避免的，在这种情况下用CHAR代替VARCHAR2会更好一些。