Chinaunix首页 | 论坛 | 博客
  • 博客访问: 706108
  • 博文数量: 112
  • 博客积分: 3889
  • 博客等级: 少校
  • 技术积分: 1448
  • 用 户 组: 普通用户
  • 注册时间: 2010-10-19 16:35
个人简介

追求卓越,成功就会在不经意间追上你

文章分类

全部博文(112)

文章存档

2015年(1)

2014年(2)

2013年(1)

2012年(16)

2011年(86)

2010年(6)

分类: Oracle

2011-05-12 20:35:14

ORACLE PL/SQL编程详解之二:

 

PL/SQL块结构和组成元素(为山九仞,岂一日之功)

 

 

继上四篇:ORACLE PL/SQL编程之八:把触发器说透

               ORACLE PL/SQL编程之六:把过程与函数说透(穷追猛打,把根儿都拔起!)

               [推荐]ORACLE PL/SQL编程之四:把游标说透(不怕做不到,只怕想不到) 

    [推荐]ORACLE PL/SQL编程之五:异常错误处理(知已知彼、百战不殆)

 

 昨天与我的一个朋友聊天,他可是技术牛人,但从来不写博客。我建议他写写博客,他说没时间,再说没意思。写博客好处多多,不仅可对自己的知识进行一个总体性的提炼和总结,引发深思,同时网上也有很多技术达人,可对你的文章提出建设性的意见,不管理对自己还是对别人都是一种帮助与提高。最主要的是可以为社会留下点什么。虽然我没有那么高尚,但人活一辈子,以后老死了总得留点东西给后辈吧~!我觉得有的人很可悲,虽然他个人能力超强,可不愿意分享自己的知识,这是为什么呢?

一句话:通过知识共享树立个人品牌。

接下来介绍PL/SQL的基础篇:PL/SQL块结构和组成元素,还望大家继续支持与推荐~

 

 

本篇主要内容如下:

2.1   PL/SQL

2.2   PL/SQL结构

2.3   标识符

2.4   PL/SQL 变量类型

2.4.1  变量类型

2.4.2  复合类型

2.4.2.1 记录类型

2.4.2.2 数组类型

2.4.2.3 使用%TYPE

2.4.3  使用%ROWTYPE

2.4.4  LOB类型

2.4.5  BIND 变量

2.4.6  PL/SQL (TABLE)

2.5   运算符和表达式(数据定义)

2.5.1  关系运算符

2.5.2  一般运算符

2.5.3  逻辑运算符

2.6   变量赋值

2.6.1  字符及数字运算特点

2.6.2  BOOLEAN 赋值

2.6.3  数据库赋值

2.6.4  可转换的类型赋值

2.7   变量作用范围及可见性

2.8   注释

2.9   简单例子

2.9.1   简单数据插入例子

2.9.2   简单数据删除例子

 

 

PL/SQL程序由三个块组成,即声明部分、执行部分、异常处理部分。

 

PL/SQL块的结构如下:

 

 DECLARE  
    
--声明部分: 在此声明PL/SQL用到的变量,类型及游标,以及局部的存储过程和函数
  BEGIN
    
-- 执行部分:  过程及SQL 语句  , 即程序的主要部分
  EXCEPTION
    
-- 执行异常部分: 错误处理
  END;

 

其中:执行部分不能省略。

 

PL/SQL块可以分为三类:

 

1.        无名块或匿名块(anonymous):动态构造,只能执行一次,可调用其它程序,但不能被其它程序调用。

2.        命名块(named):是带有名称的匿名块,这个名称就是标签。

3.        子程序(subprogram):存储在数据库中的存储过程、函数等。当在数据库上建立好后可以在其它程序中调用它们。

4.        触发器 Trigger):当数据库发生操作时,会触发一些事件,从而自动执行相应的程序。

5.        程序包(package):存储在数据库中的一组子程序、变量定义。在包中的子程序可以被其它程序包或子程序调用。但如果声明的是局部子程序,则只能在定义该局部子程序的块中调用该局部子程序。

结构

l       PL/SQL块中可以包含子块;

l       子块可以位于 PL/SQL中的任何部分;

l       子块也即PL/SQL中的一条命令;

 

标识符

PL/SQL程序设计中的标识符定义与SQL 的标识符定义的要求相同。要求和限制有:

