X++ load operating units for financial dimensions CSV import

-

static void LoadDepartmentCost(Args _args)
{

    #File
    OMOperatingUnit ou,ou2;
    OMOperatingUnitType t;
    RecId omOpRecId;
    NumberSeq num;
    IO  iO;
    FilenameOpen        filename;// = "c:\\share\\test.csv";//To assign file name
    Container           record;
    str type;
    int counter = 5, alreadyExists = 0;

    Dialog          dialog;
    DialogField     dialogfileName;


    //dialog to load the excel file of contact information
        dialog = new Dialog("Upload File");

        dialogFilename = dialog.addField(extendedTypeStr(FilenameOpen));

        dialog.filenameLookupFilter(["All files",#AllFiles]);
        //dialog.filenameLookupTitle("Employee Data");
        dialog.caption("Upload");

    if(dialog.run())
    {
       filename = dialogFilename.value();
    }

    iO = new CommaTextIo(filename, #IO_Read);
    if (! iO || iO.status() != IO_Status::Ok)
    {
        throw error("@SYS19358");
    }



    while (iO.status() == IO_Status::Ok)
    {
        record = iO.read();// To read file
        if (record)
        {
            omOpRecId = OMOperatingUnit::findOMOperatingUnitNumber(conpeek(record, 3)).RecId;

            ttsBegin;

            select forUpdate ou where ou.RecId == omOpRecId;

            ou.OMOperatingUnitType = str2enum(t, conpeek(record, 1));
            ou.OMOperatingUnitNumber = conpeek(record, 3);
            ou.Name =  conpeek(record, 2);
            ou.NameAlias = conpeek(record,2);



            if(ou.RecId)
            {
                alreadyExists ++;


                if(ou.validateWrite())
                {
                    ou.update();
                }
            }
            else
            {
                info(strFmt("%1 - %2", ou.OMOperatingUnitNumber, ou.OMOperatingUnitType));
                ou.PartyNumber = DirPartyTable::getNewPartyNumber();

                if(ou.validateWrite())
                {
                    ou.insert();

                }
            }
            ttsCommit;

        }


    }
    info(strFmt("%1",alreadyExists));
}

Comments

Post a Comment

Popular posts from this blog

AX 2012 DEVOPS Build, Release setup and configuration

-
Image
After the initial setup in  AX 2012 Build process using AZURE DEVOPS Next step is to setup the build template and run the build process to get model and modelstore file which can be deployed to any environments. Goto your AZURE - DEVOPS dashboard by login to  https://visualstudio.microsoft.com/vso/ If you dont have a account, you can register for one free. Azure DEVOPS dashboard Select project for build process setup Select builds Click new pipeline Select Team foundation version control or the one you setup in intial step to move code to azure repo Select build reporsitory It should be the one you selected in initial setup steps Here select TFVC reporsitory Server path is the branch for which you want the build run Local path under - sourcesdirectory click continue for next step Select a build template - empty pipeline and add the build steps as per the AX build process order Now at the final step of build pipeline creation If y...
Read more

AX 2012 Build process using AZURE DEVOPS

-
Image
Deployment pipeline in AX is always been a challenge. But this has improved a lot over the years with AZURE DEVOPS. This post details how to setup your deployment pipeline using Azure DevOps (Previously VSTS). Using below process, we can build a modelstore for AX 2012 without a local Team foundation server and license cost. Firstly we need a server with windows installed and a working AX environment. Go to  https://visualstudio.microsoft.com/ Click on Azure Devops, enter the required details, select Team foundation version control and create a project. Goto Repos and create a new folder to store the code belongs to your custom model To add code to azure repo, go to AX and enable the version control parameters and check in the model to move all the custom code to Azure. Now under version control tab select Add model to version control, select the correct model and repository folder and click Ok  to move all the custom model objects t...
Read more

What is Microsoft Power Platform?

-
Image
In today's world, data is growing immensley and its very important for any individual, organisation or a service to run successfully. With control of data, we can make better decisions and provide great value. Control of data, is crucial not only to an organization’s growth, but also to prevent losses. Microsoft powerplatform  empowers everyday users with the ability to create apps, visualisations and workflows to help them and their colleagues achieve more. You can leverage data by automating common business tasks, building reports, creating workflows and connect apps. Power Platform is comprised of four key products: Power Apps, Power Automate, Power BI and Power Virtual Agents. Power Platform has been designed to be simple to use, even for those with limited technical expertise, to lower the technical threshold and put the power into users hands. This all helps to promote digital transformation as a mind-set throughout an organisation. Gartner recognizes Microsoft as a Magic Qua...
Read more