Send E-mail using SysMailer class

 * Send simple paragrapgh or message using Email Template


static void ProjectAssignmentEmailUsingSysMalier(Args _args)

{

    SysEmailParameters      parameters;

    SMTPRelayServerName     relayServer;

    SMTPPortNumber          portNumber;

    Str1260                 subject, body;

    SysMailer               mailer;

    System.Exception        e;


    SysEmailTable           sysEmailTable;

    SysEmailMessageTable    message;

    HcmWorker               worker;

    ProjTable               projTable;


    SysEmailId              sysEmailId;

    Map                     mappings;

    str                     recepient, messageBody;


    // Email template ID

    sysEmailId = 'Custom';


    parameters    = SysEmailParameters::find();


    // Return SysEmailTable, e.g Language, sender name, sender email address

    sysEmailTable = SysEmailTable::find(sysEmailId);


    // Passing RecId here and return the HcmWorker table

    worker = HcmWorker::find(5637183005);


    // Passing ProjectId here and return the ProjTable table

    projTable = ProjTable::find('6805');


    if (worker && projTable)

    {

        // recepient = worker.email();


        mappings = new Map(Types::String,Types::String);


        mappings.insert('WorkerName',  worker.name()); // this will replace variable with actual value.

        mappings.insert('ProjectId',   projTable.ProjId);

        mappings.insert('ProjectName', projTable.Name);


        // Return SysEmailMessageTable e.g Email subject, email or template body

        message     = SysEmailMessageTable::find(sysEmailId, SysEmailTable::find(sysEmailId).DefaultLanguage);


        // messageBody is a string type, message.Mail = Email template or body

        messageBody = SysEmailMessage::stringExpand(message.Mail , SysEmailTable::htmlEncodeParameters(mappings));

    }


    if (parameters.SMTPRelayServerName)

        relayServer = parameters.SMTPRelayServerName;

    else

    relayServer = parameters.SMTPServerIPAddress;

    portNumber  = parameters.SMTPPortNumber;

    subject     = message.Subject;


    try

    {

        mailer = new SysMailer();


        mailer.SMTPRelayServer(relayServer,portNumber, '','', parameters.NTLM);


        // Sender email address

        mailer.fromAddress(SysEmailTable.SenderAddr);


        mailer.tos().appendAddress('emplyee@outlook.com');

        // mailer.ccs().appendAddress('emplyee@outlook.com');

        mailer.subject(subject);

        mailer.htmlBody(messageBody);

        mailer.sendMail();

        CodeAccessPermission::revertAssert();

    }

    catch (Exception::CLRError)

    {

        e = ClrInterop::getLastException();


        while (e)

        {

            info(e.get_Message());

            e = e.get_InnerException();

        }

        CodeAccessPermission::revertAssert();

        info ('Email sending is failed');

    }

    info('Email sent');

}

Comments

Post a Comment

Popular posts from this blog

Assembly reference containing type is not referenced, Object 'CLRObject' could not be created

Image
Problem Statement I have RDP and an AX shortcut icon, I have a parameter form with a "Test Connection" button. Upon clicking this button, a DLL is invoked to authenticate the connection status. This DLL is placed in both the client and server directories: specifically, it is located in the Client Directory at C:\Program Files (x86)\Microsoft Dynamics AX\60\Client\Bin and in the Server Directory at C:\Program Files\Microsoft Dynamics AX\60\Server\<MachineName>\bin . Additionally, a reference to this DLL has been added to the Application Object Tree (AOT) to facilitate its functionality When running the process from RDP, the "Test Connection" passes successfully. However, when using the AX shortcut icon, an error is encountered. Solution Add C# project into AOT, by right click on project and ADD <ProjectName> to AOT. Open project and set the project property. Deploy to client YES and Deploy to server YES and Deploy the project. After deployment of projec...
Read more

Open Packing slip posting form when updating Generate picking list

Image
  Functional Process: Creating Picking list registration. After creating a picking list registration, to update the picking list registration click on Update then Handling status becomes Completed . For posting this picking list user clicks on the  Post packing slip. Requirement: On the Update button Post packing slip form should be open.         Post packing slip form is opened on the Update button. Technical Background:     Create CoC of Update button as below: [ExtensionOf(formcontrolstr(WMSPickingRegistration, PickAllButton))] final class ERWMSPickingListRegistration_PickAllButton_Extension {     /// <summary>     /// This method is used to Populate Post packing slip form     /// </summary> void clicked()     {         WMSPickingRoute wmsPickingRoute;         SalesTable      salesTable;         MenuFunction...
Read more

Extract data of PO from the System in Ax 2012

 static void Job(Args _args) {     PurchTable      purchTable;     PurchLine       purchLine;     Dialog          dialog  = new Dialog();     DialogField     dialogFieldFileSave;     Commaio         file;     container       line;     FilePath        TempPath;     dialogFieldFileSave     = dialog.addField(extendedTypeStr(FilenameSave),"File path","Caption here");     dialog.caption("Extract PO data");     dialog.filenameLookupFilter(['*.csv']);     if(!dialog.run())     {         return;     }     if (dialogFieldFileSave.value() == '')     {         error("Please set up the location for export file.");         return; ...
Read more