执行该过程：
1. 使用匿名PL/SQL
分析：目的是输出两个out参数的结果，所以匿名块中也要定义2个与out参数相同的局域变量。
set serveroutput on
declare
l_ename emp.ename%type;
l_sal emp.sal%type;
begin
emp_lookup(7782, l_ename, l_sal);
dbms_output.put_line(‘Ename = ‘ || l_ename);
dbms_output.put_line(‘Sal = ‘ || l_sal);
end;
/
2. 在sql plus 中执行
分析：需要使用sql plus 的VARIABLE命令绑定参数值，即为OUT参数提供接受返回值的变量。
Variable name varchar2(10);
Variable sal number;
Exec emp_lookup(‘7782’, :name, :sal);
Print name;
Print sal;
Select :name, :sal from dual;
IN OUT 参数：
可以用来传入参数，并从存储过程返回值。
例子：输入两个数，交换值
思路：通过一个临时变量作为交换过程中的过渡
create or replace
procedure swap(
p1 in out number,
p2 in out number ) as
l_temp number; --局域变量的声明，相当于匿名块中declare之后的声明;过程：as~begin
begin
l_temp := p1;
p1 := p2;
p2 := l_temp;
end swap;
/
set serveroutput on
declare
l1 number:=100;
l2 number:=200;
begin
swap(l1,l2);
dbms_output.put_line(‘l1 = ‘|| l1);
dbms_output.put_line(‘l2 = ‘|| l2);
end;
/
关于自主事务处理: P197
我们曾经讨论过COMMIT 和 ROLLBACK的概念。
建立过程P2：
CREATE or REPLACE PROCEDURE P2 AS
A varchar2(50);
Begin
Select venadd1 into a from vendor_master where vencode=’V002’;
Dbms_output.put_line(a);
ROLLBACK;
END;
/
建立过程P1，调用P2：
CREATE or REPLACE PROCEDURE P1 AS
B varchar2(50);
Begin
Update vendor_master set venadd1=’10 Walls Street ‘ where vencode=’V002’;
P2();
Select venadd1 into b from vendor_master where vencode=’V002’;
Dbms_output.put_line(b);
ROLLBACK;
END;
/
exec p1
说明事务处理可以跨越过程继续执行。
为了防止一个过程影响其他过程，可以将其标记为自主的。这样p2中的rollback将不会影响p1
CREATE or REPLACE PROCEDURE P2 AS
A varchar2(50);
PRAGMA AUTONOMOUS_TRANSACTION;
Begin
Select venadd1 into a from vendor_master where vencode=’V002’;
Dbms_output.put_line(a);
ROLLBACK;
END;
/
EXEC P1;
函数：
与过程相似，遵循了相同的规则。
参数传递：只能带有in参数，不能使用out, in out 参数
函数的主要特性是必须返回一个值。
语法：
CREATE [OR REPLACE] FUNCTION function_name (参数)
RETURN datatype
IS | AS
[PRAGMA AUTONOMOUS_TRANACTION;] --声明自主事务处理。
[本地变量声明]
BEGIN
执行语句部分
[EXCEPTION]
错误处理部分
END[name];
/
返回值：
定义函数的时候必须使用RETURN datatype 子句，表示函数要返回的数据类型。
在函数体中的任何地方，都可以使用 RETURN <表达式>返回值，类型要和定义中的相同。
CREATE or REPLACE
FUNCTION my_func
RETURN varchar2
As
Begin
Return ‘HELLO, WORLD’;
END;
/
调用函数：
用户必须要获取返回值，所以调用时，要声明一个局域变量：
set serveroutput on
declare
l_str varchar2(100) := null;
begin
l_str := my_func;
dbms_output.put_line(l_str);
end;
/
也可以将函数用作其他过程以及函数的IN参数。
Create or replace
Procedure show_it(p varchar2) as
Begin
Dbms_output.put_line(p);
End;
/
exec show_it(my_func);
练习：
编写一个函数ITE，实现：boolean expression ? true_value: false_value
输入一个表达式expression, IF正确，THEN输出true_value;ELSE，输出false_value
分析：3个in 参数，一个boolean, 2个varchar2
create or replace
function ite(
p_expression Boolean,
p_true varchar2,
p_false varchar2)
return varchar2
as
begin
if p_expression then
return p_true;
end if;
return p_false;
end;
/
exec dbms_output.put_line(ite(1=2, ‘Equal’,’Not equal’));
程序包：
是对PL/SQL类型，过程，函数，游标，异常，变量，常量的封装。
包括两部分：规范和主体
规范：是程序包的公共接口，
主体：规范的实现，以及私有例程、数据和变量。
语法：
CREATE or REPLACE PACKAGE package_name
IS | AS
公用类型或变量常量的声明;
公用过程或函数的声明;
END package_name;
/
CREATE or REPLACE PACKAGE BODY package_name
IS | AS
私有类型或变量常量的声明;
公用过程或函数的实现;
END package_name
规范：
规范是程序包的接口，规范中定义的所有内容都可以由调用者使用(当然需要具有EXECUTE特权)，比如规范中定义的过程函数可以被执行，类型可以被访问，变量可以被引用。
例子：使用两个过程PRINT_ENAME() 和PRINT_SAL()，定义称为EMPLOYEE_PKG的程序包。
CREATE or REPLACE
PACKAGE employee_pkg as
Procedure print_ename(p_empno number);
Procedure print_sal(p_empno number);
End;
/
并没有为过程提供代码，只是定义了名称和参数。
这个时候如果试图使用这个包，会报错
exec employee_pkg.print_ename(1234);
主体：
程序包是过程，函数的具体实现部分，实现规范中定义的接口。
