Create Movement Journal using X++

    InventJournalId                journalNum;

    JournalCheckPost           journalCheckPost;

    InventDim                      inventDim;

    InventJournalTrans          journalTrans;

    InventJournalTable          inventJournal;

    JournalTableData            journalTableData;

    Counter                          lineNum;

    InventLocation               inventLocation;

public void createJournal()

{

    this.createHeader();

    this.createLine();

    this.postJournal()

}

public void createHeader()

{

        InventJournalName   inventJournalName;

        NumberSeq num;

        num = NumberSeq::newGetNum(InventParameters::numRefInventJournalId());

        journalNum = num.num();

        inventJournalName = InventJournalName::find("JournalName");

        inventJournal.initFromInventJournalName(inventJournalName);

        inventJournal.JournalId     = journalNum;

        inventJournal.JournalType   = InventJournalType::Movement;

        inventJournal.Description = "Description";

        inventJournal.insert();            

        journalTableData = JournalTableData::newTable(inventJournal);

        lineNum++;

}

public void createLine()

{

            inventDim.clear();

            inventDim.initValue();        

            inventDim.InventSiteId  = inventLocation.InventSiteId;

            inventDim.InventLocationId = inventLocation.InventLocationId;

            inventDim.wMSLocationId = inventLocation.WMSlocationIdDefaultIssue;

            inventDim = InventDim::findOrCreate(inventDim);

            journalTrans.clear();

            journalTrans.initValue();

            journalTrans.initFromInventJournalTable(inventJournal);

            journalTrans.JournalType = inventJournal.JournalType;

            journalTrans.TransDate      = "Trans_Date";

            journalTrans.ItemId         = "ItemId";

            journalTrans.InventDimId    = inventDim.InventDimId;

            journalTrans.initFromInventTable(InventTable::find("ItemId")); 

            journalTrans.LineNum        = lineNum;

            journalTrans.Qty            = "Quantity";

            journalTrans.CostAmount     = journalTrans.Qty * journalTrans.CostPrice;

            journalTrans.insert(false);

            lineNum++;

}

public void postJournal()

{

            inventJournal.selectForUpdate(true);

            inventJournal.SystemBlocked = true;

            inventJournal.update();

            journalCheckPost =                     InventJournalCheckPost::newJournalCheckPost(JournalCheckPostType::Post, inventJournal);

            journalCheckPost.run();

}

Create Purchase Order using X++

PurchTable                        purchTable;

PurchLine                         purchLine;

PurchId                             purchId;

LogisticsPostalAddress    logisticsPostalAddress;

//Create purchase order

public void createPO()

{

    ttsbegin;

    

    this.createHeader();

    this.createLine();

    if(purchId)

    {

            this.postConfirmation();

     }

    ttscommit;

}

//Create purchase order header

public void createHeader()

{

        purchId = NumberSeq::newGetNum(PurchParameters::numRefPurchId()).num();

        purchTable.clear();

        purchTable.PurchId = purchId;

        purchTable.initValue();

        purchTable.initFromVendTable(VendTable::find("VendAccount"));

        purchTable.PurchStatus = PurchStatus::Backorder;

        purchTable.DocumentState = VersioningDocumentState::Approved;

        purchTable.InventSiteId = InventLocation::find("ToWarehouse").InventSiteId;

        purchTable.InventLocationId = "ToWarehouse";

        purchTable.ChangeRequestRequired = NoYes::no;

        purchTable.MCRDropShipment = NoYes::Yes;

        logisticsPostalAddress = InventLocation::find("ToWarehouse").logisticsPostalAddress();

        purchTable.DeliveryName = Logisticslocation::find(logisticsPostalAddress.location).description;

        purchTable.DeliveryPostalAddress = logisticsPostalAddress.RecId;

        purchTable.VendorRef  = "Vendor reference"; //Optional

        purchTable.Requester = "HCMWorkerRecId";

        purchTable.WorkerPurchPlacer = this.getWorkerPurchPlacer();

        purchTable.insert();

}

//Create purchase order line

public void createLine()

