Try following ...
SELECT DECODE(TO_CHAR(us.line), '1', ue.text||'
Pkg:'||us.name||chr(10)||chr(10)||
' '||TO_CHAR(us.line,'99990')||' '||us.text,
TO_CHAR(ue.line-7),ue.text||' Pkg:'||us.name||'
',
TO_CHAR(ue.line-6),'',
TO_CHAR(ue.line+6),'',
TO_CHAR(ue.line) ,'-->'||TO_CHAR(us.line,'99990')
||' '||us.text
,' '||TO_CHAR(us.line,'99990')
||' '||us.text) outline
FROM USER_SOURCE us, USER_ERRORS ue
WHERE us.line BETWEEN (ue.line-7) AND (ue.line+6)
AND us.name = ue.name
AND us.TYPE = ue.TYPE
AND ue.text NOT LIKE 'PL/SQL: Statement ignored'
AND ue.text NOT LIKE 'PL/SQL: Declaration ignored'
ORDER BY ue.name, ue.line, ue.text, us.line
/
I think this is somewhere written in TOAD installation too.
Raj
______________________________________________________
Rajendra Jamadagni MIS, ESPN Inc.
Rajendra dot Jamadagni at ESPN dot com
Any opinion expressed here is personal and doesn't reflect that of ESPN Inc.
QOTD: Any clod can have facts, but having an opinion is an art!
*********************************************************************1
This e-mail message is confidential, intended only for the named recipient(s) above
and may contain information that is privileged, attorney work product or exempt from
disclosure under applicable law. If you have received this message in error, or are
not the named recipient(s), please immediately notify corporate MIS at (860) 766-2000
and delete this e-mail message from your computer, Thank you.
*********************************************************************1