--规范 create or replace package test_pkg is --test_pkg为包名 procedure showMessage; --声明一个过程 function myAdd(x in number,y in number) return number; --声明函数 end test_pkg; --主体 create or replace package body test_pkg is --包名必须一致 procedure showMessage is --实现规范中的过程 begin dbms_output.put_line('创建一个简单的包!'); --打印字符串用单引号括起来 end showMessage; function myAdd(x in number,y in number) --实现函数 return number is mySum number:=1; begin mySum:=x+y; return mySum; end myAdd; end test_pkg; --调用包,这个仅测试用 set serveroutput on declare testSum number:=1; begin test_pkg.showMessage; testSum:=test_pkg.myAdd(10,11); dbms_output.put_line(testSum); end;