{

        purchLine.clear();

        purchLine.PurchId = purchId;

        purchLine.ItemId = "ItemId";

        purchLine.itemIdChanged();

        purchLine.PurchQty = "Quantity";

        purchLine.DeliveryType = TradeLineDlvType::DropShip;

        inventDimfind.InventSiteId = purchTable.InventSiteId;

        inventDimfind.InventLocationId = purchTable.InventLocationId;

        inventDimfind.wMSLocationId = InventLocation::find(purchTable.InventLocationId).WMSLocationIdDefaultReceipt;

        inventDimLines = InventDim::findOrCreate(inventDimfind);

        purchLine.createLine(true, true, true, false, true, true);

        purchLine.selectForUpdate(true);

        purchLine.InventDimId = inventDimLines.inventDimId;

        purchLine.doUpdate();

}

//Post purchase order confirmation

public void postConfirmation()

{

        PurchFormLetter     purchFormLetter;

        purchformletter = PurchFormLetter::construct(documentstatus::PurchaseOrder);

        purchformletter.update(purchtable,

                                strfmt("inv_%1", purchId), systemDateGet(), PurchUpdate::All, 

                                AccountOrder::None,

                                NoYes::No,

                                true,

                                true);

}

public RefRecId getWorkerPurchPlacer ()

{

        UserInfo userInfo;

        RefRecId refRecId;

        select name from userInfo where userInfo.id == curUserId();

        if(userInfo.id != '')

        {        

            refRecId = HcmWorker::findByPerson(DirPerson::find(DirPartyTable::findByName(                                                userInfo.name).RecId).RecId).RecId;

        }

        return refRecId;

}

Create Transfer Order using X++.

InventTransferTable                 inventTransferTable;

InventTransferLine                  inventTransferLine;

InventTransferId                      inventTransferId;

public void createTransferOrder()

{

     ttsBegin;

     createHeader();

        createLine()

    ttsCommit;

}

Sample code to create header of the Transfer Order

public void createHeader()

{        

        //create the transfer order id.

        inventTransferId = InventTransferTable::numberSeq().num(); 

        inventTransferTable.clear();

        inventTransferTable.initValue();

        inventTransferTable.TransferId = inventTransferId; // assign the transfer order id

        inventTransferTable.InventLocationIdFrom = “FromWarehouse”;  // assign the from warehouse

        inventTransferTable.InventLocationIdTo = “ToWarehouse”; // assign the to warehouse

        inventTransferTable.TransferStatus = InventTransferStatus::Created; // assign the transfer status

        inventTransferTable.DlvModeId = “ShipMethod”; 

        inventTransferTable.ShipDate = “ShipDate”; // assign the ship date

        inventTransferTable.ReceiveDate = “ReceiveDate”; // assign the receive date

        inventTransferTable.AutoReservation = NoYes::No;

        inventTransferTable.initToAddress();

        inventTransferTable.initFromAddress();

        inventTransferTable.InventLocationIdTransit = InventLocation::find(“FromWarehouse”).InventLocationIdTransit;

        inventTransferTable.validateWrite();

        inventTransferTable.insert();

    } 

Sample code to create line of the Transfer Order

    public void createLine()

    {

        InventDim                   inventDim;

        inventDim.clear();

        inventTransferLine.clear();

        inventDim = inventTransferLine.inventDim();

        inventDim.InventSiteId = InventLocation::find(inventTransferTable.InventLocationIdFrom).InventSiteId;

        inventDim.InventLocationId = inventTransferTable.InventLocationIdFrom;             

        inventTransferLine.initFromInventTransferTable(inventTransferTable,NoYes::Yes);

        inventTransferLine.ItemId = “ItemId”;

        inventTransferLine.LineNum = inventTransferLine::lastLineNum(inventTransferTable.TransferId) + 1;

        inventTransferLine.initFromInventTable(InventTable::find(“ItemId”));

        inventTransferLine.QtyTransfer = “Quantity”;

        inventTransferLine.QtyRemainReceive = “Quantity”;

        inventTransferLine.QtyRemainShip = “Quantity”;

        inventTransferLine.QtyShipNow = 0;

        inventTransferLine.QtyReceiveNow = 0;

        inventTransferLine.RemainStatus = InventTransferRemainStatus::Shipping;

        inventTransferLine.AutoReservation  = NoYes::No;

        inventTransferLine.InventDimId = InventDim::findOrCreate(inventDim).inventDimId;;

        inventTransferLine.insert();      

    }