set long 32767
set pages 500
set pause on
set trimspool on
set pause ‘Any Key…>’
spool vw_txt.lst
select owner, view_name, text_length, text
from dba_views
where view_name like upper (nvl(‘&vw_name’,’WHOOPS’)||’%’)
/
set long 80
spool off

— End of File