Query do No Show

Query que lê as Agendas que não compareceram e alimenta a fila 

Select Ev.Cod_Empresa,Ev.Cod_Evento,Cli.Prefixo_Cel  DDD,Cli.Telefone_Cel Celular,Ev.Data_Novo_Contato

From Crm_Eventos     Ev,Clientes        Cli,Crm_Parm_Fluxo  Parm,Cliente_Diverso Div

Where Ev.Cod_Cliente = Cli.Cod_Cliente

And Ev.Cod_Empresa = Parm.Cod_Empresa

And Cli.Cod_Cliente = Div.Cod_Cliente

And Ev.Status = 'P'

And Nvl(Ev.Nao_Compareceu, 'N') = 'S'

And Nvl(Div.Crm_Sms, 'N') = 'N'

And Length(Trim(Cli.Prefixo_Cel)) = 2

          And Length(Trim(Cli.Telefone_Cel)) In (8,9)

And Nvl(Ev.Apagar_Ao_Sair, 'N') <> 'X'

And (Ev.Data_Novo_Contato) >= Trunc(Sysdate)

And (Ev.Data_Novo_Contato) < Trunc(Sysdate + 1)

          And NVL(Parm.ATIVAR_LEADZAP, 'N') = 'S'

          and ev.responsavel_pelo_evento is not null

          --Tira Cliente = 1

          AND EV.COD_CLIENTE <> 1

          --nao pode ter envio de no show

          And Not Exists (select 1

                          from crm_disparo_fila fil

                          where fil.cod_empresa = ev.cod_empresa

                           and fil.cod_evento = ev.cod_evento

                           and fil.id_disparo = 202);