Doc

    Name:  mkkeep.sql

    Author Mark Gurry

    This script creates another script that can be used to pin
    packages and procedures into the shared pool area.

#

select 'execute dbms_shared_pool.keep('''||owner||'.'||name||''');'
	from v$db_object_cache
where type in ('PROCEDURE', 'PACKAGE')
order by executions desc;