Copying and Auto populating financial dimension from inventSite X++

 APPROACH 1

//calling method

DimensionAttributeValueSetStorage  valueStorage = this.getDefaultDimension(inventsite);

purchTable.defaultdimension =  valueStorage.save();


//Method to create DimensionAttributeValueSetStorage 

public DimensionAttributeValueSetStorage getDefaultDimension(InventSite  inventSite)

    {

        DimensionDefault                            result;

        int                                         i;

        DimensionAttribute                          dimensionAttribute, dimensionAttribute1, dimensionAttribute2, dimensionAttribute3;

        DimensionAttribute                          dimensionAttribute4, dimensionAttribute5, dimensionAttribute6;

        DimensionAttributeValue                     dimensionAttributeValue, dimensionAttributeValue1, dimensionAttributeValue2;

        DimensionAttributeValue                     dimensionAttributeValue3, dimensionAttributeValue4, dimensionAttributeValue5;

        DefaultDimensionView                        defaultDimensionView;

        container                                   dimAttr, dimValue;

        str                                         dimValues;

        DimensionAttributeValueSetStorage           valueSetStorage = new DimensionAttributeValueSetStorage();

        DimensionAttributeValueDerivedDimensions    derivedDim, derivedDim2;

        InventParameters                            inventParameters;

            

        select firstonly SiteDimensionAttribute from inventParameters

            join RecId,Name from dimensionAttribute6

                where dimensionAttribute6.RecId == inventParameters.SiteDimensionAttribute;


        select firstonly DefaultDimension, Name, DisplayValue from defaultDimensionView

            where defaultDimensionView.DefaultDimension == inventSite.DefaultDimension

            &&    defaultDimensionView.Name == dimensionAttribute6.Name;


        dimAttr     += [defaultDimensionView.Name];

        dimValue    += [defaultDimensionView.DisplayValue];


        select firstonly DimensionKeyColumnName, RecId from dimensionAttribute

                where dimensionAttribute.DimensionKeyColumnName == defaultDimensionView.Name

                    join firstonly DimensionAttribute, DimensionAttributeValue, DerivedDimensionAttributeValue1, DerivedDimensionAttributeValue2 from derivedDim

                        where derivedDim.DimensionAttribute == dimensionAttribute.RecId

                            join DisplayValue, RecId from dimensionAttributeValue

                                where dimensionAttributeValue.DisplayValue == defaultDimensionView.DisplayValue

                                && derivedDim.DimensionAttributeValue == dimensionAttributeValue.RecId;


        select firstonly DisplayValue, DimensionAttribute from dimensionAttributeValue1

                where derivedDim.DerivedDimensionAttributeValue1 == dimensionAttributeValue1.RecId

                    join firstonly RecId, Name from dimensionAttribute1

                        where dimensionAttributeValue1.DimensionAttribute == dimensionAttribute1.RecId;


        dimAttr     += [dimensionAttribute1.Name];

        dimValue    += [dimensionAttributeValue1.DisplayValue];


        select firstonly DimensionKeyColumnName from dimensionAttribute4

                where dimensionAttribute4.DimensionKeyColumnName == dimensionAttribute1.Name

                join firstonly DimensionAttribute, DimensionAttributeValue, DerivedDimensionAttributeValue1 from derivedDim2

                    where derivedDim2.DimensionAttribute == dimensionAttribute1.RecId

                    join firstonly DisplayValue, Recid from dimensionAttributeValue4

                        where dimensionAttributeValue4.DisplayValue == dimensionAttributeValue1.DisplayValue

                        && derivedDim2.DimensionAttributeValue == dimensionAttributeValue4.RecId;


        select firstonly DimensionAttribute, RecId, DisplayValue from dimensionAttributeValue5

                where derivedDim2.DerivedDimensionAttributeValue1 == dimensionAttributeValue5.RecId

                    join firstonly RecId, Name from dimensionAttribute5

                    where dimensionAttributeValue5.DimensionAttribute == dimensionAttribute5.RecId;


        dimAttr     += [dimensionAttribute5.Name];

        dimValue    += [dimensionAttributeValue5.DisplayValue];


        select firstonly DimensionAttribute, RecId, DisplayValue from dimensionAttributeValue2

                where derivedDim.DerivedDimensionAttributeValue2 == dimensionAttributeValue2.RecId

                    join firstonly Name, RecId from dimensionAttribute2

                    where dimensionAttributeValue2.DimensionAttribute == dimensionAttribute2.RecId;


        dimAttr     += [dimensionAttribute2.Name];

        dimValue    += [dimensionAttributeValue2.DisplayValue];


        for (i = 1; i <= conLen(dimAttr); i++)

        {

            dimensionAttribute3 = DimensionAttribute::findByName(conPeek(dimAttr,i));

            if (dimensionAttribute3.RecId == 0)

            {

                continue;

            }

            dimValues = conPeek(dimValue,i);

            if (dimValues != "")

            {

                dimensionAttributeValue3 = DimensionAttributeValue::findByDimensionAttributeAndValue

                        (dimensionAttribute3,dimValues,false,true);

                valueSetStorage.addItem(dimensionAttributeValue3);

            }

        }

        return valueSetStorage;

    }


    APPROACH 2

