原创深度改造K3---产成品入库算法--p_auasoft_iocheck

最新推荐文章于 2022-06-14 16:02:17 发布

原创

最新推荐文章于 2022-06-14 16:02:17 发布 · 595 阅读

1 ·

CC 4.0 BY-SA版权

本文介绍了一个用于自动处理负库存的SQL存储过程。该过程通过插入新的库存交易记录并更新库存表中的数量为零，来解决库存数量低于零的问题。涉及的数据表包括ICInventory和ICStockBillEntry。

ALTER PROCEDURE [dbo].[p_auasoft_iocheck]
@vwkNo AS varchar =30
AS
BEGIN
declare @FItemID int, @FStockID int, @FQty decimal(18,6)
declare @FBatchNo VARCHAR(50),@FDate VARCHAR(50)
declare @FBillNo varchar(50)
declare @FInterID INT,@FUnitID INT,@Row INT

set @Row=1;
exec GetIcMaxNum 'icstockbill',@FInterID output, 1,16394
exec [p_BM_GetBillNo] 2, @FBillNo out
/*
exec GetIcMaxNum 'icstockbill',@FInterID output, 1,16394
select @FInterID

exec [p_BM_GetBillNo] 2, @FBillNo out
select 'pp'+'---'+@FBillNo
*/
set @FDate=convert(varchar,getdate(),121)
       INSERT INTO
declare cur Cursor for
   SELECT a.FItemID,a.FBatchNo,a.FStockID,a.FQty,b.FUnitID from ICInventory   a INNER JOIN t_ICItem b on a.FItemId=b.FItemId where Fqty<0

   open cur
   fetch cur into @FItemID,@FBatchNo,@FStockID,@FQty,@FUnitID
   while @@fetch_status=0
   begin

INSERT into ICStockBillEntry(FBrNo,FInterID,FItemID,FEntryID,FQtyMust,FQty,FPrice,FBatchNo,FAmount,FUnitID,
FAuxPrice,FAuxQty,FAuxQtyMust,FQtyActua