【正文】 student表結(jié)構(gòu)。student_package程序包中包含 4個(gè)過程和 1個(gè)函數(shù)。 select語句只出現(xiàn)在主體定義中，而不出現(xiàn)在規(guī)范說明中。在游標(biāo)規(guī)范說明部分必須通過 RETURN語句指定游標(biāo)的返回類型。 第 7章 過程、函數(shù)和程序包 程序包中的游標(biāo) 程序包中可以定義和使用游標(biāo)。 運(yùn)行結(jié)果如下： 2450 PL/SQL 過程已成功完成。 運(yùn)行結(jié)果如下： CLARK PL/SQL 過程已成功完成。 第 7章 過程、函數(shù)和程序包 執(zhí)行程序包 執(zhí)行程序包中的過程可以使用如下語句： EXECUTE 包名 .過程名 【 例 】 執(zhí)行 employee_pkg包里的 print_ename過程。 21 End employee_pkg。)。 第 7章 過程、函數(shù)和程序包 17 Exception 18 When NO_DATA_FOUND then 19 (39。 14 Begin 15 Select sal into l_sal from emp where empno=p_empno。 11 End print_ename。Invalid employee number39。 7 (l_ename)。 SQL CREATE OR REPLACE 2 PACKAGE BODY employee_pkg as 3 Procedure print_ename(p_empno number) is 4 L_ename %type。 SQL exec (1234)。 第 7章 過程、函數(shù)和程序包 此時(shí)并沒有為過程提供代碼，只是定義了名稱和參數(shù)。 5 End。 SQL CREATE OR REPLACE 2 PACKAGE employee_pkg as 3 Procedure print_ename(p_empno number)。 / 第 7章 過程、函數(shù)和程序包 2．創(chuàng)建程序包主體 CREATE OR REPLACE PACKAGE BODY package_name IS | AS 私有類型或變量常量的聲明； 公用過程或函數(shù)的實(shí)現(xiàn)； END package_name 規(guī)范是程序包的接口，規(guī)范中定義的所有內(nèi)容都可以由調(diào)用者使用 (當(dāng)然需要具有 EXECUTE特權(quán) )，比如規(guī)范中定義的過程函數(shù)可以被執(zhí)行，類型可以被訪問，變量可以被引用。規(guī)范是程序包的公共接口；主體是規(guī)范的實(shí)現(xiàn)，以及私有例程、數(shù)據(jù)和變量。 (4) ?不能在沒有程序包規(guī)格說明的情況下存在。 (2) 包含子程序和游標(biāo)的定義。 (4) ?可以在沒有程序包主體部分的情況下存在。 (2) 包含公用對象和類型。其中的過程、函數(shù)、變量、常量和游標(biāo)都是公共的，可在應(yīng)用程序中訪問。程序包包括兩個(gè)部分：程序包規(guī)范說明部分和程序包主體部分。 第 7章 過程、函數(shù)和程序包 過程和函數(shù)的比較 表 71 過程和函數(shù)的比較 過 程 函 數(shù) 過程作為 P L /S Q L 語句塊來執(zhí)行 函數(shù)作為表達(dá)式的一部分調(diào)用 在規(guī)則說明中不包含 re tu rn 語句 函數(shù)必須包含 RET U RN 語句 不返回任何值 必須返回單個(gè)值 可以包含 RET U RN 語句，但是與函數(shù)不同，不能返回值 必須包含至少一條 RET U RN 語句 參數(shù)方式有 IN 模式、 OUT 模式和 IN OU T 模式 一般只有輸入?yún)?shù)模式 第 7章 過程、函數(shù)和程序包 程 序 包 程序包概述 程序包是數(shù)據(jù)庫中的一個(gè)實(shí)體，包含一系列公共常量、變量、數(shù)據(jù)類型、游標(biāo)、過程及函數(shù)的定義。 【 例 】 刪除函數(shù) getname。 SQLGRANT EXECUTE ON getname TO John。 EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO 7369 SMITH CLERK ??7902 1712月 80 800 20 第 7章 過程、函數(shù)和程序包 3．函數(shù)的授權(quán) 與過程一樣，只有創(chuàng)建函數(shù)的用戶和管理員才有權(quán)使用函數(shù)，其他用戶如果要調(diào)用函數(shù)，則需要得到該函數(shù)的EXECUTE權(quán)限。) SMITH 第 7章 過程、函數(shù)和程序包 【 例 】 從雇員表中查找雇員號(hào)為“ 7369”的雇員信息。 GETNAME(39。736939。 【 例 】 在 SQL語句中調(diào)用 getname，顯示雇員號(hào)為“ 7369”的雇員姓名。 7 / FORD PL/SQL 過程已成功完成。 5 (name)。790239。 SQL declare 2 name varchar(12)。下面的例子通過匿名過程調(diào)用 getname函數(shù)，將雇員號(hào)作為參數(shù)，此函數(shù)將雇員姓名傳給調(diào)用塊，然后顯示雇員姓名。因?yàn)檫^程沒有顯式的 RETURN語句，所以過程調(diào)用可以是一條單獨(dú)的語句，寫在單獨(dú)的行中。 15 / 函數(shù)已創(chuàng)建。)。 12 when others then 13 (39。too many data39。 8 return name。 SQL create or replace function getName(sno varchar2) 2 return varchar 3 is 4 name varchar(12)。 其中， FUNCTION 為 PL/SQL函數(shù)的關(guān)鍵字。 第 7章 過程、函數(shù)和程序包 定義函數(shù)的語法如下： CREATE [OR REPLACE] FUNCTION [方案名 .]函數(shù)名 [parameters list] RETURN 返回值類型 IS|AS [local_declarations]。 1．創(chuàng)建函數(shù) 創(chuàng)建函數(shù)是指通過 RETURN子句指定函數(shù)返回值的數(shù)據(jù)類型。 第 7章 過程、函數(shù)和程序包 函數(shù) 函數(shù)與過程相似，也是數(shù)據(jù)庫中存儲(chǔ)的已命名 PL/SQL程序塊。 【 例 】 刪除過程 multiplication。 前者將 swap過程的執(zhí)行權(quán)限授予 John用戶，后者將queryEmpName的執(zhí)行權(quán)限授予所有數(shù)據(jù)庫用戶。以下演示如何授權(quán)： SQLGRANT EXECUTE ON swap TO John。 9 / N1的值是 20 N2的值是 10 PL/SQL 過程已成功完成。||N2)。 7 (39。N1的值是 39。 4 Begin 5 swap(N1,N2)。 SQL Declare 2 N1 number:=10。 9 / SQL / 過程已創(chuàng)建。 7 p2:=temp。 4 begin 5 temp:=p1。 / 第 7章 過程、函數(shù)和程序包 3) 創(chuàng)建帶 IN OUT模式參數(shù)的過程 【 例 】 創(chuàng)建兩個(gè)數(shù)進(jìn)行交換的過程。||to_char(value))。 (39。 Declare value number。 第 7章 過程、函數(shù)和程序包 另外，也可以從一個(gè)匿名的 PL/SQL程序中執(zhí)行上述過程，以顯示 sal_out變量的輸出結(jié)果。,:salary)。 SQL exec queryEmpSal(39。 可以聲明一個(gè)變量，用如下的方式調(diào)用該過程。 此過程帶有一個(gè)輸入?yún)?shù) sFindNo和輸出參數(shù) v_sal，程序根據(jù)輸入?yún)?shù)到表中查詢記錄，以返回該員工的薪水值。 14 end。error39。)。 10 when too_many_rows then 11 (39。no data39。||v_sal)。||sFindNo||39。 6 (39。 4 / 第 7章 過程、函數(shù)和程序包 2) 創(chuàng)建帶 OUT模式參數(shù)的過程 【 例 】 創(chuàng)建一個(gè)過程，以雇員號(hào)查詢雇員的薪水。)。 SQL Begin 2 queryEmpName(39。)。 SQL exec queryEmpName(39。 18 / 過程已創(chuàng)建。)。 15 when others then 16 (39。too many data39。)。 10 exception