如何区分Oracle元数据中的过程和函数？

Question

我想列出在给定模式中使用重载的所有存储过程.所有程序都在包装内.我可以使用下面的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'的过程,在我的例子中我需要这样做.这种情况是我们的中间件无法调用使用重载的过程.我需要对发生的地方进行影响分析.我们从不直接调用函数,因此需要隔离它们

有什么东西我不见了吗？

Answer 1

all_arguments似乎有所帮助.对于一个函数,有一个参数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;