l       标识符名不能超过30字符;

l       第一个字符必须为字母;

l       不分大小写;

l       不能用’-‘(减号);

l       不能是SQL保留字。

提示:  一般不要把变量名声明与表中字段名完全一样,如果这样可能得到不正确的结果.

 

例如:下面的例子将会删除所有的纪录,而不是’EricHu’的记录;

DECLARE
   ename 
varchar2(20) :='EricHu';
BEGIN
  
DELETE FROM scott.emp WHERE ename=ename;
END;

 

    变量命名在PL/SQL中有特别的讲究,建议在系统的设计阶段就要求所有编程人员共同遵守一定的要求,使得整个系统的文档在规范上达到要求。下面是建议的命名方法:

 

标识符

命名规则

例子

程序变量

V_name

V_name

程序常量

C_Name

C_company_name

游标变量

Cursor_Name

Cursor_Emp

异常标识

E_name

E_too_many

表类型

Name_table_type

Emp_record_type

Name_table

Emp

记录类型

Name_record

Emp_record

SQL*Plus 替代变量

P_name

P_sal

绑定变量

G_name

G_year_sal

 

变量类型

在前面的介绍中,有系统的数据类型,也可以自定义数据类型。下表给出ORACLE类型和PL/SQL中的变量类型的合法使用列表:

 

2.4.1  变量类型

 

ORACLE8i中可以使用的变量类型有:

类型

子类

     

   

ORACLE限制

CHAR

Character

String

Rowid

Nchar

定长字符串

 

 

民族语言字符集

0à32767

可选,确省=1

2000

VARCHAR2

Varchar, String

NVARCHAR2

可变字符串

民族语言字符集

0à32767

4000

4000

BINARY_INTEGER

 

带符号整数,为整数计算优化性能

 

 

NUMBER(p,s)

Dec

 

Double precision

Integer

Int

Numeric

Real

Small int

小数, NUMBER 的子类型

高精度实数

整数, NUMBER 的子类型

整数, NUMBER 的子类型

NUMBER等价

NUMBER等价

整数 integer 

 

 

LONG

 

变长字符串

0->2147483647

32,767字节

DATE

 

日期型

公元前471211日至公元后47121231

 

BOOLEAN

 

布尔型

TRUE, FALSE,NULL

不使用

ROWID

 

存放数据库行号

 

 

UROWID

 

通用行标识符,字符类型

 

 

 

 

 

 

 

 

1. 插入一条记录并显示;

 

DECLARE
   Row_id ROWID;
   info    
VARCHAR2(40);
BEGIN
  
INSERT INTO scott.dept VALUES (90'财务室''海口')
  RETURNING rowid, dname
||':'||to_char(deptno)||':'||loc
  
INTO row_id, info;
  DBMS_OUTPUT.PUT_LINE(
'ROWID:'||row_id);
  DBMS_OUTPUT.PUT_LINE(info);
END;

 

其中:

RETURNING子句用于检索INSERT语句中所影响的数据行数,当INSERT语句使用VALUES 子句插入数据时,RETURNING 字句还可将列表达式、ROWIDREF值返回到输出变量中。在使用RETURNING 子句是应注意以下几点限制:

1.不能与DML语句和远程对象一起使用;

2.不能检索LONG 类型信息;

3.当通过视图向基表中插入数据时,只能与单基表视图一起使用。

 

2. 修改一条记录并显示

 

DECLARE
   Row_id ROWID;
   info   
VARCHAR2(40);
BEGIN
  
UPDATE dept SET deptno=100 WHERE DNAME='财务室'
  RETURNING rowid, dname
||':'||to_char(deptno)||':'||loc
  
INTO row_id, info;
  DBMS_OUTPUT.PUT_LINE(
'ROWID:'||row_id);
  DBMS_OUTPUT.PUT_LINE(info);
END;

 

其中:

RETURNING子句用于检索被修改行的信息。当UPDATE语句修改单行数据时,RETURNING 子句可以检索被修改行的ROWIDREF值,以及行中被修改列的列表达式,并可将他们存储到PL/SQL变量或复合变量中;当UPDATE语句修改多行数据时,RETURNING 子句可以将被修改行的ROWIDREF值,以及列表达式值返回到复合变量数组中。在UPDATE中使用RETURNING 子句的限制与INSERT语句中对RETURNING子句的限制相同。

 

