Number sequence customization in Dynamics 365

Create a number sequence in a standard module

• Create new EDT
• Add a new code block to the loadModule in the NumberSeqModuleXXX class
• Add a new static method to the parameters table of the module to get the number sequence reference

Using Extension

[ExtensionOf(classStr(NumberSeqModuleCustomer))]

final class NumberSeqModuleCustTest_Extension

{

            protected void loadModule()

            {

                        NumberSeqDatatype datatype = NumberSeqDatatype::construct();

                        next loadModule();                        

datatype.parmDatatypeId(extendedTypeNum(TestId));
datatype.parmReferenceHelp(literalStr('Test ID'));

                        datatype.parmWizardIsContinuous(false);

                        datatype.parmWizardIsManual(NoYes::No);

                       datatype.parmWizardIsChangeDownAllowed(NoYes::No);

                       datatype.parmWizardIsChangeUpAllowed(NoYes::No);

                        datatype.parmSortField(1);                        

datatype.addParameterType(NumberSeqParameterType::DataArea, true, false);

                        this.create(datatype);

            }

}

[ExtensionOf(tableStr(CustParameters))]

final class CustParametersTest_Extension

{

    client server static NumberSequenceReference numRefTestId()

    {

        return NumberSeqReference::findReference(extendedTypeNum(TestId));

    }

}

Create a number sequence in a new module

·        Add a new element to the NumberSeqModule base enum.

·        Create a NumberSeqModule* class for our module.

·        To add a new element to the NumberSeqModule Base Enum we can use an extension.

·        Now we need to create a new class extends with NumberSeqApplicationModule

class NumberSeqModuleTest extends NumberSeqApplicationModule

{

    protected void loadModule()

    {

        NumberSeqDatatype datatype = NumberSeqDatatype::construct();

        datatype.parmDatatypeId(extendedTypeNum(TestId));

        datatype.parmReferenceHelp(literalStr('Test ID'));

        datatype.parmWizardIsContinuous(false);

        datatype.parmWizardIsManual(NoYes::No);

        datatype.parmWizardIsChangeDownAllowed(NoYes::No);

        datatype.parmWizardIsChangeUpAllowed(NoYes::No);

        datatype.parmSortField(1);       

        datatype.addParameterType(NumberSeqParameterType::DataArea, true, false);

        this.create(datatype);

    }

    public NumberSeqModule numberSeqModule()

    {

        return NumberSeqModule::Test;

    }

    [SubscribesTo(classstr(NumberSeqGlobal),delegatestr(NumberSeqGlobal, buildModulesMapDelegate))]

    static void buildModulesMapSubsciber(Map numberSeqModuleNamesMap)

    {

       NumberSeqGlobal::addModuleToMap(classnum(NumberSeqModuleTest), numberSeqModuleNamesMap);

    }

}

Job: (To load all module number sequences)
static void Test_NumSeqLoad(Args _args)
   {
      NumberSeqApplicationModule::loadAll();
   }  

D365 X++ code to send mail with excel attachment

using OfficeOpenXml;
using OfficeOpenXml.Style;
using OfficeOpenXml.Table;
using System.Net;
using Microsoft.Dynamics.ApplicationPlatform.Services.Instrumentation;
using Microsoft.DynamicsOnline.Infrastructure.Components.SharedServiceUnitStorage;
using Microsoft.Dynamics.ApplicationPlatform.Environment;
using Microsoft.Dynamics.AX.Framework.FileManagement;
class BB_ExcelEmail
{
 
    #define.CurrentVersion(1)
    #localmacro.CurrentList

    #endmacro

