SQL - Como consultar e-mails inválidos do cadastro de pessoas?

PESSOAS.CAD_PESSOAS.FAQ-8791

Para relacionar os cadastros de e-mails registrados erroneamente no cadastro de pessoas (p.ex.: campo E-MAIL sem @, campo TELEFONE com endereço, etc) pode-se executar o comando abaixo a partir do Executor de SQL e DML ou registrar permanentemente a consulta no Cadastro de relatórios.

select p.pessoa as id_pessoa
     ,e.endereco as email
     ,p.nome_completo
     ,CASE WHEN p.situacao='I' THEN 'Inativo'
          ELSE 'Ok'
     END as situacao
                ,to_char(data_inclusao,'dd/mm/yyyy') as data_inclusao
                ,to_char(data_alteracao,'dd/mm/yyyy') as data_alteracao
from enderecos e
join tipos_enderecos t on t.id = e.tipo_endereco_id
join pessoas p on p.id = e.pessoa_id
where tipo_endereco like '%EMAIL%'
and not exists 
(
 select 1
 from enderecos e1
 join tipos_enderecos t1 on t1.id = e1.tipo_endereco_id
 where t1.tipo_endereco like '%EMAIL%'
 and e1.endereco like '%@%'
 and e1.pessoa_id = e.pessoa_id
)
;