Create production order in D365FO X++

 Create production order in D365FO  X++

static void   CreateProdOrder(Args _args)

{

    ProdQty         qty     = 10;

    ItemId          item    = 'D0005';

 

    ProdTable       prodtable;

    InventTable     inventTable;

    InventDim       inventDim;

    ;

 

    // Initialize InventTable

    inventTable = inventTable::find(item);

 

    // Initialize the base values

    prodtable.initValue();

    prodtable.initFromInventTable(inventTable);

 

    prodtable.ItemId                = inventTable.ItemId;

    prodtable.DlvDate               = today();

    prodtable.QtySched              = qty;

    prodtable.RemainInventPhysical  = qty;

 

    inventDim.initValue();

 

    // Set the active BOM and Route

    prodtable.BOMId = BOMVersion::findActive(prodtable.ItemId,

                                             prodtable.BOMDate,

                                             prodtable.QtySched,

                                             inventDim).BOMId;

 

    prodtable.RouteId = RouteVersion::findActive(prodtable.ItemId,

                                                 prodtable.BOMDate,

                                                 prodtable.QtySched,

                                                 inventDim).RouteId;

 

    // Initialize BOMVersion

    prodtable.initBOMVersion();

    // Initialize RouteVersion

    prodtable.initRouteVersion();

 

    //Use ProdTableType class to create the production order

    prodtable.type().insert();

 

    // Inform Production Order Id

        info(prodtable.ProdId);

}