X++ Code for Sending PO Details in a Tabular Format by Email

        PurchTable          purchTable;
        PurchLine           purchLine;
        PurchLineAmount     poAmount;
        Map                 templateTokens;
        str                 emailSubject,body;
        templateTokens      = new Map(Types::String, Types::String);
        boolean ret = false;
       
        emailSubject = "Open PO list above one CR and above 180 days";
        templateTokens.insert("@SYS74341", emailSubject);
        body = '<p>Dear Team,</p>';
        body+= '<p>Open PO details listed below which exceeds the 180 days.</p>';
        body+= '<table style="border-collapse: collapse; width: 100%;" border="1">';
        body+= '<tbody>';

        body+= '<tr>';
        body+= '<td style="width: 16.6667%;"><strong>Purchase Id</strong></td>';
        body+= '<td style="width: 16.6667%;"><strong>Purchase name</strong></td>';
        body+= '<td style="width: 16.6667%;"><strong>Vendor Id</strong></td>';
        body+= '<td style="width: 16.6667%;"><strong>Vendor name</strong></td>';
        body+= '<td style="width: 16.6667%;"><strong>Purchase amount</strong></td>';
        body+= '</tr>';
 
        try
        {
            while select purchTable // write your custom logic
            {    

                        ret = true;

     
                        body+= '<tr>';
                        body+= '<td style="width: 16.6667%;">';
                        body+= strFmt('%1', purchTable.PurchId);
                        body+= '</td>';
                        body+= '<td style="width: 16.6667%;">';
                        body+= strFmt('%1', purchTable.PurchName);
                        body+= '</td>';
                        body+= '<td style="width: 16.6667%;">';
                        body+= strFmt('%1', purchTable.OrderAccount);
                        body+= '</td>';
                        body+= '<td style="width: 16.6667%;">';
                        body+= strFmt('%1', VendTable::find(purchTable.OrderAccount).name());
                        body+= '</td>';
                        body+= '<td style="width: 16.6667%;">';
                        body+= strFmt('%1', poAmount);
                        body+= '</td>';
                        body+= '</tr>';
            }

            if(ret)
            {
                SysEmailParameters        emailParameters   =   SysEmailParameters::find();
                SysMailerMessageBuilder   messageBuilderloc = new SysMailerMessageBuilder();
                messageBuilderloc.setFrom(emailParameters.SMTPUserName);
                messageBuilderloc.addTo("TOMAIL");
                //messageBuilder.addCc(_emailCC);
                messageBuilderloc.setSubject(emailSubject);
                messageBuilderloc.setBody(body,true);
                SysMailerFactory::getNonInteractiveMailer().sendNonInteractive(messageBuilderloc.getMessage());
         
                info("Mail alert operation completed");
            }
        }
        catch(Exception::Error)
        {
            throw Exception::Error;
        }

----------------

Output :

Code to attach multiple files from a folder X++

My requirement is to attach multiple files from a folder to a specific record. This code selects only the files that are allowed by D365 Finance & Operations.

  public static void main(Args _args)

  {

      FilePath filePath = @"C:\Temp\saitesting"; //Folder path

      PurchId  purchId  = "000030";

      int attachedCount = 0;

      int skippedCount  = 0;

      PurchTable purchTable = PurchTable::find(purchId, true);

      if (!purchTable)

      {

          throw error(strFmt("PO %1 not found", purchId));

      }

      DocuType docType = DocuType::find("File");

      if (!docType)

      {

          throw error("@SYS19389");

      }

      System.String[] files = System.IO.Directory::GetFiles(filePath, "*.*");

      System.Collections.IEnumerator enumerator = files.GetEnumerator();

      while (enumerator.MoveNext())

      {

          try

          {

              Filename fileFullPath = enumerator.get_Current();

              Filename fileNameOnly = System.IO.Path::GetFileName(fileFullPath);

              str fileExtension = Docu::GetFileExtension(fileNameOnly);

              if (fileExtension && !Docu::validateExtension(fileExtension))

              {

                  skippedCount++;

                  warning(strFmt("Skipped %1 due to invalid extension", fileNameOnly));

                  continue;

              }

              System.IO.FileStream fileStream =

          new System.IO.FileStream(fileFullPath, System.IO.FileMode::Open, System.IO.FileAccess::Read);

              System.IO.MemoryStream memStream = new System.IO.MemoryStream();

              fileStream.CopyTo(memStream);

              fileStream.Close();

              memStream.Position = 0;

              ttsBegin;

              DocumentManagement::attachFileForReference(

          purchTable.TableId,

          purchTable.RecId,

          curext(),

          docType.TypeId,

          memStream,

          fileNameOnly,

          fileNameOnly,

          ''

      );

              ttsCommit;

              attachedCount++;

              info(strFmt("Attached %1 to PO %2", fileNameOnly, purchId));

          }

          catch (Exception::Error)

          {

              skippedCount++;

              warning(strFmt("Error attaching %1: %2", enumerator.get_Current(), exceptionTextFallThrough()));

          }

      }

      info(strFmt("Attachment job completed. %1 files attached, %2 files skipped.", attachedCount, skippedCount));

  }

Reference blog :

https://daxture.blogspot.com/2017/04/ax-2012-reading-files-from-directory.html