    public void run()
    {
        #AviFiles
        SysOperationProgress progress1 = new SysOperationProgress();
 
        int             row=1;
        int             datediff;
        CustAccount     invoiceAccount;
        int             startrow;
        int             col;
        int             i;
        boolean         goin = false;
     
        SysMailerMessageBuilder builder = new SysMailerMessageBuilder();
     
        COM                 Crange;
        COM                 CBorders;
        COM                 CBorder;
        Amount              TotalSales;
        Qty                 TotalQty;
        Amount              IYesterday, Itoday, IOpen;
        Amount              SYesterday, Stoday, SOpen;
        Amount              EYesterday, Etoday, EOpen;
        Amount              invoiceAmount;
        System.IO.StreamReader reader= null;
        System.String contentString;
        System.Net.WebClient webClient;
        DocuFileSaveResult saveResult =DocuFileSaveResult::construct();
         
        System.IO.Stream workbookStream = new System.IO.MemoryStream();
           
        System.IO.MemoryStream memoryStream = new System.IO.MemoryStream();
        using (var package = new OfficeOpenXml.ExcelPackage(memoryStream))
        {
            var sheet = package.get_Workbook().get_Worksheets();
            var worksheet = sheet.Add("First sheet");
            var cells = worksheet.get_Cells();
            OfficeOpenXml.Style.ExcelStyle style = cells.get_Item(row,1).get_style();
            OfficeOpenXml.Style.ExcelFont font = style.Font;
            OfficeOpenXml.Style.ExcelColor color = font.Color;
 
            VAR cell = Cells.get_item(row,1);cell.set_value("Exel email test");
            VAR cellStyle = Cells.get_item(row, 1).get_style();
            cellStyle.get_Font().set_Bold(true);
            color.SetColor(System.Drawing.Color::FromArgb(170,0,0));
            font.Size = 20;
            row++;
         
            cell = Cells.get_item(row,1);cell.set_Value("Entry Date");
            cellStyle = Cells.get_item(row, 1).get_style();
            style = cells.style;font  = style.font;color = font.color;
            color.SetColor(System.Drawing.Color::FromArgb(190,0,0));
            cell = Cells.get_item(row,2);cell.set_Value("Sales ID");
            cellStyle = Cells.get_item(row, 2).get_style();
            style = cells.style;font  = style.font;color = font.color;
            color.SetColor(System.Drawing.Color::FromArgb(190,0,0));
            cell = Cells.get_item(row,3);cell.set_Value("Bill To");
            cellStyle = Cells.get_item(row, 3).get_style();
            style = cells.style;font  = style.font;color = font.color;
            color.SetColor(System.Drawing.Color::FromArgb(190,0,0));
            cell = Cells.get_item(row,4);cell.set_Value("End Customer");
            row++;
            package.save();
            downloadUrl = File::SendFileToTempStore(memoryStream, "ExcelEmail.xlsx");
            webClient = new System.Net.WebClient();
            System.IO.Stream        stream = new System.IO.MemoryStream(webClient.DownloadData(downloadUrl));
       

            builder.setFrom(SysEmailParameters::find().SMTPUserName);
            builder.addTo("test@test.com");
            builder.addAttachment(stream,"ExcelEmail.xlsx");
                   
        }
   
        SysMailerFactory::getNonInteractiveMailer().sendNonInteractive(builder.getMessage());
    }

    public static void main(args args)
    {
        BB_ExcelEmail BB_ExcelEmail = new BB_ExcelEmail ();
        ;
             
            BB_ExcelEmail ();
    }

}

X++ code to run the report through code and send mail with attachments in D365

SRSPrintDestinationSettings     printerSettings;
Array                           arrayFiles;
System.Byte[]                   reportBytes = new System.Byte[0]();
SRSProxy                        srsProxy;
SRSReportRunService             srsReportRunService = new SrsReportRunService();
Microsoft.Dynamics.AX.Framework.Reporting.Shared.ReportingService.ParameterValue[]  parameterValueArray;
Map                             reportParametersMap;
SRSReportExecutionInfo          executionInfo = new SRSReportExecutionInfo();


filename = strfmt('%1%2',SSSSSS,'.pdf');
System.IO.Stream workbookStream = new System.IO.MemoryStream();
SysMailerSMTP           mailer = new SysMailerSMTP();
SysMailerMessageBuilder builder = new SysMailerMessageBuilder();
SysEmailParameters      parameters = SysEmailParameters::find();
SrsReportRunController  ssrsController = new SrsReportRunController();
XXXXXXXContract    Contract = new XXXXXXXContract();// define contract class

