select distinct a.proj_cod, b.proj_nome, a.ativ_cod, a.ativ_nome, c.pes_chave 
from atividade as a, projeto as b, pessoal as c
where a.ativ_cod not in (select distinct ativ_cod from perc_realizado) and a.ativ_perc_real is not NULL
      and b.proj_cod = a.proj_cod and b.proj_resp_cad = c.pes_cod
order by a.proj_cod, a.ativ_cod