查询PACKAGE包含方法

SELECT O.OWNER       对象所属者,
       O.OBJECT_NAME 包名,
       --O.OBJECT_TYPE ,
       ( CASE
         WHEN S.PROPERTIES = 27131904 THEN
          'FUNCTION'
         WHEN S.PROPERTIES = 29229056 THEN
          'PROCEDURE'
         ELSE
          TO_CHAR(S.PROPERTIES)
       END ) 包体下对象类型,
       /*本人环境 PROPERTIES值代表意义
        27131904==>FUNCTION；
        29229056==>PROCEDURE；
       没确定PROPERTIES ==> 29229056、27131904 2值依据哪里查到的.该部分需要根据环境情况哈~*/
       S.PROCEDURE#    对象顺序,
       S.PROCEDURENAME 对象名称
  FROM SYS.PROCEDUREINFO$ S --所有存储（包括PACKAGE里的PROCEDURE/FUNCTION...）
  JOIN DBA_OBJECTS O
   ON O.OBJECT_ID = S.OBJ#
   AND O.OWNER = 'HXPROD'
   AND O.OBJECT_TYPE = 'PACKAGE' -- 对象类型为PACKAGE包 
  ORDER BY O.OBJECT_NAME, S.PROCEDURE#;