X++ code to create PO by taking vendor from dialog (AX Classes)

 Code :- 

class BAS_PurchaseOrderCreation extends RunBase

{

    DialogField fieldvendaccount;

    VendTable vendtable;

    VendAccount vendaccount;

    public Object Dialog()

    {

        //To get the fields on dialog


        Dialog dialog;


        dialog = super();


        //set the caption for dialog field


        dialog.caption("Select Vendor Account");


        //add field to dailog window


        fieldvendaccount = dialog.addField(extendedTypeStr(VendAccount),"VendorAccount");


        return dialog;

    }


    public boolean getfromDialog()

    {

        vendaccount = fieldvendaccount.value();

        

        return super();


    }


    public void run()

    {

        PurchTable purchTable;

        PurchLine purchLine;

        vendtable = VendTable::find(vendaccount);

        AxPurchTable axPurchTable;

        AxPurchLine axPurchLine;

        PurchFormLetter purchFormLetter;


        //Create Purchase order

        purchTable.initFromVendTable(vendtable);


        axPurchTable = axPurchTable::newPurchTable(purchTable);

        axPurchTable.parmPurchaseType(PurchaseType::Purch);

        axPurchTable.parmDocumentStatus(DocumentStatus::PurchaseOrder);

        axPurchTable.parmAccountingDate(systemDateGet());

        //axPurchTable.parmDeliveryDate(016\2012);

        axPurchTable.parmPurchStatus(PurchStatus::Backorder);

        axPurchTable.parmInventSiteId('CENTRAL');

        axPurchTable.parmInventLocationId('AUSTIN');

        axPurchTable.doSave();


        //Create PurchLine for item 1000

        purchLine.initFromPurchTable(purchTable);


        axPurchLine = AxPurchLine::newPurchLine(purchLine);

        axpurchLine.parmItemId("0001");

        axPurchLine.parmPurchQty(10);

        axPurchLine.parmPurchPrice(100);

        axPurchLine.doSave();


        purchLine.clear();


        purchLine.initFromPurchTable(purchTable);

        axPurchLine = AxPurchLine::newPurchLine(purchLine);

        axpurchLine.parmItemId("0002");

        axPurchLine.parmPurchQty(10);

        axPurchLine.parmPurchPrice(100);

        axPurchLine.doSave();

        //Posting PO Confirmation,I guess its mandatory

        //You cannot do invoice without doing PO confirm

        //purchTable = axPurchTable.purchTable();

        //purchFormLetter = PurchFormLetter::construct(DocumentStatus::PurchaseOrder);

        //purchFormLetter.update(purchTable, strFmt("PO_%1", purchTable.PurchId));


        ////Posting PO Invoice

        //purchFormLetter = PurchFormLetter::construct(DocumentStatus::Invoice);

        //purchFormLetter.update(purchTable, strFmt("Inv_%1", purchTable.PurchId));

    }


    public static void main(Args _args)

    {

        BAS_PurchaseOrderCreation purchaseorder = new BAS_PurchaseOrderCreation();


        if(purchaseorder.prompt())

        {

            purchaseorder.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