X++ code to create and post Inventory Movement Journal D365

        InventJournalTable inventJournalTable;
        InventJournalTrans inventJournalTrans;
        InventJournalNameId inventJournalName;
        InventDim inventDim;
        JournalCheckPost journalCheckPost;

        //Below code creates journal header      
        inventJournalTable.clear();
        inventJournalName = InventJournalName::standardJournalName(InventJournalType::Movement);
        inventJournalTable.initFromInventJournalName(InventJournalName::find(inventJournalName ));
        inventJournalTable.insert();

        //Below code creates journal lines
        inventJournalTrans.clear();
        inventJournalTrans.initFromInventJournalTable(inventJournalTable);
        inventJournalTrans.TransDate = systemDateGet();
        inventJournalTrans.ItemId = "MDJ0001";
        inventJournalTrans.initFromInventTable(InventTable::find("MDJ0001"));
        inventJournalTrans.Qty = 2500;
        inventDim.InventSiteId = '12';
        inventDim.InventLocationId = '1201';
        inventDim.wMSLocationId = 'BULK-001 ';
        inventJournalTrans.InventDimId = inventDim::findOrCreate(inventDim).inventDimId;
        inventJournalTrans.insert();


        //The below code posts the journal
        journalCheckPost = InventJournalCheckPost::newPostJournal(inventJournalTable);
        journalCheckPost.run();