1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | select o. name , decode(o.type#, 7, 'PROCEDURE' , 8, 'FUNCTION' , 9, 'PACKAGE' , 11, 'PACKAGE BODY' , 12, 'TRIGGER' , 13, 'TYPE' , 14, 'TYPE BODY' , 22, 'LIBRARY' , 87, 'ASSEMBLY' , 'UNDEFINED' ), s.line, s.source from sys. "_CURRENT_EDITION_OBJ" o, sys.source$ s where o.obj# = s.obj# and ( o.type# in (7, 8, 9, 11, 12, 14, 22) OR ( o.type# = 13 AND o.subname is null )) and o.owner# = userenv( 'SCHEMAID' ) union all select o. name , 'JAVA SOURCE' , s.joxftlno, s.joxftsrc from sys. "_CURRENT_EDITION_OBJ" o, x$joxscd s where o.obj# = s.joxftobn and o.type# = 28 and o.owner# = userenv( 'SCHEMAID' ) |
해당 쿼리 참조해보시면 될 것 같습니다.
패키지 뿐만 아니고 함수 및 프로시저 등도 가능합니다.