Script to Disable Multiple EBS Users from backend (Oracle Apps )

Script to Disable Multiple Oracle Apps Users from backend  mostly in EBS Clone environments

=====================================================================

DECLARE

  -- get user list which should be disabled

  cursor c1 is

  select user_name

     from fnd_user

    where (end_date is null or end_date > sysdate) 

      and user_name not in ('SYSADMIN', 'VJAY', 'KIRAN','ARUN','SACHIN'); 

BEGIN

  for c in c1 loop

    -- disable user

    fnd_user_pkg.disableuser(c.user_name);

  end loop;

  --commit changes

  commit;

END;