Dual Write implementation in Dynamics 365, configuration with Common data service CDS

 Useful Links:

https://docs.microsoft.com/en-us/dynamics365/fin-ops-core/dev-itpro/data-entities/dual-write/dual-write-overview

https://community.dynamics.com/365/financeandoperations/b/faisalfareedaxlibrary/posts/the-dual-write-implementation---part-1

http://daxture.blogspot.com/2020/07/the-dual-write-implementation-part-1.html

https://community.dynamics.com/365/financeandoperations/b/faisalfareedaxlibrary/posts/the-dual-write-implementation---part-2---understand-pre-requisites

http://daxture.blogspot.com/2020/07/the-dual-write-implementation-part-2.html

https://docs.microsoft.com/en-us/dynamics365/fin-ops-core/dev-itpro/data-entities/dual-write/connection-setup

http://daxture.blogspot.com/2020/08/the-dual-write-implementation-part-3.html

https://docs.microsoft.com/en-us/dynamics365/fin-ops-core/dev-itpro/data-entities/dual-write/link-your-environment

https://docs.microsoft.com/en-us/dynamics365/fin-ops-core/dev-itpro/data-entities/dual-write/enable-entity-map

https://docs.microsoft.com/en-us/dynamics365/fin-ops-core/dev-itpro/data-entities/dual-write/customizing-mappings

Batch Multi threading D365 FO AX7

Refer:

http://d365technext.blogspot.com/2018/07/batch-multi-threading-d365fo-ax7.html

OnLookup event Handler and Assigning financial dimensions while importing in D365FO

public static RecId assignDefaultDimensions(LedgerDefaultDimensionValueSet defaultDimension, str costCenter, str BusinessUnit)

    {

        DimensionAttributeValueSetStorage davss;

        DimensionAttribute dimAtrrCC,dimAtrrBU;

        DimensionAttributeValue dimAtrrCCValue,dimAtrrBUValue;

        davss = DimensionAttributeValueSetStorage::find(defaultDimension);

       

        dimAtrrCC = DimensionAttribute::findByName('CostCenter');

        dimAtrrBU = DimensionAttribute::findByName('BusinessUnit');

        dimAtrrCCValue = DimensionAttributeValue::findByDimensionAttributeAndValue(dimAtrrCC, costCenter, true, true);

       

        dimAtrrBUValue = DimensionAttributeValue::findByDimensionAttributeAndValue(dimAtrrBU, BusinessUnit, true, true);

       

        if(dimAtrrCCValue)

        {

            davss.addItem(dimAtrrCCValue);

        }

        if(dimAtrrBUValue)

        {

            davss.addItem(dimAtrrBUValue);

        }

        return davss.save();

    }

[FormControlEventHandler(formControlStr(VendEditInvoice, Code), FormControlEventType::Lookup)]

    public static void Code_OnLookup(FormControl sender, FormControlEventArgs e)

    {

        Query                   query = new Query();

        QueryBuildDataSource    queryBuildDataSource;

        SysTableLookup          sysTableLookup;

        EcoResCategory          ecoResCategory;

        sysTableLookup = SysTableLookup::newParameters(tableNum(EcoResCategory),sender,true);

        sysTableLookup.parmUseLookupValue(false);

        sysTableLookup.addLookupfield(fieldNum(EcoResCategory, Code));

        queryBuildDataSource = query.addDataSource(tableNum(EcoResCategory));

        sysTableLookup.parmQuery(query);

        sysTableLookup.performFormLookup();

        FormControlCancelableSuperEventArgs ce = e as FormControlCancelableSuperEventArgs;

        ce.CancelSuperCall();

    }

Vendor invoices Excel import in D365FO using X++

