選択リストは、自動的に予約します

静的ボイドPurch_SL_ReservedPhysical（Argsの_args）
{	 
　　 salesTable = SalesTable ::見つける（ 'CNMF-000305'）。
    InventTrans inventTrans; 
    InventTransOrigin inventTransOrigin; 

    salesLineから選択のForUpdate *しばらく
        salesLine.SalesId == salesTable.SalesIdは
    { 
        inventTrans選択
             inventTrans.ItemId == SalesLine.ItemId 
             && inventTrans.StatusReceipt == StatusReceipt ::なし
             && inventTrans.StatusIssue == StatusIssue :: OnOrder 
             inventTransOriginに参加する存在
             どこinventTransOrigin.RecId == inventTrans.InventTransOrigin。

       	（inventTrans.RecId）であれば
        { 
             InventUpd_Reservation予約。
                    
             予約= InventUpd_Reservation :: newInventDim（
             inventTrans.inventmovement（真）、
             SalesLine.inventDim（）、
             -salesLine.SalesQty、
             偽）; 

             reservation.updateNow（）; 
       	} 

        INFO（strFmt（ "％1"、salesLine.reservedPhysicalInSalesUnit（）））。
    } 
}