Oracle基础学习伍 : PACKAGE(包) 新建包 参预项 修改项 删除项 访问项 查询包 删除包

  1. 新建包
  2. 加入/修改项
  3. 删除项
  4. 访问项 
  5. 查询包
  6. 删除包

==============

01. 新建包

开始展览创办:
SQL> CREATE PACKAGE ADDFUN_PKG
  2  IS
  3  END ADDFUN_PKG;
  4  /

程序包已创立。

进展包对象查看:
SQL> SELECT SUBSTR(OBJECT_NAME,0,10),STATUS,OBJECT_TYPE
  2  FROM USER_OBJECTS;

SUBSTR(OBJECT_NAME,0 STATUS  OBJECT_TYPE


ADDFUN_PKG           VALID   PACKAGE
SP_STUDENT           VALID   PROCEDURE
STUDENT              VALID   TABLE
V_STUDENT            VALID   VIEW

或:

SQL> SELECT SUBSTR(OBJECT_NAME,0,10),STATUS,OBJECT_TYPE
  2  FROM USER_OBJECTS
  3  WHERE OBJECT_TYPE=’PACKAGE’;

SUBSTR(OBJECT_NAME,0 STATUS  OBJECT_TYPE


ADDFUN_PKG           VALID   PACKAGE

02. 加入/修改项

SQL> CREATE OR REPLACE PACKAGE ADDFUN_PKG
  2  AS
  3  FUNCTION FN_ADDONE(ANUM NUMBER) RETURN NUMBER;
  4  END;
  5  /

先后包已创制。

SQL> CREATE OR REPLACE PACKAGE BODY ADDFUN_PKG
  2  AS
  3 
  4  FUNCTION FN_ADDONE(ANUM NUMBER) RETURN NUMBER
  5    AS
  6    BNUM NUMBER;
  7    BEGIN
  8      BNUM := ANUM + 1;
  9      RETURN BNUM ;
 10  END FN_ADDONE;
 11 
 12  END ADDFUN_PKG;
 13  /

程序包主体已创设。

03. 删除项

亟待重新定义秦皇岛及包体

须求查询包体:

04. 访问项 

SQL> SELECT USER1_ADB.ADDFUN_PKG.FN_ADDONE(2) AS VALUE FROM DUAL;

     VALUE

         3

05. 查询包

SQL> SELECT TEXT FROM USER_SOURCE
  2  WHERE NAME=’ADDFUN_PKG’
  3  AND TYPE=’PACKAGE BODY’;

TEXT

PACKAGE BODY ADDFUN_PKG
 AS

 FUNCTION FN_ADDONE(ANUM NUMBER) RETURN NUMBER
   AS
   BNUM NUMBER;
   BEGIN
     BNUM := ANUM + 1;
     RETURN BNUM ;
 END;

TEXT

 FUNCTION FN_ADDTWO(ANUM NUMBER) RETURN NUMBER
   AS
   BNUM NUMBER;
   BEGIN
     BNUM := ANUM + 2;
     RETURN BNUM ;
 END;

 END ADDFUN_PKG;

已选择20行。

或:

SQL> SET LONG 1000
SQL> SET PAGES 1
SQL> SELECT DBMS_METADATA.GET_DDL(‘PACKAGE’,’ADDFUN_PKG’) FROM
DUAL;

  1. 删除包
    SQL> DROP PACKAGE ADDFUN_PKG;

先后包已甩掉。

相关文章