批次
- 浏览：1653 - 发布时间：2008-06-18 14:23:30.0
| 问题版本: |
1-通2005 |
问题模块: |
1-总账 |
| 所属行业: |
0-通用 |
问题状态: |
1-UU通注册用户 |
| 关 键 字: |
批次 |
适用产品: |
|
| 补 丁 号: |
|
开放状态: |
0-UU通注册用户 |
| 原问题号: |
|
提交时间: |
2008-6-18 14:23:30 |
| 问题名称: |
批次 |
| 问题现象: |
在库存管理模块中,使用批次台账查询06020该存货,发现已没有可用批号,所以不能发货. |
| 原因分析: |
在库存管理模块中,使用批次台账查询06020该存货,发现已没有可用批号,所以不能发货. |
| 解决方案: |
错误数据执行以下脚本调整: DECLARE @iRdsAutoId int, @fBCDQuantity float, @fBCDNum float DECLARE RdRecords_Cursor_UpdataToOld CURSOR FOR SELECT BCD.ID, BCD.iQuantity,BCD.iNum FROM RdRecords RDS INNER JOIN BatchCountDistributeList BCD ON BCD.ID = RDS.AutoID INNER JOIN SaleBillVouchs SBS ON SBS.AutoID = BCD.SBVouchsID INNER JOIN SaleBillVouch SB ON SBS.SBVID = SB.SBVID WHERE SB.iDisp = 1 and RDS.cBatch is not null SET @fBCDQuantity = 0 SET @fBCDNum = 0 OPEN RdRecords_Cursor_UpdataToOld FETCH NEXT FROM RdRecords_Cursor_UpdataToOld INTO @iRdsAutoId,@fBCDQuantity,@fBCDNum WHILE @@FETCH_STATUS = 0 BEGIN UPDATE RdRecords SET iSOutQuantity = iSOutQuantity - @fBCDQuantity WHERE AutoID = @iRdsAutoId IF ISNULL(@fBCDNum,0) <> 0 BEGIN UPDATE RdRecords SET iSOutNum = iSOutNum - @fBCDNum WHERE AutoID = @iRdsAutoId END UPDATE MainBatch SET bIsNull = 0 WHERE RdID = @iRdsAutoId DELETE FROM BatchCountDistributeList WHERE CURRENT OF RdRecords_Cursor_UpdataToOld FETCH NEXT FROM RdRecords_Cursor_UpdataToOld INTO @iRdsAutoId,@fBCDQuantity,@fBCDNum END CLOSE RdRecords_Cursor_UpdataToOld DEALLOCATE RdRecords_Cursor_UpdataToOld 只能执行一次 | |
