首页 > 其他 > 详细

领料单自动预留

时间:2019-10-30 14:35:32      阅读:88      评论:0      收藏:0      [点我收藏+]
static void  Purch_SL_ReservedPhysical(Args _args)
{	
   salesTable           =  SalesTable::find(‘CNMF-000305‘);
    InventTrans              inventTrans;
    InventTransOrigin        inventTransOrigin;

    while select forupdate * from salesLine
        where salesLine.SalesId == salesTable.SalesId
    {
        select inventTrans
             where   inventTrans.ItemId                  == SalesLine.ItemId
             &&      inventTrans.StatusReceipt           == StatusReceipt::None
             &&      inventTrans.StatusIssue             == StatusIssue::OnOrder
             exists join inventTransOrigin
             where   inventTransOrigin.RecId             == inventTrans.InventTransOrigin;

       	if(inventTrans.RecId)
        {
             InventUpd_Reservation reservation;
                    
             reservation = InventUpd_Reservation::newInventDim(
             inventTrans.inventmovement(true),
             SalesLine.inventDim(),
             -salesLine.SalesQty,
             false);

             reservation.updateNow();
       	}

        info(strFmt("%1",salesLine.reservedPhysicalInSalesUnit()));
    }
}

  

领料单自动预留

原文:https://www.cnblogs.com/sunny-technology/p/11764008.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!