X++ code to create customer by taking CustGroup as a input from dialog window

 Code :- 

class BAS_CustomerCreationDailogbox extends RunBase

{

    DialogField fieldcustgroup;


    CustTable custtable;

    CustGroupId  custgroup;

       

    NumberSeq numberSeq;

    DirParty dirParty;

    DirPartyPostalAddressView dirPartyPostalAddressView;

    DirPartyContactInfoView dirPartyContactInfo;

  

    public Object Dialog()

    {

        //To get the fields on dialog


        Dialog dialog;


        dialog = super();


        //set the caption for dialog field


        dialog.caption("Enter CustGroup");


        //add field to dailog window


        fieldcustgroup = dialog.addField(extendedTypeStr(CustGroupId),"CustGroup");


        return dialog;

    }


    public boolean getfromDialog()

    {

        custgroup = fieldcustgroup.value();

        

        return super();


    }


    public void run()

    {

      

        ttsBegin;

        custTable.initValue();

 

        try

        {

            //CustTable

            numberSeq               = NumberSeq::newGetNum(CustParameters::numRefCustAccount());

            custtable.AccountNum    = numberSeq.num();

            custtable.CustGroup     = custgroup;

            custtable.Currency      ='BRL';

            custtable.PaymTermId    ='10DD';

            custtable.PaymMode      ='CHEQUE-01';

            Name name = "Mr.Murgesh";

           

            

 

            custTable.insert(DirPartyType::Person, name);

 

            //DirParty

 

            /* Creates a new instance of the DirParty class from an address book entity

            that is represented by the custTable parameter. */

            dirParty = DirParty::constructFromCommon(custTable);

 

            dirPartyPostalAddressView.LocationName      ='HeadQuarters ';

            dirPartyPostalAddressView.City              ='São Paulo';

            dirPartyPostalAddressView.Street            ='4th Avenue';

            dirPartyPostalAddressView.StreetNumber      ='18';

            dirPartyPostalAddressView.CountryRegionId   ='BRA';

            dirPartyPostalAddressView.State             ='SP';

 

            // Fill address

            dirParty.createOrUpdatePostalAddress(dirPartyPostalAddressView);

 

            dirPartyContactInfo.LocationName    ='SouthStreet Contact Phone';

            dirPartyContactInfo.Locator         ='550291165342';

            dirPartyContactInfo.Type            = LogisticsElectronicAddressMethodType::Phone;

            dirPartyContactInfo.IsPrimary       = NoYes::Yes;

 

            // Fill Contacts

            dirParty.createOrUpdateContactInfo(dirPartyContactInfo);

            Info(strFmt("%1, %2, %3, %4", custTable.AccountNum, custTable.CustGroup, custTable.PaymMode, custTable.Currency));

            // Marks the end of transaction.

            ttsCommit;

        }

        catch(Exception::Error)

        {

            ttsAbort;

            throw error("can't create customer");

        }

    }


    public static void main(Args _args)

    {

        BAS_CustomerCreationDailogbox custgrp = new BAS_CustomerCreationDailogbox();


        if(custgrp.prompt())

        {

            custgrp.run();

        }

        

    }


}

Comments

Post a Comment

Popular posts from this blog

How to Create a wizard in x++ d365

Image
 step1: Create a form and apply form pattern as wizard step2 : create a class and extend the class with SysWizard. code :            class BAS_WIzardScreen extends SysWizard {     #MACROLIB.AviFiles     FormName formname()     {         return formstr(BAS_WIzardForm);  // name of the wizard form     }     public void run()     {         info(strFmt("Thankyou"));     }     public void setupNavigation()     {     }     public boolean validate()     {         return true;     }     public static str description()     {         return "BASOFA WIZARD";  // title of the wizard     }     public static void main(Args _args)     {         BAS_WIzardScreen wizard = new BAS_WIz...
Read more

how to post trade agreement journals automatically using x++ code

  In Microsoft Dynamics AX, you can post trade agreement journals automatically using X++ code. Here are the steps to do so: Create a new job in X++. Write a code to fetch data from the trade agreement table. Create a journal header and journal lines based on the fetched data. Call the post() method of the journal header to post the journal. Repeat steps 2 to 4 for each trade agreement. Here's a sample code in X++: static void postTradeAgreementJournals(Args _args) { TradeAgreementTable tradeAgreementTable; GeneralJournalHeader generalJournalHeader; GeneralJournalLine generalJournalLine; // Fetch data from the Trade Agreement table select tradeAgreementTable where tradeAgreementTable.JournalPosting == NoYes::No; // Loop through each trade agreement while (tradeAgreementTable) { // Create a journal header generalJournalHeader = new GeneralJournalHeader(); generalJournalHeader.initValue(); generalJournalHeader.tra...
Read more

X++ code to CREATE AND POST A TRADE AGREEMENT IN MICROSOFT DYNAMICS 365 in D365 F & O

Reuirement : I have to create a table called BASTradeAgreementTable with fields like following Item number Product Name ToDate FromDate InventSiteId InventLocationId Amount From Unit Step2: After Creating Table I have to create a form and add the created table into the form datasource and add all the fields of that datasource to form grid. I have to create a button called Post whenever user clicks on that button i have to create and post Trade Agreement Journals with the data provided in the form grid. [Control("Button")]     class Post     {         /// <summary>         ///         /// </summary>         public void clicked()         {             int             recordsCount;              BASTradeAgreementTable    tradeAgreement;     ...
Read more