ssrsController.parmReportName(ssrsReportStr(ReportName, Design));
ssrsController.parmShowDialog(false);
Contract.parmRecordId(YYYY.RecId);//Record recid
ssrsController.parmReportContract().parmRdpContract(Contract);
printerSettings = ssrsController.parmReportContract().parmPrintSettings();
printerSettings.printMediumType(SRSPrintMediumType::File);
printerSettings.fileFormat(SRSReportFileFormat::PDF);
printerSettings.overwriteFile(true);
printerSettings.fileName(filename);
                 
ssrsController.parmReportContract().parmReportServerConfig(SRSConfiguration::getDefaultServerConfiguration());
ssrsController.parmReportContract().parmReportExecutionInfo(executionInfo);
srsReportRunService.getReportDataContract(ssrsController.parmreportcontract().parmReportName());
srsReportRunService.preRunReport(ssrsController.parmreportcontract());
reportParametersMap = srsReportRunService.createParamMapFromContract(ssrsController.parmReportContract());
parameterValueArray = SrsReportRunUtil::getParameterValueArray(reportParametersMap);

srsProxy = SRSProxy::constructWithConfiguration(ssrsController.parmReportContract().parmReportServerConfig());
// Actual rendering to byte array
reportBytes = srsproxy.renderReportToByteArray(ssrsController.parmreportcontract().parmreportpath(),
                                                                      parameterValueArray,
                                                                      printerSettings.fileFormat(),
                                                                      printerSettings.deviceinfo());

builder.setFrom(SysEmailParameters::find().SMTPUserName);
builder.addTo(AAAAAA);
builder.setSubject(strfmt(bbbbbbbb));
builder.setBody(content);
if (reportBytes)
{
     System.IO.Stream            stream         = new System.IO.MemoryStream(reportBytes);
     builder.addAttachment(stream,filename);
}
SysMailerFactory::getNonInteractiveMailer().sendNonInteractive(builder.getMessage());

X++ code to get the individual dimension values from default dimension in D365

public static DimensionDefault  getDefaultDimBranchValues(DimensionValue "",DimensionValue "",DimensionValue "",DimensionValue    "")

{

        DimensionDefault            defaultDimension,result;

        container                   conAttr,conValue;

        str                         dimValue;

        int             counttrans,j;

        DimensionAttribute          dimensionAttribute;

        DimensionAttributeValue     dimensionAttributeValue;

        DimensionAttributeValueSetStorage valueSetStorage        = new DimensionAttributeValueSetStorage();

        conAttr  = ["DimensionName","DimensionName","DimensionName","DimensionName"];

        conValue = [DimensionValue,DimensionValue,DimensionValue,_reDimensionValueorting,DimensionValue];

        for (j = 1; j <= conLen(conAttr); j++)

        {

            dimensionAttribute = dimensionAttribute::findByName(conPeek(conAttr,j));

      

            if (dimensionAttribute.RecId == 0)

            {

                continue;

            }

      

            dimValue = conPeek(conValue,j);

      

            if (dimValue != "")

            {

                dimensionAttributeValue =dimensionAttributeValue::findByDimensionAttributeAndValue(dimensionAttribute,dimValue,false,true);

                valueSetStorage.addItem(dimensionAttributeValue);

            }

        }

        result = valueSetStorage.save();

        return result;

}

X++ code to upload/Save a file in Azure location in D365

using Microsoft.Dynamics.ApplicationPlatform.Services.Instrumentation;

using Microsoft.DynamicsOnline.Infrastructure.Components.SharedServiceUnitStorage;

using Microsoft.Dynamics.AX.Framework.FileManagement;

public class AzureStorage

{

str docfiletype;

    Microsoft.Dynamics.AX.Framework.FileManagement.IDocumentStorageProvider storageProvider; 

    public void uploadfile(Filename _Filename,Filename _filePath)

