4--6--oracle-plsql基础案例.ppt

创建程序包 2-2 CREATE OR REPLACE PACKAGE pack_me IS PROCEDURE order_proc (orno VARCHAR2); FUNCTION order_fun(ornos VARCHAR2) RETURN VARCHAR2; END pack_me; / CREATE OR REPLACE PACKAGE BODY pack_me AS PROCEDURE order_proc (orno VARCHAR2) IS stat CHAR(1); BEGIN SELECT ostatus INTO stat FROM order_master WHERE orderno = orno; …… END order_proc; FUNCTION order_fun(ornos VARCHAR2) RETURN VARCHAR2 IS icode VARCHAR2(5); ocode VARCHAR2(5); BEGIN …… END order_fun; END pack_me; / 程序包的优点 模块化 更轻松的应用程序设计 信息隐藏 新增功能 性能更佳 有关子程序和程序包的信息 USER_OBJECTS 视图包含用户创建的子程序和程序包的信