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);
}
- Get link
- X
- Other Apps
Comments
Post a Comment