oracle 被鎖對象查詢和失效包查詢

被鎖對象

select * from v$locked_object join user_objects on v$locked_object.OBJECT_ID=user_objects.object_id;

失效包

SELECT 'ALTER ' ||

       decode(object_type, 'PACKAGE BODY', 'PACKAGE', object_type) || ' ' ||

       object_name || decode(object_type,

                             'PACKAGE BODY',

                             ' COMPILE BODY ; ',

                             'PACKAGE',

                             ' COMPILE SPECIFICATION ; ',

                             ' COMPILE; ') AS c

  FROM user_objects

 WHERE status <> 'VALID'

   AND object_type IN ('FUNCTION', 'PACKAGE', 'PACKAGE BODY', 'PROCEDURE',

        'TRIGGER', 'VIEW')

 ORDER BY object_type DESC;