procedure 
as
   CURSOR usercur
   IS
      SELECT fu.user_name, fu.start_date
        FROM apps.fnd_user fu
       WHERE user_name like '%EXT';
    DECLARE ld_end_date DATE;
BEGIN
ld_end_date = SYSDATE + 10000;
   FOR myuser IN usercur
      dbms_output.put_line('current user is   = ' || myuser.user_name|| 'Start date is  = ' || myuser.start_date);
   LOOP
      fnd_user_pkg.updateuser(
        x_user_name      => myuser.user_name
       ,x_owner    => 'CUST'   
       ,x_end_date       => ld_end_date
      );
    dbms_output.put_line('current user is   = ' || myuser.user_name|| 'Start date is  = ' || myuser.start_date);
    END LOOP; 
END;

update fnd_user set
  end_date = sysdate + 10000
where user_name like '%EXT%';