Script to find Invalid objects list with Error details

-- Script to find Invalid objects list with Error details
set lines 170
set pages 10000
col owner format a20
col TEXT format a100
col NAME format a30
col LINE format 9999999
BREAK ON OWNER ON NAME SKIP 1
select a.OWNER,NAME,LINE,TEXT FROM DBA_ERRORS A,DBA_OBJECTS B
WHERE A.NAME = B.OBJECT_NAME
AND B.STATUS = 'INVALID';