    {

        guid fileGuid = newGuid();

        str fileId;

        str downloadUrl;

        System.IO.Stream    _stream;

        str fileNameAZ = strFmt('%1/%2', fileId, _fileName);//filename = Filename.Xlsx

        fileId = guid2str(fileGuid);

        _stream = File::UseFileFromURL(_filePath);//filepath = C://Temp//Filename.Xlsx

        var blobInfo = new SharedServiceUnitStorageData();

        blobInfo.Id = fileId;

        blobInfo.Category = "StorageFolder";//Folder name

        blobInfo.Name = fileNameAZ;

        blobInfo.Accessibility = Accessibility::Private;

        blobInfo.Retention = Retention::Permanent;       

        if (_stream.CanSeek)

        {

            _stream.Seek(0, System.IO.SeekOrigin::Begin);

        }

        var blobStorageService = new SharedServiceUnitStorage(SharedServiceUnitStorage::GetDefaultStorageContext());

        blobStorageService.UploadData(blobInfo, _stream);

        var uploadedBlobInfo = blobStorageService.GetData(fileId, "StorageFolder", BlobUrlPermission::Read, System.TimeSpan::FromDays(30));

//Time span for keeping the file at azure location.

        downloadUrl =uploadedBlobInfo.BlobLink;

    }

}

X++ code to create attachment of a file in D365

using Microsoft.Dynamics.ApplicationPlatform.Services.Instrumentation;

using Microsoft.DynamicsOnline.Infrastructure.Components.SharedServiceUnitStorage;

using Microsoft.Dynamics.AX.Framework.FileManagement;

public class AttachFile

{

str docfiletype;

Microsoft.Dynamics.AX.Framework.FileManagement.IDocumentStorageProvider storageProvider;

    public  boolean createAttachment(TableId tableId, RefRecId _refFieldId,Filename _Filename,Filename _filePath)

    {

        boolean                     ret = false;

        DocuRef     docuref;

        str downloadUrl;

        System.IO.Stream    _stream;

        _stream = File::UseFileFromURL(_filePath);

        str _contentType = System.Web.MimeMapping::GetMimeMapping(_filePath);

        DocuType fileType = DocuType::find(DocuType::typeFile());

        storageProvider = Docu::GetStorageProvider(fileType, true, curUserId());

        if(storageProvider)

        {

            str uniqueFileName = storageProvider.GenerateUniqueName(_Filename);

            str fileNameWithoutExtension = System.IO.Path::GetFileNameWithoutExtension(_filePath);

            str fileExtension = Docu::GetFileExtension(uniqueFileName);

  

            if(Docu::validateExtension(fileExtension))

            {

                guid FileId = newGuid();

                DocuValue docValue;

                docValue.Name = fileNameWithoutExtension;

                docValue.FileId = FileId;

                docValue.FileName = uniqueFileName;

                docValue.FileType = fileExtension;

                docValue.OriginalFileName = _Filename;

                docValue.Type = DocuValueType::Others;

                docValue.StorageProviderId = storageProvider.ProviderId;

                DocumentLocation location = storageProvider.SaveFile(docValue.FileId, uniqueFileName, _contentType, _stream);

                

                if (location != null)

                {

                    if(location.NavigationUri)

                    {

                        docValue.Path = location.get_NavigationUri().ToString();

                    }

                    if(location.AccessUri)

                    {

                        docValue.AccessInformation = location.get_AccessUri().ToString();

                        //info(docValue.AccessInformation);

                    }

                    if (docValue.validateWrite())

                    {

                       

                        docValue.insert();

                        DocuUploadResult DocuUploadResult =  new DocuUploadResult(_fileName, _contentType, false, "", newGuid());

                        DocuUploadResult.fileId(FileId);

                        docuref = DocuUploadResult.createDocuRef(tableId,_refFieldId,DocuType::typeFile());

                        if(docuref)

                        {

                            ret =  true;

                        }

                        else

                        {

                            ret =  false;

                        }

                    }

                }

            }

        }