oracle查询存储过程和函数中是否包含某个字符串

select * from all_source where owner=upper('cvs_master') and type='PROCEDURE' and text like '%9001%';
select * from temp_all_views where text like '%9001%';