objpinned.sql

ttitle 'Objects Pinned in Shared Pool'

SELECT name, type, kept
  FROM v$db_object_cache
 WHERE kept = 'YES';