query to find the duplicate active employees in per_all_people_f

   SELECT email_address
--    INTO l_person_id
    FROM per_all_people_f
    WHERE 1=1
    AND SYSDATE Between effective_start_date and effective_end_date
    and person_type_id=6
    group by email_address
    having count(email_address) >1