Tuesday, August 20, 2019

UNIX - Send E-Mail with HTML Body and Multiple Attachments

Saw this question on several forums so thought to explain how to send e-mail from UNIX using sendmail with a HTML body and multiple attachments so below is the script for you to modify and use

 font_text=`echo "<font face=\"arial\" size=3>"`
echo "To: me@domain.com" >> mime.txt
echo "From: someone@domain.com" >> mime.txt
echo "Subject: Your subject goes here" >> mime.txt
echo "MIME-Version: 1.0" >> mime.txt
echo "Content-Type: multipart/mixed; boundary=\"XXXXboundary text\"" >> mime.txt
echo "" >> mime.txt
echo "This is a multipart message in MIME format." >> mime.txt
echo "" >> mime.txt
echo "--XXXXboundary text" >> mime.txt
echo "Content-Type: text/html" >> mime.txt
echo "" >> mime.txt
echo "<html>" >> mime.txt
echo "<body>" >> mime.txt
echo "<p>" >> mime.txt
echo "<font face=\"calibri\" size=4>" >> mime.txt
echo "Dear User,<br><br>" >> mime.txt
echo "Put your HTML body over here" >> mime.txt
echo "</p>" >> mime.txt

 #Below section you can remove if you do not have a table to send
echo "<table border=\"3\" cellpadding=\"10\">" >> mime.txt
echo "<tr bgcolor=\"cce6ff\">" >> mime.txt
echo "<td><b>${font_text}Column 1</b></td>" >> mime.txt
echo "<td><b>${font_text}Column 2</b></td>" >> mime.txt
echo "</tr>" >> mime.txt
echo "<tr>" >> mime.txt
echo "<td>${font_text}First column text</td>" >> mime.txt
echo "<td>${font_text}Second column text</td>" >> mime.txt
echo "</tr>" >> mime.txt
echo "</table>" >> mime.txt
#End of the table section

 #Below is the signature or ending of the mail
echo "<p>" >> mime.txt
echo "<font face=\"calibri\" size=4>" >> mime.txt
echo "Thank You,<br>" >> mime.txt
echo "UNIX Box<br><br>" >> mime.txt
echo "NOTE: This is an automated e-mail from UNIX. Please do not respond to this message" >> mime.txt
echo "</p>" >> mime.txt

 echo "</body>" >> mime.txt
echo "</html>" >> mime.txt

 #Put first boundary here between HTML body and first attachment
echo "--XXXXboundary text" >> mime.txt
echo "Content-Type: application/zip;name=test.zip; Content-Transfer-Encoding: base64;Content-Disposition: attachment" >> mime.txt
echo "" >> mime.txt
uuencode test.zip test.zip  >> mime.txt
echo ""  >> mime.txt
#Put second boundary here between first attachment and second attachment
echo "--XXXXboundary text" >> mime.txt
echo "Content-Type: application/zip;name=test2.zip; Content-Transfer-Encoding: base64;Content-Disposition: attachment" >> mime.txt
echo "" >> mime.txt
uuencode test2.zip test2.zip >> mime.txt
echo "" >> mime.txt

 #If you have more attachments add the same as above from the boundary till the uuencode

 #Put final boundary
echo "--XXXXboundary text--" >> mime.txt

 cat mime.txt | sendmail me@domain.com
Posted by at No comments:
Labels:

Tuesday, April 21, 2015

Change Title on iProcurement Page

Dear Reader

In this post, we will see how we can change the title of the page in iProcurement responsibility

Usually, the seeded iProc responsibility will show just the title on the page as iProcurement in the branding bar at the top of the page (in blue background section)

If we wish to change this to maybe show your company name or the OU name, we can use below script which will create multiple branding functions for all your custom iProc responsibilities

DECLARE
   p_resp_name VARCHAR2(240) := '&responsibility_name';
   lv_function_id NUMBER;
   lv_rowid VARCHAR2(240);
   lv_home_menu_id NUMBER;
   lv_top_menu_id NUMBER;
   lv_max_seq NUMBER;
   CURSOR lcur_resp(p_resp VARCHAR2)
   IS
      SELECT   fr.responsibility_name,
               fr.menu_id,
               fr.responsibility_id,
               fr.application_id,
               (
                  SELECT   hou.name
                  FROM     fnd_profile_option_values fpv,
                           fnd_profile_options fpo,
                           hr_operating_units hou
                  WHERE    fpo.profile_option_name = 'ORG_ID'
                  AND      fpo.profile_option_id = fpv.profile_option_id
                  AND      fpv.level_id = 10003
                  AND      fpv.level_value = fr.responsibility_id
                  AND      fpv.profile_option_value = hou.organization_id
               ) ou_name,
               Upper(REPLACE(fr.responsibility_name, 'MyCompany_iProcurement_User_', '')) region_name
      FROM     fnd_responsibility_vl fr
      WHERE    ((p_resp IS NULL AND fr.responsibility_name LIKE 'MyCompany_iProcurement_User%') OR (p_resp IS NOT NULL AND fr.responsibility_name = p_resp));