[FormControlEventHandler(formControlStr(VendEditInvoice, VendInvoiceUpload), FormControlEventType::Clicked)]

    public static void VendInvoiceUpload_OnClicked(FormControl sender, FormControlEventArgs e)

    {

        System.IO.Stream            stream;

        ExcelSpreadsheetName        sheeet;

        FileUploadBuild             fileUpload;

        DialogGroup                 dlgUploadGroup;

        FileUploadBuild             fileUploadBuild;

        FormBuildControl            formBuildControl;

        FileUploadTemporaryStorageResult fileUploadResult = new FileUploadTemporaryStorageResult();

        Dialog                      dialog = new Dialog("@CGL:CGL000156");

        VendInvoiceInfoTable        vendInvoiceInfoTable, vendInvoiceInfoTableLocal ;

        VendInvoiceInfoLine         vendInvoiceInfoLine, vendInvoiceInfoLineLocal;

        VendInvoiceInfoSubTable     vendInvoiceInfoSubTable;

        VendInvoiceInfoSubLine      vendInvoiceInfoSubLine;

        EcoResCategory              ecoResCategory;

        InventDim                   inventDim;

        TransDate                   transDate   =   DateTimeUtil::getSystemDate(DateTimeUtil::getUserPreferredTimeZone());

        ProcCategoryItemTaxGroup    procCategoryItemTaxGroup;

        String30                    invoiceNumber, InvoiceNumberLocal;

        AccountNum                  invoiceAccount, invoiceAccountLocal;

        Description                 description;

        str                         businessUnit, costCenter;

        LedgerDefaultDimensionValueSet defaultDimension;

        HcmWorkerRecId                  categoryRecId, budgetManager;

        str                         categorycode;

        VendTable                   vendTable;

        TaxItemGroupHeading         taxItemGroupHeading;

        TaxItemGroup                taxItemGroup;

        TaxGroupHeading             taxGroupHeading;

        TaxGroup                    taxGroup;

        UnitOfMeasureSymbol         unit;

        UnitOfMeasure               unitOfMeasure;

       

        FormRun                     formTable = sender.formRun();

        FormDataSource              vendInvoiceInfoTable_ds = formTable.dataSource(formDataSourceStr(VendEditInvoice,VendInvoiceInfoTable)) as FormDataSource;

        vendInvoiceInfoTable        =   vendInvoiceInfoTable_ds.cursor();

       

        dlgUploadGroup              = dialog.addGroup("@SYS54759");

        formBuildControl            = dialog.formBuildDesign().control(dlgUploadGroup.name());

        fileUploadBuild             = formBuildControl.addControlEx(classstr(FileUpload), "Upload");

        fileUploadBuild.style(FileUploadStyle::MinimalWithFilename);

        fileUploadBuild.fileTypesAccepted(".xlsx");

        if (dialog.run() && dialog.closedOk())

        {

            FileUpload fileUploadControl    = dialog.formRun().control(dialog.formRun().controlId("Upload"));

            fileUploadResult                = fileUploadControl.getFileUploadResult();

            if (fileUploadResult != null && fileUploadResult.getUploadStatus())

            {

                stream = fileUploadResult.openResult();

                using (ExcelPackage Package = new ExcelPackage(stream))

                {

                    int                         rowCount, i;

                    Package.Load(stream);

                    ExcelWorksheet  worksheet   = package.get_Workbook().get_Worksheets().get_Item(1);

                    OfficeOpenXml.ExcelRange    range       = worksheet.Cells;

                    rowCount                    = worksheet.Dimension.End.Row - worksheet.Dimension.Start.Row + 1;

                    try

                    {

                        ttsbegin;

                        for (i = 2; i<= rowCount; i++)

                        {

                            invoiceAccount  =   range.get_Item(i, 2).value;

                            invoiceNumber   =   range.get_Item(i, 1).value;

                            description     =   range.get_Item(i, 4).value;

                            costCenter      =   range.get_Item(i, 8).value;

                            businessUnit    =   range.get_Item(i, 7).value;

                            categorycode    =   range.get_Item(i, 3).value;

                            taxItemGroup    =   range.get_Item(i, 10).value;

                            taxGroup        =   range.get_Item(i, 9).value;

                            unit            =   range.get_Item(i, 5).value;

                         

                            if(vendInvoiceInfoTable.RecId)

                            {

                           

                                vendInvoiceInfoLine.clear();

                                vendInvoiceInfoLine.initValue();

                                vendInvoiceInfoLine.TableRefId                  = vendInvoiceInfoTable.TableRefId;

                                vendInvoiceInfoLine.ParmId                      = vendInvoiceInfoTable.ParmId;

                                vendInvoiceInfoLine.ReceiveNow                  = range.get_Item(i, 4).value;

                                vendInvoiceInfoLine.InventNow                   = range.get_Item(i, 4).value;

                                vendInvoiceInfoLine.PurchUnit                   = unit;

                                vendInvoiceInfoLine.PurchPrice                  = range.get_Item(i, 6).value;

                                vendInvoiceInfoLine.CGLProcurementCategoryCode  = range.get_Item(i, 3).value;

                                vendInvoiceInfoLine.ProcurementCategory         = categoryRecId;

                                vendInvoiceInfoLine.InvoiceAccount              = vendInvoiceInfoTable.InvoiceAccount;

                                vendInvoiceInfoLine.OrderAccount                = vendInvoiceInfoTable.OrderAccount;

                                vendInvoiceInfoLine.InventDimId                 = InventDim::findOrCreate(inventDim).InventDimId;

                                vendInvoiceInfoLine.LineAmount                  = vendInvoiceInfoLine.ReceiveNow * vendInvoiceInfoLine.PurchPrice;

                                vendInvoiceInfoLine.CGLBudgetManager            = CGLVendorInvoiceHelper::getBudgetManager(categoryRecId);

                                vendInvoiceInfoLine.DocumentOrigin              = DocumentOrigin::Service;

                                vendInvoiceInfoLine.Ordering                    = DocumentStatus::Invoice;

                                vendInvoiceInfoLine.DeliveryName                = vendInvoiceInfoTable.DeliveryName;

                                vendInvoiceInfoLine.currencyCode                = vendInvoiceInfoTable.CurrencyCode;

                                if(businessUnit && !costCenter)

                                {

                                    vendInvoiceInfoLine.DefaultDimension        =   CGLVendEditInvoiceFormEventHandler::assignBusinessUnit(defaultDimension,businessUnit);

                                }

                                if(businessUnit && costCenter)

                                {

                                    vendInvoiceInfoLine.DefaultDimension        = CGLVendEditInvoiceFormEventHandler::assignDefaultDimensions(defaultDimension, costCenter, businessUnit );

                                }

                                if(taxGroup == '')

                                {

                                    vendInvoiceInfoLine.TaxGroup                = vendTable.TaxGroup;

                                }

                                else

                                {

                                    vendInvoiceInfoLine.TaxGroup                = taxGroup;

                                }

                                if(taxItemGroup == '')

                                {

                                    select TaxItemGroup from procCategoryItemTaxGroup

                                        where procCategoryItemTaxGroup.ProcurementCategory == ecoResCategory.RecId;

                                    vendInvoiceInfoLine.TaxItemGroup                = procCategoryItemTaxGroup.TaxItemGroup;

                                }

                                else

                                {

                                    vendInvoiceInfoLine.TaxItemGroup                = taxItemGroup;

                                }

                                if(vendInvoiceInfoLine.validateWrite())

                                {

                                    vendInvoiceInfoLine.insert();

                                }

                            }

                       

                        }

                        ttscommit;

                        info('@CGL:CGL000153');

                    }

                    catch (Exception::Error)

                    {

                        ttsabort;

                        throw error("@CGL:CGL000154");

                    }

                    }

                }

            }

           

        FormRun                 form = sender.formRun();

        FormDataSource          vendInvoiceInfoLine_ds = form.dataSource(formDataSourceStr(VendEditInvoice,VendInvoiceInfoLine)) as FormDataSource;

        vendInvoiceInfoLine_ds.research();

        vendInvoiceInfoLine_ds.refresh();

       

JumpRef() on unbound control in D365FO

class CGLProcCategoryHierarchyManagementFormEventHandler

{

    /// <summary>

    ///

    /// </summary>

    /// <param name="sender"></param>

    /// <param name="e"></param>

    [FormDataSourceEventHandler(formDataSourceStr(ProcCategoryHierarchyManagement, EcoResCategory), FormDataSourceEventType::Initialized)]

    public static void EcoResCategory_OnInitialized(FormDataSource sender, FormDataSourceEventArgs e)

    {

        FormRun           formRun = sender.formRun();

        EcoResCategory    ecoResCategory = sender.cursor();

        FormStringControl budgetManager  = formRun.control(formRun.controlId('CGLBudgetManager'));

        var overrides = CGLProcCategoryHierarchyManagementFormEventHandler::construct();

       

        budgetManager.registerOverrideMethod(methodStr(FormStringControl, jumpRef),    methodStr(CGLProcCategoryHierarchyManagementFormEventHandler, budgetManager_OnJumpRef), overrides);

    }

    public static CGLProcCategoryHierarchyManagementFormEventHandler construct()

    {

        return new CGLProcCategoryHierarchyManagementFormEventHandler();

    }

    public void budgetManager_OnJumpRef(FormStringControl _targetField)

    {

        Args            args;

        MenuFunction    menuFunction;

        HcmWorker       hcmWorker;

        DirPerson       person;

        DirPartyTable   partyTable;

   

        if (_targetField.valueStr() != "")

        {

            menuFunction = new MenuFunction(menuitemDisplayStr("hcmWorker"), MenuItemType::Display);

            args = new Args(menuFunction.object());

          

            select hcmWorker

                join recid from person

                    where hcmWorker.Person == person.RecId

                join recid from partyTable

                    where person.recid == partyTable.recid

                        &&partyTable.Name == _targetField.valueStr();

            if (hcmWorker.RecId != 0)

            {

                args.record(hcmWorker);

                args.lookupRecord(hcmWorker);

                menuFunction.run(args);

            }

          

        }

    }

}