4

我想列出在给定模式中使用重载的所有存储过程。所有程序都在包内。我可以使用下面的 SQL 几乎到达那里(proc_count > 1 的任何东西)。

select 
    object_name, procedure_name, count(procedure_name) as proc_count 
from 
    all_procedures                
where 
    owner = 'SCHEMA_NAME' 
group by
    object_name, procedure_name
order by proc_count desc   

但是,似乎没有办法区分名为“ask_version”的函数和名为“ask_version”的过程,在我的情况下我需要这样做。情况是我们的中间件在调用使用重载的 procs 时遇到了麻烦。我需要对发生这种情况的地方进行影响分析。我们从不直接调用函数,因此需要隔离它们

有什么我想念的吗?

4

2 回答 2

8

all_arguments似乎有帮助。对于函数,有一个参数 with position=0(它是返回值),对于过程,这个参数不存在。

SELECT object_name, procedure_name, t, COUNT(1) AS proc_count
FROM
(
  SELECT p.object_name, p.procedure_name,
         CASE WHEN a.object_id IS NULL THEN 'PROCEDURE' ELSE 'FUNCTION' END AS t
  FROM all_procedures p
  LEFT JOIN all_arguments a ON ( a.object_id = p.object_id
                             AND a.subprogram_id = p.subprogram_id AND a.position = 0 )
  WHERE p.owner = 'SCHEMA_NAME'
)
GROUP BY object_name, procedure_name, t
ORDER BY proc_count DESC;
于 2012-05-29T13:16:22.043 回答
4

这有点棘手,因为 Oracle 将包存储为独立函数和过程的离散对象。

唯一简单的方法是查看 ALL_ARGUMENTS 中的参数元数据。函数在位置 0 有一个参数来指定返回类型,而过程没有。

此外,通过检查 OVERLOAD 字段很容易判断函数或过程是否有重载。

select P.OBJECT_NAME
,      P.PROCEDURE_NAME
,      DECODE(min(a.POSITION), 0, 'Function', 'Procedure') FUNC_OR_PROC
,      DECODE(NVL(min(P.OVERLOAD), 0), 0, 'No', 'Yes') OVERLOADED
from   ALL_PROCEDURES P
,      ALL_ARGUMENTS a
where  P.OWNER = 'FLOWS_030000'
and    P.OBJECT_NAME = a.PACKAGE_NAME 
and    P.PROCEDURE_NAME = a.OBJECT_NAME
group  by P.OBJECT_NAME, P.PROCEDURE_NAME
order  by 1,2;
于 2012-05-29T13:51:11.013 回答