set scan on
set verify off
accept ls_sample_code prompt "Enter code to look for: "
select /*+ FULL(@SEL$2 s)  USE_HASH(@SEL$3 s) */ * from dba_source
where upper(text) like upper('%&&ls_sample_code%')
and owner = 'MECOMS'
and trim(REPLACE(text,chr(9),'')) not like '--%'
order by 2,3,4
/