BEGIN
   SELECT   menu_id
   INTO     lv_home_menu_id
   FROM     fnd_menus_vl
   WHERE    user_menu_name = 'iProcurement: Homepage menu';

   SELECT   menu_id
   INTO     lv_top_menu_id
   FROM     fnd_menus_vl
   WHERE    user_menu_name = 'Internet Procurement Home';

   --Here first we will make copied of branding function and attach it to home menu
   FOR lrec_resp IN lcur_resp(p_resp_name)
   LOOP
      FOR i IN
      (
         SELECT   *
         FROM     fnd_form_functions_vl
         WHERE    function_name = 'ICX_POR_IP_BRAND'
      ) LOOP
         SELECT   fnd_form_functions_s.NEXTVAL
         INTO     lv_function_id
         FROM     DUAL;

         lv_rowid := NULL;

         fnd_form_functions_pkg.INSERT_ROW
         (
            X_ROWID                    => lv_rowid,
            X_FUNCTION_ID              => lv_function_id,
            X_WEB_HOST_NAME            => i.WEB_HOST_NAME         ,
            X_WEB_AGENT_NAME           => i.WEB_AGENT_NAME        ,
            X_WEB_HTML_CALL            => i.WEB_HTML_CALL         ,
            X_WEB_ENCRYPT_PARAMETERS   => i.WEB_ENCRYPT_PARAMETERS,
            X_WEB_SECURED              => i.WEB_SECURED           ,
            X_WEB_ICON                 => i.WEB_ICON              ,
            X_OBJECT_ID                => i.OBJECT_ID             ,
            X_REGION_APPLICATION_ID    => i.REGION_APPLICATION_ID ,
            X_REGION_CODE              => i.REGION_CODE           ,
            X_FUNCTION_NAME            => i.FUNCTION_NAME || '_' || lrec_resp.region_name,
            X_APPLICATION_ID           => i.APPLICATION_ID        ,
            X_FORM_ID                  => i.FORM_ID               ,
            X_PARAMETERS               => i.PARAMETERS            ,
            X_TYPE                     => i.TYPE                  ,
            X_USER_FUNCTION_NAME       => i.USER_FUNCTION_NAME || ' - ' || lrec_resp.ou_name,
            X_DESCRIPTION              => i.DESCRIPTION || ' - ' || lrec_resp.ou_name,
            X_CREATION_DATE            => SYSDATE,
            X_CREATED_BY               => 0,
            X_LAST_UPDATE_DATE         => SYSDATE,
            X_LAST_UPDATED_BY          => 0,
            X_LAST_UPDATE_LOGIN        => 0
         );

         lv_rowid := NULL;

         SELECT   Max(entry_sequence) + 5
         INTO     lv_max_seq
         FROM     fnd_menu_entries_vl
         WHERE    menu_id = lv_home_menu_id;

         fnd_menu_entries_pkg.INSERT_ROW
         (
            X_ROWID           => lv_rowid,
            X_MENU_ID         => lv_home_menu_id,
            X_ENTRY_SEQUENCE  => lv_max_seq,
            X_SUB_MENU_ID     => NULL,
            X_FUNCTION_ID     => lv_function_id,
            X_GRANT_FLAG      => 'Y',
            X_PROMPT          => NULL,
            X_DESCRIPTION     => NULL,
            X_CREATION_DATE   => SYSDATE,
            X_CREATED_BY      => 0,
            X_LAST_UPDATE_DATE => SYSDATE ,
            X_LAST_UPDATED_BY => 0,
            X_LAST_UPDATE_LOGIN => 0
         );
      END LOOP;

      FOR i IN
      (
         SELECT   *
         FROM     fnd_form_functions_vl
         WHERE    function_name = 'POR_SSP_HOME'
      ) LOOP
         SELECT   fnd_form_functions_s.NEXTVAL
         INTO     lv_function_id
         FROM     DUAL;

         lv_rowid := NULL;

         fnd_form_functions_pkg.INSERT_ROW
         (
            X_ROWID                    => lv_rowid,
            X_FUNCTION_ID              => lv_function_id,
            X_WEB_HOST_NAME            => i.WEB_HOST_NAME         ,
            X_WEB_AGENT_NAME           => i.WEB_AGENT_NAME        ,
            X_WEB_HTML_CALL            => REPLACE(i.WEB_HTML_CALL, 'ICX_POR_IP_BRAND', 'ICX_POR_IP_BRAND' || '_' || lrec_resp.region_name),
            X_WEB_ENCRYPT_PARAMETERS   => i.WEB_ENCRYPT_PARAMETERS,
            X_WEB_SECURED              => i.WEB_SECURED           ,
            X_WEB_ICON                 => i.WEB_ICON              ,
            X_OBJECT_ID                => i.OBJECT_ID             ,
            X_REGION_APPLICATION_ID    => i.REGION_APPLICATION_ID ,
            X_REGION_CODE              => i.REGION_CODE           ,
            X_FUNCTION_NAME            => i.FUNCTION_NAME || '_' || lrec_resp.region_name,
            X_APPLICATION_ID           => i.APPLICATION_ID        ,
            X_FORM_ID                  => i.FORM_ID               ,
            X_PARAMETERS               => i.PARAMETERS            ,
            X_TYPE                     => i.TYPE                  ,
            X_USER_FUNCTION_NAME       => i.USER_FUNCTION_NAME || ' - ' || lrec_resp.region_name,
            X_DESCRIPTION              => i.DESCRIPTION || ' - ' || lrec_resp.region_name,
            X_CREATION_DATE            => SYSDATE,
            X_CREATED_BY               => 0,
            X_LAST_UPDATE_DATE         => SYSDATE,
            X_LAST_UPDATED_BY          => 0,
            X_LAST_UPDATE_LOGIN        => 0
         );

         lv_rowid := NULL;

         SELECT   Max(entry_sequence) + 5
         INTO     lv_max_seq
         FROM     fnd_menu_entries_vl
         WHERE    menu_id = lv_top_menu_id;

         fnd_menu_entries_pkg.INSERT_ROW
         (
            X_ROWID           => lv_rowid,
            X_MENU_ID         => lv_top_menu_id,
            X_ENTRY_SEQUENCE  => lv_max_seq,
            X_SUB_MENU_ID     => NULL,
            X_FUNCTION_ID     => lv_function_id,
            X_GRANT_FLAG      => 'Y',
            X_PROMPT          => 'iProcurement Home Page',
            X_DESCRIPTION     => 'Internet Procurement Home Page - ' || lrec_resp.ou_name,
            X_CREATION_DATE   => SYSDATE,
            X_CREATED_BY      => 0,
            X_LAST_UPDATE_DATE => SYSDATE ,
            X_LAST_UPDATED_BY => 0,
            X_LAST_UPDATE_LOGIN => 0
         );
      END LOOP;
   END LOOP;

   FOR lrec_resp IN lcur_resp(p_resp_name) LOOP
      FOR i IN
      (
         SELECT   Upper(REPLACE(fr.responsibility_name, 'MyCompany_iProcurement_User_', '')) region_name
         FROM     fnd_responsibility_vl fr
         WHERE    fr.responsibility_name LIKE 'MyCompany_iProcurement_User%'
         AND      fr.responsibility_id != lrec_resp.responsibility_id
      ) LOOP
         SELECT   function_id
         INTO     lv_function_id
         FROM     fnd_form_functions_vl
         WHERE    function_name = 'POR_SSP_HOME_' || i.region_name;

         lv_rowid := NULL;
         fnd_resp_functions_pkg.INSERT_ROW
         (
            X_ROWID                  => lv_rowid,
            X_APPLICATION_ID        => lrec_resp.application_id,
            X_RESPONSIBILITY_ID    => lrec_resp.responsibility_id,
            X_ACTION_ID            => lv_function_id,
            X_RULE_TYPE            => 'F',
            X_CREATED_BY          => 0,
            X_CREATION_DATE       => SYSDATE,
            X_LAST_UPDATED_BY     => 0,
            X_LAST_UPDATE_DATE    => SYSDATE,
            X_LAST_UPDATE_LOGIN   => 0
         );
      END LOOP;

      SELECT   function_id
      INTO     lv_function_id
      FROM     fnd_form_functions_vl
      WHERE    function_name = 'POR_SSP_HOME';

      lv_rowid := NULL;
      fnd_resp_functions_pkg.INSERT_ROW
      (
         X_ROWID                  => lv_rowid,
         X_APPLICATION_ID        => lrec_resp.application_id,
         X_RESPONSIBILITY_ID    => lrec_resp.responsibility_id,
         X_ACTION_ID            => lv_function_id,
         X_RULE_TYPE            => 'F',
         X_CREATED_BY          => 0,
         X_CREATION_DATE       => SYSDATE,
         X_LAST_UPDATED_BY     => 0,
         X_LAST_UPDATE_DATE    => SYSDATE,
         X_LAST_UPDATE_LOGIN   => 0
      );

   END LOOP;
END;


As can be seen from the script above, the branding comes from the ICX_POR_IP_BRAND function which we create multiple copies of (one for each custom iProc responsibility) and the attach to the main menu.

We also create multiple copies of the POR_SSP_HOME function and modify the branding function name to the custom one we create. Finally we exclude the unwanted functions from each responsibility

Simple isn't it :-)

Cheers
A

Posted by at No comments:
Subscribe to: Posts (Atom)