如何在不使用DESCRIBE子句的情况下描述ORACLE包?

时间:2015-05-06 20:06:36

标签: oracle oracle11g sqlplus describe

我一直在研究如何在不使用'DESCRIBE table / view;'的情况下描述TABLES和VIEWS。条款。我发现它可以通过以下方式解决:

SELECT column_name, data_type, data_length, data_precision, data_scale, nullable
FROM all_tab_columns
WHERE table_name = 'TABLE'

在PHP等计算机语言中可以完全编程,但我没有找到'DESCRIBE package_name'子句的解决方法。

我有以下想法(但在带有假脱机的SQL * PLUS中):

DECLARE
  x VARCHAR2(50);
  CURSOR cursorPaquetes IS
    SELECT DISTINCT OBJECT_NAME
    FROM ALL_OBJECTS
    WHERE OBJECT_TYPE = 'PACKAGE' AND OWNER = 'SATURN';
BEGIN
  FOR item IN cursorPaquetes LOOP
    x := 'DESCRIBE '||item.OBJECT_NAME||';';
    EXECUTE IMMEDIATE x;
  END LOOP;
END;

但它不起作用:(。引发以下错误:

  

ORA-00900:sentencia SQLnoválidaORA-06512:enlínea12

当像这样修改'x'变量时:

x := 'BEGIN DESCRIBE '||item.OBJECT_NAME||'; END;';

我收到以下错误:

  

ERRORenlínea1:ORA-06550:línea1,columna 16:PLS-00103:   在期待以下之一时遇到符号“BVGKFDCS”:   :=。 (@%;符号“:=”代替“BVGKFDCS”来   继续。 ORA-06512:enlínea12

其中“BVGKFDCS”是我的架构的其中一个包的名称。

提前致谢。

Pd积。我希望得到类似的东西(但对于每个包):

DESCRIBE BVGKFDCS;

PROCEDURE P_GETPROFESSORS
 Nombre de Argumento            Tipo                    E/S   ¿Por Defecto?
 ------------------------------ ----------------------- ------ --------
 P_CAMP_IN                      VARCHAR2                IN
 P_COLL_IN                      VARCHAR2                IN
 P_DEPT_IN                      VARCHAR2                IN
 P_TERM_IN                      VARCHAR2                IN
PROCEDURE P_GETTERMSBYPROF
 Nombre de Argumento            Tipo                    E/S   ¿Por Defecto?
 ------------------------------ ----------------------- ------ --------
 NAME_ARRAY                     TABLE OF VARCHAR2(32000) IN
 VALUE_ARRAY                    TABLE OF VARCHAR2(32000) IN
PROCEDURE P_INIT
 Nombre de Argumento            Tipo                    E/S   ¿Por Defecto?
 ------------------------------ ----------------------- ------ --------
 PIDM                           VARCHAR2                IN
PROCEDURE P_OBTENER_VALOR
 Nombre de Argumento            Tipo                    E/S   ¿Por Defecto?
 ------------------------------ ----------------------- ------ --------

请注意,此输出与以下内容不同:

select * from user_source

4 个答案:

答案 0 :(得分:4)

看看USER_PROCEDURES。我怀疑这是DESCRIBE在包,过程或函数上使用时查询的内容。

编辑:抱歉,还包含USER_ARGUMENTS列出每个子程序的参数。由于处理不同对象类型的方式,加入两个视图的逻辑并不是立即显而易见的。此查询看起来产生了合理的结果,但我没有仔细检查结果:

SELECT * FROM all_arguments A
JOIN all_procedures p
  ON ( ( p.object_type = 'PACKAGE' AND A.package_name = p.object_name AND A.object_name = p.procedure_name)
       OR
       ( p.object_type <> 'PACKAGE' AND A.package_name IS NULL AND A.object_name = p.object_name )
    )
  AND p.owner = A.owner

答案 1 :(得分:2)

您需要使用User_Source,DBA_SOURCE或All_Source。所有代码都存储在那里。

select text 
from user_source
where name = 'procedure_name' 
order by line;

对象类型:FUNCTION,JAVA SOURCE, PACKAGE PACKAGE BODY ,PROCEDURE,TRIGGER,TYPE,TYPE BODY

答案 2 :(得分:0)

describeexecute immediate内无效,因为它是SQL * Plus命令,而不是SQL或PL / SQL命令的一部分。它由客户端而不是服务器解释。

根据@ T.S ..

的建议,获取任何数据库对象(包括包和包体)的源的最佳方法是DBA_SOURCEUSER_SOURCE

数据库中的每种对象都有数据字典视图。在尝试为其他对象类型获取类似的数据时,您应该引用dictionary视图,它有助于对数据字典进行编目。例如,dictionary的{​​{1}}条目为:

user_source

过程名称是包规范的一部分。使用包名称和TABLE_NAME | COMMENTS ------------+------------------------------------------------ USER_SOURCE | Source of stored objects accessible to the user 查询all_source将返回规范,包括所有公共过程及其参数。

答案 3 :(得分:-1)

这对你有用吗?

SQL> SELECT DBMS_METADATA.GET_DDL('PACKAGE','EMP_PKG','SCOTT') FROM DUAL;

SQL> SELECT DBMS_METADATA.GET_DDL('PACKAGE_BODY','EMP_PKG','SCOTT') FROM DUAL;

SQL> show user
USER is "SYSTEM"
SQL>
SQL> l
  1* SELECT DBMS_METADATA.GET_DDL('PROCEDURE','P1','HR') FROM DUAL
SQL> /

DBMS_METADATA.GET_DDL('PROCEDURE','P1','HR')
-----------------------------------------------------------------------------

  CREATE OR REPLACE PROCEDURE "HR"."P1" ( p_id int) as
begin
   dbms_output.put

SQL>