3. 删除一条记录并显示

 

DECLARE
   Row_id ROWID;
   info   
VARCHAR2(40);
BEGIN
  
DELETE dept WHERE DNAME='办公室'
  RETURNING rowid, dname
||':'||to_char(deptno)||':'||loc
  
INTO row_id, info;
  DBMS_OUTPUT.PUT_LINE(
'ROWID:'||row_id);
  DBMS_OUTPUT.PUT_LINE(info);
END;

 

其中:

RETURNING子句用于检索被删除行的信息:当DELETE语句删除单行数据时,RETURNING 子句可以检索被删除行的ROWIDREF值,以及被删除列的列表达式,并可将他们存储到PL/SQL变量或复合变量中;当DELETE语句删除多行数据时,RETURNING 子句可以将被删除行的ROWIDREF值,以及列表达式值返回到复合变量数组中。在DELETE中使用RETURNING 子句的限制与INSERT语句中对RETURNING子句的限制相同。

 

2.4.2  复合类型

    ORACLE  PL/SQL 中除了提供象前面介绍的各种类型外,还提供一种称为复合类型的类型---记录和表.

 

2.4.2.1 记录类型

记录类型类似于C语言中的结构数据类型,它把逻辑相关的、分离的、基本数据类型的变量组成一个整体存储起来,它必须包括至少一个标量型或RECORD 数据类型的成员,称作PL/SQL RECORD 的域(FIELD),其作用是存放互不相同但逻辑相关的信息。在使用记录数据类型变量时,需要先在声明部分先定义记录的组成、记录的变量,然后在执行部分引用该记录变量本身或其中的成员。

 

定义记录类型语法如下:

 

TYPE record_name IS RECORD(
   v1 data_type1  
[NOT NULL]  [:= default_value ],
   v2 data_type2  
[NOT NULL]  [:= default_value ],
   ......
   vn data_typen  
[NOT NULL]  [:= default_value ] );

 

DECLARE 
   TYPE test_rec 
