Script to Disable User Email Notification Preference in Oracle Apps R12 - Orapoint

This Script will help to disable user’s email notification preferences in Oracle R12 Application

 exec FND_PREFERENCE.put('ALSOSA', 'WF', 'MAILTYPE', 'QUERY');
--username to be passed and value for email style should be per the list below
--QUERY (corresponds to preference value "Do not send me mail")
--MAILTEXT (corresponds to preference value "Plain text mail")
--MAILATTH (corresponds to preference value "Plain text mail with HTML attachments")
--MAILHTML (corresponds to preference value "HTML mail with attachments")
--MAILHTM2 (corresponds to preference value "HTML mail")
--SUMMARY (corresponds to preference value "Plain text summary mail")
--SUMHTML (corresponds to preference value "HTML summary mail")
--DISABLED (corresponds to preference value "Disabled")
COMMIT; 

Script to Disable multiple Supplier’s email notification preferences through PL/SQL Anonymous block

DECLARE  
    v_application_name      VARCHAR2 (100) := NULL;
    v_responsibility_key    VARCHAR2 (100) := NULL;
    v_security_group        VARCHAR2 (100) := NULL;
    v_description           VARCHAR2 (100) := NULL;
 --this cursor is used to fetch Supplier's list
    CURSOR get_user IS 
        select NAME user_name from fnd_usr_roles where name like '%@%';   
 BEGIN
 FOR i IN get_user
  LOOP
 FND_PREFERENCE.put(i.user_name, 'WF', 'MAILTYPE', 'QUERY');
 DBMS_OUTPUT.put_line (  ' Disabled email of '|| i.user_name|| ' Successfully');
 COMMIT;
  END LOOP;
 EXCEPTION
    WHEN OTHERS
    THEN
       DBMS_OUTPUT.put_line
                          (   'Unable to disable'|| SQLCODE|| ' '|| SUBSTR (SQLERRM, 1, 100));
 END;
 /