1.
简介
1.1
结构
DECLARE --
定义
BEGIN --
执行部分
EXCEPTION --
例外处理
END; --
结束
<!---->
<o:p> </o:p>
set
serveroutput on;
DECLARE v_ename VARCHAR2(
5
);
BEGIN
SELECT ename INTO v_ename FROM emp WHERE empno=&no;
dbms_output.put_line(
'¹ÍÔ±Ãû:'
|| v_ename);
EXCEPTION
WHEN NO_DATA_FOUND THEN
dbms_output.put_line(
'please input correct employees no!'
);
END;
/
<o:p> </o:p>
1.2
块分类
<<outer>> <<inner>>
1.3
子程序
1.1.1
过程
执行特定的操作
CREATE or replace
PROCEDURE update_sal(nameVARCHAR2,newsal NUMBER)
IS
BEGIN
UPDATE emp SET sal=newsal WHERE lower(ename)=lower(name);
END;
/<o:p></o:p>
调用:
<o:p>
</o:p>
exec update_sal(
'SMITH'
,
10
)
call update_sal(
'SMITH'
,
800
)<o:p></o:p>
1.1.2
函数
返回特定数据
CREATE
or
replace
FUNCTION annual_income(nameVARCHAR2)
RETURNNUMBERIS
annual_salary NUMBER(
7
,
2
);
BEGIN
SELECT sal*
12
+ nvl(comm,
0
) into annual_salary FROM emp WHERE lower(ename)=lower(name);
RETURN annual_salary;
END;
/<o:p></o:p>
调用
:
SQL> VAR income NUMBER<o:p></o:p>
SQL> CALL annual_income('scott') INTO : income;<o:p></o:p>
调用完成。
<o:p>
</o:p>
SQL> print income<o:p></o:p>
INCOME<o:p></o:p>
----------<o:p></o:p>
36000<o:p></o:p>
1.1.3
包
逻辑组合相关的过程和函数
--
包规范
CREATE
or
replace
PACKAGE emp_pkg IS
PROCEDURE update_sal(nameVARCHAR2, newsal NUMBER);
FUNCTION annual_income(nameVARCHAR2) RETURNNUMBER;
END;
--
包体
CREATE
or
replace
PACKAGE
BODY emp_pkg IS
PROCEDURE update_sal(nameVARCHAR2, newsal NUMBER)
IS
BEGIN
UPDATE emp SET sal = newsal WHERE lower(ename) = lower(name);
END;
FUNCTION annual_income(nameVARCHAR2) RETURNNUMBER
IS
annual_salary NUMBER(
7
,
2
);
BEGIN
SELECT sal *
12
+ nvl(comm,
0
) into annual_salary FROM emp WHERE lower(ename) = lower(name);
RETURN annual_salary;
END;
END;
/
调用:
SQL> call
emp_pkg
.update_sal('SMITH',1500);
Or
SQL> VAR income NUMBER<o:p></o:p>
SQL> CALL emp_pkg
.
annual_income('scott') INTO : income;<o:p></o:p>
调用完成。
<o:p>
</o:p>
SQL> print income<o:p></o:p>
INCOME<o:p></o:p>
----------<o:p></o:p>
36000
1.4
触发器
是隐含执行的存储过程。
create
or
replace
trigger update_cascade
afterupdateof deptno on dept
foreachrow
begin
update emp set deptno=:new.deptno
where deptno=:old.deptno;
end;
/
2.
定义并使用变量
1.5
标量变量
1.1.4
特殊变量说明
LONG(32760
字节
)
与
VARCHAR2(32767
字节
)
类似,定义变长的字符串
LONG RAW
用于定义变长的二进制数据
(32760
字节
)
BINARY_INTEGER
定义整数,范围为:
-2147483647~2147483647 (
非表列使用
)
BOOLEAN
为
TRUE/FALSE/NULL (
非表列使用
)
BINARY_FLOAT/BINARY_DOUBLE
:
ORACLE10
所有
1.1.5
定义使用
Identifier [CONSTANT] datatype [not null] [:= | default expr]
例如:
v_valid BOOLEAN NOT NULL DEFAULT FALSE;
C_tax_rate CONSTANT NUMBER(3,2):=0.03;
V_ename emp.ename%TYPE;
1.6
复合变量
1.1.6
Pl/sql
记录
类似于高级语言中的结构
DECLARE
TYPE emp_record_type ISRECORD(
name emp.ename%TYPE,
salary emp.sal%TYPE,
title emp.job%TYPE
);
emp_record emp_record_type;
BEGIN
SELECT ename,sal,job INTO emp_record FROM emp WHERE empno=
7788
;
dbms_output.put_line(
'
雇员名
'
||emp_record.name);
end;
/ <o:p></o:p>
1.1.7
Pl/sql
表
类似于高级语言中的数组,下标可以为负
,
个数无限制。
DECLARE
TYPE ename_table_type ISTABLEOF emp.ename%TYPE
INDEXBYBINARY_INTEGER;
ename_table ename_table_type;
BEGIN
SELECT ename INTO ename_table(-
1
) FROM emp WHERE empno=
7788
;
dbms_output.put_line(
'
雇员名
'
||ename_table(-
1
));
end;
/
<o:p></o:p>
1.1.8
嵌套表
类似于高级语言中的数组,下标不可以为负,个数无限制。
CREATE
OR
REPLACE
TYPE emp_type ASOBJECT(
nameVARCHAR2(
10
),
salary NUMBER(
6
,
2
),
hiredate DATE
);
/
CREATEORREPLACETYPE emp_array ISTABLEOF emp_type;
/
CREATEORREPLACEtable department(
deptno NUMBER(
2
),
dname VARCHAR2(
10
),
employee emp_array
)nestedtable employee storeas employee;<o:p></o:p>
<o:p> </o:p>
1.1.9
VARRAY<o:p></o:p>
VARRAY
类似于嵌套表,它可以作为表列和对象类型属性的数据类型,个数有限制。
CREATE
OR
REPLACE
TYPE article_type ASOBJECT(
title VARCHAR2(
30
),
pubdate DATE
);
/
CREATEORREPLACETYPE article_array ISVARRAY(
20
) OF article_type;
/
CREATEORREPLACEtable author(
idNUMBER(
6
),
nameVARCHAR2(
10
),
article article_array
);<o:p></o:p>
1.7
参照变量
<o:p>
</o:p>
用于存放数值指针的变量。使得应用程序共享相同对象,从而降低占用空间。
1.1.10
REF CURSOR
游标变量
DECLARE
TYPE c1 ISREFCURSOR;
emp_cursor c1;
v_ename emp.ename%TYPE;
v_sal emp.sal%TYPE;
BEGIN
OPEN emp_cursor FOR
SELECT ename, sal FROM emp ;
--WHERE deptno = 10;
LOOP
FETCH emp_cursor
INTO v_ename, v_sal;
EXITWHEN emp_cursor%NOTFOUND;
dbms_output.put_line(v_ename);
ENDLOOP;
CLOSE emp_cursor;
END;
/<o:p></o:p>
1.1.11
REF obj_type<o:p></o:p>
为了共享相同对象,可以用
ref
引用对象类型。
CREATE OR REPLACE TYPE home_type AS OBJECT(
street VARCHAR2(50),city VARCHAR2(20),
state VARCHAR2(20),zipcode VARCHAR2(6),
owner VARCHAR2(10)
);
/
CREATE TABLE homes OF home_type;
INSERT INTO homes VALUES('
呼伦北路
12
号
','
呼和浩特
','
内蒙
','010010','
马鸣
');
INSERT INTO homes VALUES('
呼伦北路
13
号
','
呼和浩特
','
内蒙
','010010','
秦斌
');
CREATE TABLE person(
id NUMBER(6) PRIMARY KEY,
name VARCHAR2(10), addr REF home_type
);
INSERT INTO person SELECT 1,'
马鸣
',ref(p) FROM homes p WHERE p.owner='
马鸣
';
1.8
LOB
变量
内部
: CLOB
、
BLOB
、
NCLOB
;外部:
BFILE
。
1.9
非
PL/SQL
变量
1.1.12
使用
sql*plus
变量
var namevarchar2(
10
)
begin
select ename into :namefrom emp
where empno=
7788
;
end;
/
print name <o:p></o:p>
<o:p> </o:p>
1.1.13
使用
procedure Builder
变量
.createcharname length
10
begin
select ename into :namefrom emp
where empno=
7788
;
end;
/
text_to.put_line(:name);
1.1.14
使用
pro*c/c++
变量
char
name[
10
];
execsqlexecute
begin
select ename into :namefrom emp
where empno=
7788
;
end-exec;
printf(
'
雇员名:
%s\n'
,name);
分享到:
相关推荐
Oracle TimesTen In-Memory Database PL/SQL Packages Reference 11g Release 2 (11.2.2)-348
Oracle TimesTen In-Memory Database PL/SQL Developer's Guide 11g Release 2 (11.2.2)-148
oracle10g pl/sql完备教程,供初学者学习与开发者参考
本书是专门为oracle开发人员而提供的编程指南 通过学习本书 读者不仅可以掌握编写sql语句和pl/sql块的基础知识 而且还可以掌握sql高级特征 正则表达式 flashback查询 merge语句 sql:1999连接 和pl/sql高级特征 ...
Oracle PL/SQL专家指南-高级PL/SQL解决方案的设计与开发
《Oracle PL/SQL程序设计(第5版)(套装上下册)》基于Oracle数据库11g,从PL/SQL编程、PL/SQL程序结构、PL/SQL程序数据、PL/SQL中的SQL、PL/SQL应用构建、高级PL/SQL主题这6个方面详细系统地讨论了PL/SQL以及如何...
PL/SQL是Oracle对标准数据库语言的扩展,Oracle公司已经将PL/SQL整合到Oracle 服务器和其他工具中了,近几年中更多的开发人员和DBA开始使用PL/SQL,本教程将以循速渐进的方式讲述PL/SQL基础语法,结构和组件、以及...
Considered the best Oracle PL/SQL programming guide by the Oracle community, this definitive guide is precisely what you need to make the most of Oracle’s powerful procedural language. The sixth ...
oracle12c程序连接时异常: ORA-01017: 用户名/口令无效; 登录被拒绝 的解决方案。
《oracle pl/sql程序设计(第5版)》基于oracle数据库11g,从pl/sql编程、pl/sql程序结构、pl/sql程序数据、pl/sql中的sql、pl/sql应用构建、高级pl/sql主题6个方面详细系统地讨论了pl/sql以及如何有效地使用它。...
通过学习本书,读者不仅可以掌握oracle常用工具oracle universal installer、net comfiguration assistant、sql developer、sql*plus的作用及使用方法,而且可以掌握sql语句和pl/sql的各种基础知识和高级特征(记录...
Use new Oracle Database 11g tools and techniques such as PL/Scope, the PL/SQL hierarchical profiler, and the SecureFiles technology for large objects Build modular PL/SQL applications using ...
Oracle PL/SQL实例编程 Oracle PL/SQL实例编程 Oracle PL/SQL实例编程
oracle 9i pl/sql程序设计笔记。
Use new Oracle Database 11g tools and techniques such as PL/Scope, the PL/SQL hierarchical profiler, and the SecureFiles technology for large objects Build modular PL/SQL applications using ...
win7 x64 免安装oracle10g 安装 PL/SQL Developer PL/SQL Developer 安装
通过学习本书,读者不仅可以掌握PL/SQL的基础编程知识(嵌入SQL语句和编写子程序),而且还可以掌握PL/SQL的所有高级开发特征(使用记录类型、集合类型、对象类型和大对象类型)。另外,本书还为应用开发人员提供了大量...
PL/SQL, Oracle's procedural extension of SQL, is an advanced fourth-generation programming language (4GL). It offers modern features such as data encapsulation, overloading, collection types, ...
通过学习本书,读者不仅可以掌握Oracle常用工具Oracle Universal Installer、Net Comfiguration Assistant、SQL Developer、SQL*Plus的作用及使用方法,而且可以掌握SQL语句和PL/SQL的各种基础知识和高级特征(记录...