IS RECORD(
         Name 
VARCHAR2(30NOT NULL := '胡勇',
         Info 
VARCHAR2(100));
   rec_book test_rec;
BEGIN
   rec_book.Name :
='胡勇';
   rec_book.Info :
='谈PL/SQL编程;';
   DBMS_OUTPUT.PUT_LINE(rec_book.Name
||'  ' ||rec_book.Info);
END;

 

可以用 SELECT语句对记录变量进行赋值,只要保证记录字段与查询结果列表中的字段相配即可。

 

 

DECLARE
--定义与hr.employees表中的这几个列相同的记录数据类型
   TYPE RECORD_TYPE_EMPLOYEES IS RECORD(
        f_name   hr.employees.first_name
%TYPE,
        h_date   hr.employees.hire_date
%TYPE,
        j_id     hr.employees.job_id
%TYPE);
--声明一个该记录数据类型的记录变量
   v_emp_record RECORD_TYPE_EMPLOYEES;

BEGIN
   
SELECT first_name, hire_date, job_id INTO v_emp_record
   
FROM employees
   
WHERE employee_id = &emp_id;

   DBMS_OUTPUT.PUT_LINE(
'雇员名称:'||v_emp_record.f_name
             
||'  雇佣日期:'||v_emp_record.h_date
             
||'  岗位:'||v_emp_record.j_id);
END;

 

一个记录类型的变量只能保存从数据库中查询出的一行记录,若查询出了多行记录,就会出现错误。

 

2.4.2.2 数组类型

数据是具有相同数据类型的一组成员的集合。每个成员都有一个唯一的下标,它取决于成员在数组中的位置。在PL/SQL中,数组数据类型是VARRAY

 

定义VARRY数据类型语法如下:

TYPE varray_name IS VARRAY(size) OF element_type [NOT NULL];

 

varray_nameVARRAY数据类型的名称,size是下整数,表示可容纳的成员的最大数量,每个成员的数据类型是element_type。默认成员可以取空值,否则需要使用NOT NULL加以限制。对于VARRAY数据类型来说,必须经过三个步骤,分别是:定义、声明、初始化。

 

 

DECLARE
--定义一个最多保存5个VARCHAR(25)数据类型成员的VARRAY数据类型
   TYPE reg_varray_type IS VARRAY(5OF VARCHAR(25);
--声明一个该VARRAY数据类型的变量
   v_reg_varray REG_VARRAY_TYPE;

BEGIN
--用构造函数语法赋予初值
   v_reg_varray := reg_varray_type
         (
'中国''美国''英国''日本''法国');

   DBMS_OUTPUT.PUT_LINE(
'地区名称:'||v_reg_varray(1)||''
                                    
||v_reg_varray(2)||''
                                    
||v_reg_varray(3)||''
                                    
||v_reg_varray(4));
   DBMS_OUTPUT.PUT_LINE(
'赋予初值NULL的第5个成员的值:'||v_reg_varray(5));
--用构造函数语法赋予初值后就可以这样对成员赋值
   v_reg_varray(5) := '法国';
   DBMS_OUTPUT.PUT_LINE(
'第5个成员的值:'||v_reg_varray(5));
END;

 

2.4.2.3 使用%TYPE

定义一个变量,其数据类型与已经定义的某个数据变量(尤其是表的某一列)的数据类型相一致,这时可以使用%TYPE

使用%TYPE特性的优点在于:

l         所引用的数据库列的数据类型可以不必知道;

l         所引用的数据库列的数据类型可以实时改变,容易保持一致,也不用修改PL/SQL程序。

 

7

 

DECLARE
   
-- 用%TYPE 类型定义与表相配的字段
   TYPE T_Record IS RECORD(
        T_no emp.empno
%TYPE,
        T_name emp.ename
%TYPE,
        T_sal emp.sal
%TYPE );
   
-- 声明接收数据的变量
   v_emp T_Record;
BEGIN
   
SELECT empno, ename, sal INTO v_emp FROM emp WHERE empno=7788;
   DBMS_OUTPUT.PUT_LINE
    (TO_CHAR(v_emp.t_no)
||' '||v_emp.t_name||'  ' || TO_CHAR(v_emp.t_sal));
END;

 

8

 

DECLARE
   v_empno emp.empno
%TYPE :=&no;
   Type t_record 
is record (
        v_name   emp.ename
%TYPE,
        v_sal    emp.sal
%TYPE,
        v_date   emp.hiredate
%TYPE);
   Rec t_record;
BEGIN
   
SELECT ename, sal, hiredate INTO Rec FROM emp WHERE empno=v_empno;
   DBMS_OUTPUT.PUT_LINE(Rec.v_name
||'---'||Rec.v_sal||'--'||Rec.v_date);
END;

 

 

2.4.3  使用%ROWTYPE

PL/SQL 提供%ROWTYPE操作符返回一个记录类型其数据类型和数据库表的数据结构相一致。

使用%ROWTYPE特性的优点在于:

l         所引用的数据库中列的个数和数据类型可以不必知道;

l         所引用的数据库中列的个数和数据类型可以实时改变,容易保持一致,也不用修改PL/SQL程序。

 

9

 

DECLARE
    v_empno emp.empno
%TYPE :=&no;
    rec emp
%ROWTYPE;
BEGIN
    
SELECT * INTO rec FROM emp WHERE empno=v_empno;
    DBMS_OUTPUT.PUT_LINE(
'姓名:'||rec.ename||'工资:'||rec.sal||'工作时间:'||rec.hiredate); 
END;

 

 

2.4.4  LOB类型

    ORACLE提供了LOB (Large OBject)类型,用于存储大的数据对象的类型。ORACLE目前主要支持BFILE, BLOB, CLOB  NCLOB 类型。

 

BFILE (Movie)

    存放大的二进制数据对象,这些数据文件不放在数据库里,而是放在操作系统的某个目录里,数据库的表里只存放文件的目录。

 

BLOB(Photo)

    存储大的二进制数据类型。变量存储大的二进制对象的位置。大二进制对象的大小<=4GB

 

CLOB(Book)

    存储大的字符数据类型。每个变量存储大字符对象的位置,该位置指到大字符数据块。大字符对象的大小<=4GB

 

NCLOB

    存储大的NCHAR字符数据类型。每个变量存储大字符对象的位置,该位置指到大字符数据块。大字符对象的大小<=4GB

 

2.4.5  BIND 变量

绑定变量是在主机环境中定义的变量。在PL/SQL 程序中可以使用绑定变量作为他们将要使用的其它变量。为了在PL/SQL 环境中声明绑定变量,使用命令VARIABLE。例如:

 

VARIABLE return_code NUMBER
VARIABLE return_msg 
VARCHAR2(20)

 

可以通过SQL*Plus命令中的PRINT 显示绑定变量的值。例如:

 

PRINT return_code
PRINT return_msg

 

10

 

VARIABLE result NUMBER;
BEGIN
  
SELECT (sal*10)+nvl(comm, 0INTO :result FROM emp 
  
WHERE empno=7844;
END;
--然后再执行
PRINT result

 

 

2.4.6  PL/SQL (TABLE)

定义记录表(或索引表)数据类型。它与记录类型相似,但它是对记录类型的扩展。它可以处理多行记录,类似于高级中的二维数组,使得可以在PL/SQL中模仿数据库中的表。

 

定义记录表类型的语法如下:

 

TYPE table_name IS TABLE OF element_type [NOT NULL]
INDEX BY [BINARY_INTEGER | PLS_INTEGER | VARRAY2];

 

关键字INDEX BY表示创建一个主键索引,以便引用记录表变量中的特定行。

 

方法

描述

EXISTS(n)

如果集合的第n个成员存在,则返回true

COUNT

返回已经分配了存储空间即赋值了的成员数量

FIRST

LAST

FIRST:返回成员的最低下标值

LAST 返回成员的最高下标值

PRIOR(n)

返回下标为n的成员的前一个成员的下标。如果没有则返回NULL

NEXT(N)

返回下标为n的成员的后一个成员的下标。如果没有则返回NULL

TRIM

TRIM:删除末尾一个成员

TRIM(n) :删除末尾n个成员

DELETE

DELETE:删除所有成员

DELETE(n) :删除第n个成员

DELETE(m, n) :删除从nm的成员

EXTEND

EXTEND:添加一个null成员

EXTEND(n):添加nnull成员

EXTEND(n,i):添加n个成员,其值与第i个成员相同

LIMIT

返回在varray类型变量中出现的最高下标值

 

11

 

DECLARE
  TYPE dept_table_type 
IS TABLE OF 
       dept
%ROWTYPE INDEX BY BINARY_INTEGER;
  my_dname_table dept_table_type;
  v_count 
number(2) :=4;
BEGIN
  
FOR int IN 1 .. v_count LOOP
    
SELECT * INTO my_dname_table(intFROM dept WHERE deptno=int*10;
  
END LOOP;
  
FOR int IN my_dname_table.FIRST .. my_dname_table.LAST LOOP
  DBMS_OUTPUT.PUT_LINE(
'Department number: '||my_dname_table(int).deptno);
  DBMS_OUTPUT.PUT_LINE(
'Department name: '|| my_dname_table(int).dname);
  
END LOOP;
END;

 

12:按一维数组使用记录表

 

DECLARE
--定义记录表数据类型
   TYPE reg_table_type IS TABLE OF varchar2(25)
   
INDEX BY BINARY_INTEGER;
--声明记录表数据类型的变量
   v_reg_table REG_TABLE_TYPE;
   
BEGIN
   v_reg_table(
1) := 'Europe';
   v_reg_table(
2) := 'Americas';
   v_reg_table(
3) := 'Asia';
   v_reg_table(
4) := 'Middle East and Africa';
   v_reg_table(
5) := 'NULL';

   DBMS_OUTPUT.PUT_LINE(
'地区名称:'||v_reg_table (1)||''
                                    
||v_reg_table (2)||''
                                    
||v_reg_table (3)||''
                                    
||v_reg_table (4));
   DBMS_OUTPUT.PUT_LINE(
'第5个成员的值:'||v_reg_table(5));
END;

 

13:按二维数组使用记录表

DECLARE
--定义记录表数据类型
   TYPE emp_table_type IS TABLE OF employees%ROWTYPE
   
INDEX BY BINARY_INTEGER;
--声明记录表数据类型的变量
   v_emp_table EMP_TABLE_TYPE;
BEGIN
   
SELECT first_name, hire_date, job_id INTO
   v_emp_table(
1).first_name,v_emp_table(1).hire_date, v_emp_table(1).job_id
   
FROM employees WHERE employee_id = 177;
   
SELECT first_name, hire_date, job_id INTO
   v_emp_table(
2).first_name,v_emp_table(2).hire_date, v_emp_table(2).job_id
   
FROM employees WHERE employee_id = 178;

   DBMS_OUTPUT.PUT_LINE(
'177雇员名称:'||v_emp_table(1).first_name
             
||'  雇佣日期:'||v_emp_table(1).hire_date
             
||'  岗位:'||v_emp_table(1).job_id);
   DBMS_OUTPUT.PUT_LINE(
'178雇员名称:'||v_emp_table(2).first_name
             
||'  雇佣日期:'||v_emp_table(2).hire_date
             
||'  岗位:'||v_emp_table(2).job_id);
END;

 

 

运算符和表达式(数据定义)

2.5.1  关系运算符

 

运算符

意义

=

等于

<> , != , ~= , ^=

不等于

小于

大于

<=

小于或等于

>=

大于或等于

 

 2.5.2  一般运算符

 

运算符

意义

+

加号

-

减号

*

乘号

/

除号

:=

赋值号

=>

关系号

..

范围运算符

||

字符连接符

 

2.5.3  逻辑运算符

 

运算符

意义

IS NULL

是空值 

BETWEEN  AND

介于两者之间

IN

在一列值中间 

AND

逻辑与

OR

逻辑或

NOT

取返,IS NOT NULL, NOT IN

 

变量赋值

PL/SQL编程中,变量赋值是一个值得注意的地方,它的语法如下:

   variable  := expression ;

   variable 是一个PL/SQL变量, expression 是一个PL/SQL 表达式.

 

2.6.1  字符及数字运算特点

 

空值加数字仍是空值:NULL + < 数字> = NULL

 

空值加(连接)字符,结果为字符:NULL || <字符串> = < 字符串>

 

2.6.2  BOOLEAN 赋值

 

布尔值只有TRUE, FALSE NULL 三个值。如:

 

DECLARE
  bDone BOOLEAN;
BEGIN
  bDone :
= FALSE;
  
WHILE NOT bDone LOOP
  
Null;
  
END LOOP;
END;

2.6.3  数据库赋值

 

    数据库赋值是通过 SELECT语句来完成的,每次执行 SELECT语句就赋值一次,一般要求被赋值的变量与SELECT中的列名要一一对应。如:

14

 

DECLARE
  emp_id    emp.empno
%TYPE :=7788;
  emp_name  emp.ename
%TYPE;
  wages     emp.sal
%TYPE;
BEGIN
  
SELECT ename, NVL(sal,0+ NVL(comm,0INTO emp_name, wages 
  
FROM emp WHERE empno = emp_id;
  DBMS_OUTPUT.PUT_LINE(emp_name
||'----'||to_char(wages));
END;

提示:不能将SELECT语句中的列赋值给布尔变量。

 

2.6.4  可转换的类型赋值

 

l       CHAR 转换为 NUMBER

使用 TO_NUMBER 函数来完成字符到数字的转换,如:

v_total := TO_NUMBER('100.0') + sal;

 

l       NUMBER 转换为CHAR

    使用 TO_CHAR函数可以实现数字到字符的转换,如:

 v_comm := TO_CHAR('123.45') || '' ;

 

l       字符转换为日期:

使用 TO_DATE函数可以实现  字符到日期的转换,如:

v_date := TO_DATE('2001.07.03','yyyy.mm.dd');

 

l       日期转换为字符

使用 TO_CHAR函数可以实现日期到字符的转换,如:

v_to_day := TO_CHAR(SYSDATE'yyyy.mm.dd hh24:mi:ss') ;

变量作用范围及可见性

PL/SQL编程中,如果在变量的定义上没有做到统一的话,可能会隐藏一些危险的错误,这样的原因主要是变量的作用范围所致。变量的作用域是指变量的有效作用范围,与其它高级语言类似,PL/SQL的变量作用范围特点是:

l       变量的作用范围是在你所引用的程序单元(块、子程序、包)内。即从声明变量开始到该块的结束。

l       一个变量(标识)只能在你所引用的块内是可见的。

l       当一个变量超出了作用范围,PL/SQL引擎就释放用来存放该变量的空间(因为它可能不用了)。

l       在子块中重新定义该变量后,它的作用仅在该块内。

 

15

 

 

DECLARE
   Emess 
char(80);
BEGIN

   
DECLARE
      V1 
NUMBER(4);
   
BEGIN
      
SELECT empno INTO v1 FROM emp WHERE LOWER(job)='president';
      DBMS_OUTPUT.PUT_LINE(V1);
   EXCEPTION
      
When TOO_MANY_ROWS THEN
         DBMS_OUTPUT.PUT_LINE (
'More than one president');
   
END;

   
DECLARE 
      V1 
NUMBER(4);
   
BEGIN
      
SELECT empno INTO v1 FROM emp WHERE LOWER(job)='manager';
   EXCEPTION
      
When TOO_MANY_ROWS THEN
          DBMS_OUTPUT.PUT_LINE (
'More than one manager');
   
END;

EXCEPTION
   
When others THEN
      Emess:
=substr(SQLERRM,1,80);
      DBMS_OUTPUT.PUT_LINE(emess);
END;

 

注释

    PL/SQL里,可以使用两种符号来写注释,即:

l       使用双 ‘-‘ ( 减号加注释

PL/SQL允许用 – 来写注释,它的作用范围是只能在一行有效。如:

    V_Sal  NUMBER(12,2); -- 人员的工资变量。

 

l         使用 /*   */  来加一行或多行注释,如:

/***********************************************/

/* 文件名: department_salary.sql      */

/* 作 者: EricHu                     */

/* 时 间: 2011-5-9                  */

/***********************************************/

 

提示:被解释后存放在数据库中的 PL/SQL 程序,一般系统自动将程序头部的注释去掉。只有在 PROCEDURE 之后的注释才被保留;另外程序中的空行也自动被去掉。

简单例子2.9.1   简单数据插入例子

 

16

 

/***********************************************/
/* 文件名: test.sql                  */
/* 说 明:
       一个简单的插入测试,无实际应用。
*/
/* 作 者: EricHu                     */
/* 时 间: 2011-5-9                  */
/***********************************************/
DECLARE
  v_ename   
VARCHAR2(20) := 'Bill';
  v_sal       
NUMBER(7,2) :=1234.56;
  v_deptno   
NUMBER(2) := 10;
  v_empno   
NUMBER(4) := 8888;
BEGIN
  
INSERT INTO emp ( empno, ename, JOB, sal, deptno , hiredate )  
  
VALUES (v_empno, v_ename, 'Manager', v_sal, v_deptno, 
            TO_DATE(
'1954.06.09','yyyy.mm.dd') );
  
COMMIT;
END;

 

 

2.9.2   简单数据删除例子

17

/***********************************************/
/* 文件名: test_deletedata.sql      */
/* 说 明:
       简单的删除例子,不是实际应用。 
*/
/* 作 者: EricHu                     */
/* 时 间: 2011-5-9                  */
/***********************************************/
DECLARE
  v_ename   
VARCHAR2(20) := 'Bill';
  v_sal       
NUMBER(7,2) :=1234.56;
  v_deptno   
NUMBER(2) := 10;
  v_empno   
NUMBER(4) := 8888;
BEGIN
  
INSERT INTO emp ( empno, ename, JOB, sal, deptno , hiredate )  
VALUES ( v_empno, v_ename, ‘Manager’, v_sal, v_deptno, 
TO_DATE(’
1954.06.09’,’yyyy.mm.dd’) );
  
COMMIT;
END;
 
DECLARE
  v_empno   
number(4) := 8888;
BEGIN
  
DELETE FROM emp WHERE empno=v_empno;
  
COMMIT;
END;

 

 

© 2011  EricHu

原创作品,转贴请注明作者和出处,留此信息。

 

------------------------------------------------

cnBlobs:http://www.cnblogs.com/huyong/
CSDNhttp://blog.csdn.net/chinahuyong 

 

作者:EricHuDBC\SB\SWebServiceW

阅读(2247) | 评论(2) | 转发(0) |
给主人留下些什么吧!~~

xiaozhenggang2011-05-12 22:39:16

jamesbert: .....

jamesbert2011-05-12 21:18:15