If Dimension link is activated on site 

purchTable.DefaultDimension = InventSite::changeDimension(purchTable.DefaultDimension, InventLocation::find(_avaTmpPurchLine.InventLocationId).InventSiteId); 

Comments

Post a Comment

Popular posts from this blog

Azure BLOB storage with Dynamics 365 FnO X++

Image
Part-1: Azure BLOB storage with Dynamics 365 for operations 25 May 2020|Azure and Dynamics With the introduction of cloud based applications, Dynamics has opened doors for seamless integration with Azure services. This blog is created to portray one such example of how Azure capability can be utilized within Dynamics 365 for Operations. Lets consider a common scenario where Dynamics 365 for Operations needs exchange of files between different applications. This can be a file produced by your .Net application (or) it can be a file produced by you production system,etc,. In Dynamics AX 2012 this situation was handled by creating common folder and sharing in network path where different applications can place their files. Upon introduction of D365, local paths were not accessible by Dynamics production URL so we need to rely on common internet service for accessing the file. One of the convenient way to handle this situation is by using  Microsoft Azure BLOB storage  as the centra
Read more

Send Email from Ax / D365 FnO using X++

 static void SendEmail(Args _args) { SysEmailParameters parameters = SysEmailParameters::find(); SMTPRelayServerName relayServer; SMTPPortNumber portNumber; SMTPUserName userName; SMTPPassword password; Str1260 subject,body; InteropPermission interopPermission; SysMailer mailer; System.Exception e; ; if (parameters.SMTPRelayServerName) relayServer = parameters.SMTPRelayServerName; else relayServer = parameters.SMTPServerIPAddress; portNumber = parameters.SMTPPortNumber; userName = parameters.SMTPUserName; password = SysEmailParameters::password(); subject = "Subject line for the email"; body = "<B>Body of the email</B>"; CodeAccessPermission::revertAssert(); try { interopPermission = new InteropPermission(InteropKind::ComInterop); interopPermission.assert(); mailer = new SysMailer(); mailer.SMTPRelayServer(relayServer,portNumber,userName,password, parameters.NTLM); //instantiate email mailer.fromaddress("ax.notification@mycompany.com"); mailer.
Read more

Import Files from Blob storage using X++ - D365 FnO

 using Microsoft.WindowsAzure.Storage;  Using Microsoft.WindowsAzure.Storage.Blob;  class RunnableClassBlobStorageDownload  {      ///       /// Runs the class with the specified arguments.     ///       ///  The specified arguments.      public static void main(Args _args)      {          CloudBlobDirectory  cloudBlobDirectory;          CloudBlobClient  cloudBlobClient;          CloudBlobContainer  cloudBlobContainer;          CloudStorageAccount  cloudStorageAccount;          cloudStorageAccount  = CloudStorageAccount::Parse("Azure Blob Connection String");          cloudBlobClient = cloudStorageAccount.CreateCloudBlobClient();          cloudBlobContainer  = cloudBlobClient.GetContainerReference("files"); //           System.Collections.IEnumerable lstEnumarable =   cloudBlobContainer.ListBlobs(null, false, 0, null, null);          System.Collections.IEnumerator lstEnumarator = lstEnumarable.GetEnumerator();          List filenames = new List(Types::String);      
Read more