X++ code to create Vendor a/c with address

 This code will help you to create a vendor A/c

Code :-

class BAS_VendCreationJob

{

    /// <summary>

    /// Runs the class with the specified arguments.

    /// </summary>

    /// <param name = "_args">The specified arguments.</param>

    public static void main(Args _args)

    {

        VendTable VendTable;

        NumberSeq numberSeq;

        Name name = 'Sajith';

        DirParty dirParty;

        DirPartyPostalAddressView dirPartyPostalAddressView;

        DirPartyContactInfoView dirPartyContactInfo;

        DirPartyTable dirPartyTable;;

        ttsBegin;

        VendTable.initValue();

        try

        {

            //VendTable

            numberSeq = NumberSeq::newGetNum(VendParameters::numRefVendAccount(), true);

            numberSeq.used();

            VendTable.AccountNum = numberSeq.num();

            VendTable.VendGroup = '30';

            VendTable.Currency = 'USD';

            VendTable.PaymTermId = 'Net45';

            VendTable.PaymMode = 'CHECK';

            VendTable.insert();

            dirPartyTable = DirPartyTable::findRec(VendTable.Party, true);

            dirPartyTable.Name = name;

            dirPartyTable.update();

            //DirParty

            // Creates a new instance of the DirParty class from an address book entity that is represented by the VendTable parameter.

            dirParty = DirParty::constructFromCommon(VendTable);

            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);

            dirPartyPostalAddressView.LocationName = 'Business';

            dirPartyPostalAddressView.City = 'São Paulo';

            dirPartyPostalAddressView.Street = '4th Avenue';

            dirPartyPostalAddressView.StreetNumber = '18';

            dirPartyPostalAddressView.CountryRegionId = 'BRA';

            dirPartyPostalAddressView.State = 'SP'; 

           // dirPartyPostalAddressView.IsPrimary = 

            // Fill address

            dirParty.createOrUpdatePostalAddress(dirPartyPostalAddressView);

            dirPartyContactInfo.LocationName = 'Contact Phone';

            dirPartyContactInfo.Locator = '561291156431';

            dirPartyContactInfo.Type = LogisticsElectronicAddressMethodType::Phone;

            dirPartyContactInfo.IsPrimary = NoYes::Yes;

            dirParty.parmName(name);//('Teera7878');

            // Fill Contacts

            dirParty.createOrUpdateContactInfo(dirPartyContactInfo);

            dirPartyContactInfo.LocationName = 'Contact Phone2';

            dirPartyContactInfo.Locator = '56129115631';

            dirPartyContactInfo.Type = LogisticsElectronicAddressMethodType::Phone;

            dirPartyContactInfo.IsPrimary = NoYes::Yes;

            dirParty.parmName(name);//('Teera7878');

            // Fill Contacts

            dirParty.createOrUpdateContactInfo(dirPartyContactInfo);

            info(strFmt("Your vendor has been created."));

            ttsCommit;

        }

        catch(Exception::Error)

        {

            //ttsAbort;

            throw Exception::Error;

            // throwException::Error;

        }

    }


}

Comments

Popular posts from this blog

How to Create a wizard in x++ d365

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

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