活动介绍

DECLARE @nmSupport NUMERIC(14,4),@nmOutst NUMERIC(14,4),@chPart VARCHAR(16) SELECT @chPart = 'XXX' SELECT @nmOutst = 0 SELECT @nmSupport = 0 UPDATE acdb.PAC06.AC06004A SET nmSupport = CASE WHEN chPart = @chPart THEN CASE WHEN nmQty > @nmOutst THEN @nmOutst ELSE nmQty END ELSE CASE WHEN nmQty > nmOutst THEN nmOutst ELSE nmQty END END, nmOutst = CASE WHEN chPart = @chPart then case when @nmOutst>=@nmSupport then @nmOutst-@nmSupport else 0 end else nmOutst-nmSupport END, @nmOutst = CASE WHEN chPart = @chPart then case when @nmOutst>=@nmSupport then @nmOutst-@nmSupport else 0 end else nmOutst-nmSupport END, @nmSupport = case when chPart = @chPart then case when nmQty > @nmOutst then @nmOutst else nmQty end ELSE CASE WHEN nmQty > nmOutst THEN nmOutst ELSE nmQty END end, @chPart = chPart改成用游标遍历的方式

时间: 2024-03-11 07:46:59 浏览: 81
好的,以下是将代码改写为使用游标遍历的方式: ``` DECLARE @nmSupport NUMERIC(14,4), @nmOutst NUMERIC(14,4), @chPart VARCHAR(16) -- 声明游标 DECLARE cur CURSOR FOR SELECT chPart, nmQty, nmOutst, nmSupport FROM acdb.PAC06.AC06004A -- 初始化变量 SET @chPart = 'XXX' SET @nmOutst = 0 SET @nmSupport = 0 -- 打开游标 OPEN cur -- 循环遍历游标中的每一行数据 FETCH NEXT FROM cur INTO @chPart, @nmQty, @nmOutst, @nmSupport WHILE @@FETCH_STATUS = 0 BEGIN -- 更新 nmSupport 和 nmOutst 字段的值 UPDATE acdb.PAC06.AC06004A SET nmSupport = CASE WHEN chPart = @chPart THEN CASE WHEN nmQty > @nmOutst THEN @nmOutst ELSE nmQty END ELSE CASE WHEN nmQty > nmOutst THEN nmOutst ELSE nmQty END END, nmOutst = CASE WHEN chPart = @chPart THEN CASE WHEN @nmOutst >= @nmSupport THEN @nmOutst - @nmSupport ELSE 0 END ELSE nmOutst - nmSupport END WHERE CURRENT OF cur -- 更新变量的值 SET @nmOutst = CASE WHEN chPart = @chPart THEN CASE WHEN @nmOutst >= @nmSupport THEN @nmOutst - @nmSupport ELSE 0 END ELSE nmOutst - nmSupport END SET @nmSupport = CASE WHEN chPart = @chPart THEN CASE WHEN nmQty > @nmOutst THEN @nmOutst ELSE nmQty END ELSE CASE WHEN nmQty > nmOutst THEN nmOutst ELSE nmQty END END SET @chPart = chPart -- 继续遍历下一行数据 FETCH NEXT FROM cur INTO @chPart, @nmQty, @nmOutst, @nmSupport END -- 关闭游标 CLOSE cur DEALLOCATE cur ``` 以上代码使用游标遍历了表中的每一行数据,并按原代码的逻辑更新了 nmSupport 和 nmOutst 字段的值。同时,变量的更新也改为了在循环中进行。
阅读全文

相关推荐

/****** Object: StoredProcedure [dbo].[Gp_AddDataToAuditingBill] Script Date: 2025-07-07 15:08:24 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO /* 作者:谢吉康 日期:2005-8-4 描述:增加新的单据到AuditingBill中 新Carpa平台后重新调整 卢春 2009-06 添加询价单,请购单的修改状态 周华 2013-11-27 */ ALTER PROCEDURE [dbo].[Gp_AddDataToAuditingBill] ( @BillNumberId varchar(8000), --单据编号 @BillIndexType int, --单据类型 0.订单 1.借欠 2.一般物流单据 @OperatorETypeID VARCHAR(100) --操作员ID号 ) --@encode$-- AS SET NOCOUNT ON DECLARE @OperatorId varchar(100), @BillType int, @ETypeId varchar(100), @STypeID VARCHAR(100), @BillDate datetime, @BillCode varchar(256), @AuditingId int, @AuditingLevel int, @AuditingLevel1 int, @AuditingType int, @InOrOut varchar(10), @Checke VARCHAR(50) --制单人 BEGIN TRAN -- 判断状态是否待审核或审核通过,是则退出 IF EXISTS(SELECT TOP 1 BillNumberId FROM AuditingBill WHERE BillNumberId = @BillNumberId AND BillIndexType = @BillIndexType AND IfAudit <> -1) BEGIN ROLLBACK TRAN RETURN -2 END -- 审核不通过,则删除掉原记录,重新写记录 IF EXISTS(SELECT TOP 1 BillNumberId FROM AuditingBill WHERE BillNumberId = @BillNumberId AND BillIndexType = @BillIndexType AND IfAudit = -1) BEGIN DELETE AuditingBillDetail WHERE BillNumberId=@BillNumberId AND BillIndexType=@BillIndexType DELETE AuditingBill WHERE BillNumberId = @BillNumberId AND BillIndexType = @BillIndexType IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -6 END END IF @BillIndexType = 0 -- 订单 BEGIN --修改订单状态 IF EXISTS(SELECT TOP 1 BillNumberId FROM OrderIndex WHERE BillNumberId = @BillNumberId) BEGIN UPDATE OrderIndex SET IfAudit = 0 WHERE BillNumberId = @BillNumberId IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ETypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM OrderIndex WHERE BillNumberId = @BillNumberId END IF @BillIndexType = 1 -- 借欠 BEGIN --修改订单状态 IF EXISTS(SELECT TOP 1 BillNumberId FROM dbo.LendIndex WHERE BillNumberId = @BillNumberId) BEGIN UPDATE LendIndex SET IfAudit = 0 WHERE BillNumberId = @BillNumberId IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ETypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM LendIndex WHERE BillNumberId = @BillNumberId END IF @BillIndexType = 2 -- 一般物流单据 BEGIN --修改184报价单状态 IF EXISTS(SELECT TOP 1 BillNumberId FROM BillIndex WHERE BillNumberId = @BillNumberId AND BillType=184) BEGIN UPDATE BillIndex SET IfAudit = 0 WHERE BillNumberId = @BillNumberId AND BillType=184 IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END -- 修改询价单状态 IF EXISTS(SELECT TOP 1 BillNumberId FROM BillIndex WHERE BillNumberId = @BillNumberId AND BillType =185) BEGIN UPDATE BillIndex SET IfAudit = 0 WHERE BillNumberId = @BillNumberId IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ETypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM BillIndex WHERE BillNumberId = @BillNumberId END IF @BillIndexType=3 --请购单 BEGIN -- 修改请购单状态 IF EXISTS(SELECT TOP 1 BillNumberId FROM RequestIndex WHERE BillNumberId = @BillNumberId AND BillType=204) BEGIN UPDATE dbo.RequestIndex SET IfAudit = 0 WHERE BillNumberId = @BillNumberId IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ETypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM dbo.RequestIndex WHERE BillNumberId = @BillNumberId END IF @BillIndexType=4 --提成单 BEGIN ---- 修改请购单状 IF EXISTS(SELECT TOP 1 BillNumberId FROM CommissionBillNew WHERE BillNumberId = @BillNumberId) BEGIN UPDATE dbo.CommissionBillNew SET BillState = 3 WHERE BillNumberId = @BillNumberId IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END --获取单据的信息 SELECT @BillType = 311, @ETypeId = Checke, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM dbo.CommissionBillNew WHERE BillNumberId = @BillNumberId END IF @BillIndexType=5--发票单据 BEGIN IF EXISTS(SELECT TOP 1 BillNumberid FROM ReceiptBillIndex WHERE BillNumberID=@BillNumberId) BEGIN UPDATE dbo.ReceiptBillIndex SET IfAudit=0 WHERE BillNumberID=@BillNumberId IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -1 END END --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ETypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM ReceiptBillIndex WHERE BillNumberId = @BillNumberId END IF @BillIndexType = 7 --实物库存 BEGIN --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ETypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM FactIndex WHERE BillNumberId = @BillNumberId END IF @BillIndexType = 9--门店类 BEGIN --获取单据的信息 SELECT @BillType = BillType, @ETypeId = ApplyEtypeId, @STypeID = STypeID, @BillDate = BillDate, @BillCode = BillCode, @Checke=Checke FROM PosAllotApplyBillIndex WHERE BillNumberId = @BillNumberId END --判断单据是否有审核流程 SELECT @AuditingId = AuditingId, @AuditingLevel = AuditingLevel, @AuditingLevel1 = AuditingLevel1, @AuditingType = AuditingType FROM AuditingFlowSet WHERE BillType = @BillType AND STypeID=@STypeID AND IfUse = 1 --写入审核表(AuditingBill)中 INSERT INTO AuditingBill ( BillNumberId, AuditingId, AuditingSteps, IfAudit, ETypeId, BillDate, BillCode, BillDetail, BillIndexType, PassSteps, Checke )VALUES( @BillNumberId, @AuditingId, REPLACE(REPLICATE(@AuditingLevel,@AuditingLevel),@AuditingLevel,'2'), 0, @ETypeId, @BillDate, @BillCode, '', @BillIndexType, REPLACE(REPLICATE(@AuditingLevel,@AuditingLevel),@AuditingLevel,'2'), @Checke ) IF @@ROWCOUNT = 0 BEGIN ROLLBACK TRAN RETURN -3 END ---------------------------------------------------------------------------------------------- --【定制】销售订单制单人与审核人相同时校验余额是否大于订单金额 IF EXISTS(select TOP 1 1 FROM orderindex WHERE BillNumberId = @BillNumberId AND SaleWay = 1) BEGIN DECLARE @DealBTypeID VARCHAR(50) DECLARE @OrderTotal numeric(24, 10) DECLARE @BillTotal numeric(24, 10) -- 获取订单的DealBTypeID SELECT @DealBTypeID = dealbtypeid FROM orderindex WHERE BillNumberId = @BillNumberId SELECT @BillTotal = ISNULL(SUM(totalmoney),0) - ISNULL(SUM(preferencemoney),0) - ISNULL(( SELECT SUM(totalmoney) FROM orderindex WHERE billtype = 300 AND dealbtypeid=@DealBTypeID AND IfAudit = 1 ),0) FROM billindex WITH ( NOLOCK ) WHERE billtype IN ( 4, 189 ) AND dealbtypeid=@DealBTypeID AND ifcheck = 't' AND redword = '0' SELECT @OrderTotal = totalmoney FROM orderindex WHERE billnumberid=@BillNumberId IF @BillTotal < @OrderTotal BEGIN ROLLBACK TRAN RETURN -9 END END --------------------------------------------------------------------------------------------- -- PassSteps代表整单审核通过需要经历的步骤,与原因相关 DECLARE @PassSteps VARCHAR(50) SET @PassSteps = REPLACE(REPLICATE(@AuditingLevel,@AuditingLevel),@AuditingLevel,'2') CREATE TABLE #temp( BillNumberID INT, BillType NUMERIC(4, 0), PassFlag bit, Reason VARCHAR(500), value VARCHAR(500), AuditingStep int ) INSERT #temp EXEC GP_BillAudtingCheckReason @BillNumberId,@OperatorETypeID,@BillIndexType,'1',-1,0 DECLARE @i INT,@j INT,@stepReason VARCHAR(500),@stepValue VARCHAR(500) -- 处理特审原因 DECLARE CURSOR_str CURSOR FOR SELECT DISTINCT Reason,Value,AuditingStep FROM #temp WHERE PassFlag = 0 ORDER BY AuditingStep OPEN CURSOR_str FETCH NEXT FROM CURSOR_str INTO @stepReason,@stepValue,@i WHILE @@FETCH_STATUS = 0 BEGIN UPDATE AuditingBill SET StepReasons = ISNULL(StepReasons,'') + '0ж' + RTRIM(@stepReason + ' ' + ISNULL(@stepValue,'')) + 'жи' WHERE BillNumberID = @BillNumberId AND BillIndexType = @BillIndexType FETCH NEXT FROM CURSOR_str INTO @stepReason,@stepValue,@i END CLOSE CURSOR_str DEALLOCATE CURSOR_str -- 写入每级相关原因 SET @j = 0 DECLARE CURSOR_str CURSOR FOR SELECT AuditingStep,Reason,value FROM #temp WHERE PassFlag = 0 ORDER BY AuditingStep OPEN CURSOR_str FETCH NEXT FROM CURSOR_str INTO @i,@stepReason,@stepValue WHILE @@FETCH_STATUS = 0 BEGIN IF @stepReason<>'...' BEGIN UPDATE AuditingBill SET StepReasons = ISNULL(StepReasons,'') + CAST(@i AS VARCHAR(10)) + 'ж' + RTRIM(@stepReason + ' ' + ISNULL(@stepValue,'')) + 'жи' WHERE BillNumberID=@BillNumberId AND BillIndexType=@BillIndexType IF @i <> @j BEGIN SET @PassSteps = LEFT(@PassSteps,@i-1) + '1' + RIGHT(@PassSteps,LEN(@PassSteps)-@i) END SET @j = @i END FETCH NEXT FROM CURSOR_str INTO @i,@stepReason,@stepValue END CLOSE CURSOR_str DEALLOCATE CURSOR_str UPDATE AuditingBill SET PassSteps=@PassSteps WHERE BillNumberID=@BillNumberId AND BillIndexType=@BillIndexType -- 设置灯泡提醒 IF @AuditingType = 1 DECLARE AuditingCursor CURSOR FOR SELECT ETypeId FROM AuditingFlowDetail WHERE AuditingId = @AuditingId AND AuditingStep IN (SELECT TOP 1 AuditingStep FROM #temp WHERE PassFlag=0 ORDER BY AuditingStep) IF @AuditingType = 3 DECLARE AuditingCursor CURSOR FOR SELECT ETypeId FROM AuditingFlowDetail WHERE AuditingId = @AuditingId AND AuditingStep IN (SELECT AuditingStep FROM #temp WHERE PassFlag=0 GROUP BY AuditingStep) OPEN AuditingCursor FETCH NEXT FROM AuditingCursor INTO @OperatorId WHILE @@FETCH_STATUS = 0 BEGIN -- 是否有修改他人草稿的权限 0.有 1.无 DECLARE @ifCanEditOtherDraft INT EXEC @ifCanEditOtherDraft = GP_CheckLimit @OperatorId, 135 -- 是否有审核他人草稿的权限 0.有 1.无 DECLARE @AuditingOtherDraft int EXEC @AuditingOtherDraft = GP_CheckLimit @OperatorID,467 DECLARE @checkeWhere VARCHAR(50) IF @ifCanEditOtherDraft = 0 OR @AuditingOtherDraft = 0 SET @checkeWhere = '%%' ELSE SET @checkeWhere = @OperatorId DECLARE @ifAlerm INT SET @ifAlerm = 0 IF @BillType IN (17,21)-- AND @AuditingType = 1 BEGIN -- 检查仓库权限是否有效 0.有效 1.无效 DECLARE @StockLimit INT EXEC @StockLimit = GP_CheckLimit @OperatorID,454 -- 调拨单中,仓库的权限无效 IF EXISTS(SELECT TOP 1 1 FROM Userconfig WHERE ConfigName = 'MoveInOutKLimit' AND Value = '0') OR @StockLimit = 0 BEGIN IF EXISTS( SELECT TOP 1 1 FROM BillIndex WHERE BillNumberId = @BillNumberId AND ETypeId IN (SELECT * FROM F_GetManDetailEType(@OperatorId)) AND (KTypeID IN (SELECT * FROM F_GetManDetailKType(@OperatorId)) OR KTypeID2 IN (SELECT * FROM F_GetManDetailKType(@OperatorId))) AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END ELSE BEGIN IF EXISTS( SELECT TOP 1 1 FROM BillIndex WHERE BillNumberId = @BillNumberId AND ETypeId IN (SELECT * FROM F_GetManDetailEType(@OperatorId)) AND (KTypeID IN (SELECT * FROM F_GetManDetailKType(@OperatorId)) AND KTypeID2 IN (SELECT * FROM F_GetManDetailKType(@OperatorId))) AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END END ELSE IF @BillType IN (300,301) -- 订单 BEGIN IF EXISTS( SELECT TOP 1 1 FROM OrderIndex WHERE BillNumberId = @BillNumberId AND ETypeId IN (SELECT * FROM F_GetManDetailEType(@OperatorId)) AND BTypeId IN (SELECT * FROM F_GetManDetailBType(@OperatorId)) AND KTypeId IN (SELECT * FROM F_GetManDetailKType(@OperatorId)) ) SET @ifAlerm = 1 END ELSE IF @BillType IN (57) BEGIN IF EXISTS( SELECT BillNumberId FROM AdPriceBill WHERE BillNumberId=@BillNumberId AND ChangeAllStock=1 ) BEGIN IF EXISTS( SELECT TOP 1 1 FROM BillIndex WHERE BillNumberId = @BillNumberId AND ETypeId IN (SELECT * FROM F_GetManDetailEType(@OperatorId)) AND (BTypeId IN (SELECT * FROM F_GetManDetailBType(@OperatorId)) OR ISNULL(BTypeId,'')='') AND (KTypeId='00000') AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END ELSE BEGIN IF EXISTS( SELECT TOP 1 1 FROM BillIndex WHERE BillNumberId = @BillNumberId AND ETypeId IN (SELECT * FROM F_GetManDetailEType(@OperatorId)) AND (BTypeId IN (SELECT * FROM F_GetManDetailBType(@OperatorId)) OR ISNULL(BTypeId,'')='') AND (KTypeId IN (SELECT * FROM F_GetManDetailKType(@OperatorId)) OR ISNULL(KTypeId,'')='') AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END END ELSE IF @BillType IN (328,327) --门店单据 BEGIN IF EXISTS( SELECT TOP 1 1 FROM PosAllotApplyBillIndex WHERE BillNumberId = @BillNumberId AND ApplyEtypeId IN (SELECT * FROM F_GetManDetailEType(@OperatorId)) AND (KTypeID IN (SELECT * FROM F_GetManDetailKType(@OperatorId)) OR InKtypeId IN (SELECT * FROM F_GetManDetailKType(@OperatorId))) AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END ELSE BEGIN --2018-08-15 谢吉康 以前的算法不合理,优化 DECLARE @BTypeId VARCHAR(500) SELECT @BTypeId = BTypeID FROM BillIndex WHERE BillNumberid = @BillNumberId IF @BTypeId <> '' BEGIN IF EXISTS( SELECT TOP 1 1 FROM BillIndex B INNER JOIN (SELECT * FROM F_GetManDetailEType(@OperatorId)) E ON B.ETypeId = E.TypeId INNER JOIN (SELECT * FROM F_GetManDetailBTypeForAudit(@OperatorId,@BTypeId)) MB ON MB.TypeId = B.btypeid INNER JOIN (SELECT * FROM F_GetManDetailKType(@OperatorId)) MK ON (MK.TypeId = B.KTypeId OR ISNULL(KTypeId,'')='') WHERE BillNumberId = @BillNumberId AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END ELSE BEGIN IF EXISTS( SELECT TOP 1 1 FROM BillIndex B INNER JOIN (SELECT * FROM F_GetManDetailEType(@OperatorId)) E ON B.ETypeId = E.TypeId INNER JOIN (SELECT * FROM F_GetManDetailKType(@OperatorId)) MK ON (MK.TypeId = B.KTypeId OR ISNULL(KTypeId,'')='') WHERE BillNumberId = @BillNumberId AND checke LIKE @checkeWhere ) SET @ifAlerm = 1 END END IF @ifAlerm = 1 BEGIN IF @AuditingType = 1 BEGIN UPDATE AuditingFlowDetail SET AuditingAlerm = 1 WHERE AuditingId = @AuditingId AND ETypeId = @OperatorId AND AuditingStep IN (SELECT TOP 1 AuditingStep FROM #temp WHERE PassFlag=0 ORDER BY AuditingStep) END IF @AuditingType = 3 BEGIN UPDATE AuditingFlowDetail SET AuditingAlerm = 1 WHERE AuditingId = @AuditingId AND ETypeId = @OperatorId AND AuditingStep IN (SELECT AuditingStep FROM #temp WHERE PassFlag=0 GROUP BY AuditingStep) END END FETCH NEXT FROM AuditingCursor INTO @OperatorId END CLOSE AuditingCursor DEALLOCATE AuditingCursor --处理同一个人审核人的情况 IF EXISTS(SELECT TOP 1 1 FROM dbo.Userconfig WHERE ConfigName = 'samepersonchecked' AND Value = '1') BEGIN IF EXISTS(SELECT TOP 1 1 FROM AuditingFlowSet WHERE BillType = @BillType AND AuditingType = 3) AND EXISTS(SELECT TOP 1 1 FROM AuditingFlowDetail WHERE BillType = @BillType AND AuditingStep <> 0 AND ETypeID = @OperatorETypeID) --会签审核 BEGIN EXEC GP_BillAuditingDeal @OperatorETypeID,@BillNumberId,'1','自动审核通过',@BillIndexType,'','' END ELSE BEGIN --处理审核消息 DECLARE @nextStep INT IF EXISTS(SELECT TOP 1 AuditingStep FROM AuditingBillDetail WHERE BillNumberID = @BillNumberId AND BillIndexType = @BillIndexType) SELECT TOP 1 @nextStep = AuditingStep + 1 FROM AuditingBillDetail WHERE BillNumberID = @BillNumberId AND BillIndexType = @BillIndexType ORDER BY AuditingStep DESC ELSE SET @nextStep = 1 SELECT * INTO #AuditingFlowDetail FROM AuditingFlowDetail WHERE BillType = @BillType AND AuditingStep <> 0 AND ETypeID = @OperatorETypeID WHILE EXISTS(SELECT TOP 1 1 FROM #AuditingFlowDetail WHERE AuditingStep = @nextStep) BEGIN EXEC GP_BillAuditingDeal @OperatorETypeID,@BillNumberId,'1','自动审核通过',@BillIndexType,'','' SET @nextStep += 1 END DROP TABLE #AuditingFlowDetail END END --单据审核流程完成后自动过账 DECLARE @RE INT EXEC @RE = GP_CheckLimit @OperatorETypeID,2659 --处理价格跟踪 IF @BillType IN (184,185,300,301) BEGIN EXEC dbo.GP_BatchPassPT @billnumberid=@BillNumberId,@billtype=@BillType END --自动过账 IF @billtype NOT IN(184,185,300,313,204,185,301,22,326,162,163) AND EXISTS(SELECT TOP 1 1 FROM dbo.AuditingBill WHERE BillNumberID = @BillNumberId AND BillIndexType = @BillIndexType AND IfAudit = 1) AND @RE = 0 BEGIN EXEC dbo.Gp_Auditing @nBillID = @BillNumberId, -- numeric @szCheckMan = @Checke, -- varchar(50) @szPID = '', -- varchar(1000) @chvOpID = @OperatorETypeID, -- varchar(50) @KTypeID = '', -- varchar(50) @billtype = @BillType, -- int @voucherMsg = '', -- varchar(50) @vipcentinfo='', @AssetMsg='', @VipCardCode = '' ,--VARCHAR(200) @CommissionConfirm = 0 ,--INT @strReturnBillCode = '' --VARCHAR(200) IF EXISTS(SELECT TOP 1 1 FROM dbo.Userconfig WHERE ConfigName = 'BillCodeCreateTime' AND Value = 2) EXEC dbo.GP_SaveBillCode_Seed @intBillNumberID=@BillNumberId,@intBillType=@BillType,@dBillDate=@billdate,@strBillCode=@BillCode IF(@BillType IN(17,21,404,327,328)) --没有btypeid 的不要插入,否则报错 begin INSERT INTO BillOperateLog(billnumberid,operatetype,etypeid,OperateTime,ip,billcode,billdate,ifcheck,ntotalmoney,billtype) VALUES(@billnumberid,'自动审核过账',@OperatorETypeID,GETDATE(),'',@billcode,@billdate,'t',0,@billtype) END ELSE BEGIN INSERT INTO BillOperateLog(billnumberid,operatetype,etypeid,OperateTime,ip,billcode,billdate,ifcheck,btypeid,ntotalmoney,billtype) VALUES(@billnumberid,'自动审核过账',@OperatorETypeID,GETDATE(),'',@billcode,@billdate,'t',ISNULL(@btypeid,''),0,@billtype) END --自动审核过账,反写一大堆数量,状态等.正常过账反写以前是写在代码里面的,没有在存储过程里,所以要单独写出来 EXEC Gp_Auditing_UpdateQtyorState @BillNumberId, @BillType END DROP TABLE #temp --成功,退出 COMMIT TRAN RETURN 0

USE [WaterDB] GO /****** Object: Trigger [dbo].[TR_WATERPHONE_INFO] Script Date: 03/10/2025 15:45:53 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER Trigger [dbo].[TR_WATERPHONE_INFO] on [dbo].[T_WATERPHONE_INFO] after insert as begin declare @id varchar(50),@dayDate varchar(20),@hourNum varchar(2),@vagHigh numeric(9,2) declare @sqlStr varchar(5000) update a set a.LogTime=b.LogTime,a.CurrenTime=b.CurrenTime,a.CurrentHigh = b.CurrentHigh, a.MinTime=b.MinTime,a.MinHigh=b.MinHigh,a.MaxTime=b.MaxTime,a.MaxHigh=b.MaxHigh,a.LD=b.LD, a.SQD=b.SQD,a.STATUS=b.STATUS,a.Flag=b.Flag,a.StationName=b.StationName from T_WATERPHONE_INFO_LAST a, inserted b where a.PHONE_ID=b.PHONE_ID if (@@ROWCOUNT=0) insert into T_WATERPHONE_INFO_LAST select * from inserted --统计小时平均水位 select @id=info.phone_id ,@dayDate=CONVERT(varchar(100),info.CurrenTime, 23) ,@hourNum=Datename(hour,info.CurrenTime) ,@vagHigh=avg(info.CurrentHigh) from T_WATERPHONE_INFO info ,inserted where info.phone_id = inserted.phone_id and CONVERT(varchar(100),info.CurrenTime, 112)+Datename(hour,info.CurrenTime)=CONVERT(varchar(100),inserted.CurrenTime, 112)+Datename(hour,inserted.CurrenTime) and info.CurrentHigh is not null group by info.phone_id,CONVERT(varchar(100),info.CurrenTime, 23),Datename(hour,info.CurrenTime) if(@id is not null) begin set @sqlStr = 'update T_WATERPHONE_HOUR'+ ' set H'+@hourNum +'='+ cast(@vagHigh as varchar)+ ' where PHONE_ID='''+@id+''' and WATER_DATE = '''+@dayDate+'''' exec (@sqlStr) if (@@ROWCOUNT=0) begin set @sqlStr = 'insert into T_WATERPHONE_HOUR(PHONE_ID,WATER_DATE,H'+@hourNum+') values('''+@id+''','''+@dayDate+''','+cast(@vagHigh as varchar)+')' exec (@sqlStr) end; end; end;上面是sql server上的触发器,转化为mysql 上的触发器,在navicat中执行

大家在看

recommend-type

蒙特卡罗剂量模拟和可视化工具包:一组旨在帮助临床医生和研究人员使用 GEANT4 或 TOPAS 的 Matlab 函数-matlab开发

这里有 3 组代码,旨在帮助临床医生和研究人员将 GEANT4 或 TOPAS (MC) 与 3D Slicer 结合使用进行剂量可视化和比较 第一段代码“STLfromDicomRN.m”采用 Varian Eclipse 生成的双散射质子计划的 Dicom 计划文件,并以“.STL”格式生成计划中的Kong径和补偿器模型。 此文件使用 zip 文件中包含的“stlwrite”和“surf2solid”函数。 这些文件可以导入到 MC 模拟几何中。 第二个是一组用于处理Dicom剂量文件和分析剂量的代码。 “NormalizeDicomDose.m”代码将 MC 剂量标准化为 Eclipse 剂量等中心处的剂量,并包含有关如何标准化为其他点或体积的说明。 “ProfilePlot.m”代码只是生成比较两点之间两个剂量文件的剂量的剂量曲线。 包含的是一个 matlab gui,它在您
recommend-type

中科大版苏淳概率论答案

本资料是中科大版本 苏淳编著的概率论答案,此为本书前半部分答案,其中包含书中部分习题,系老师所布置的重点习题答案。包含初等概率论,随机变量,随机向量,数字特征与特征函数极限定理几章的内容
recommend-type

公开公开公开公开-openprotocol_specification 2.7

LY-WCS-2012-01-06-01 V 1.0 公开公开公开公开 产品名称:产品名称:产品名称:产品名称: WCS 系统简介系统简介系统简介系统简介-公开版公开版公开版公开版 共共共共 13 页页页页 WCSWCSWCSWCS 系统简介系统简介系统简介系统简介 ((((客户交流用客户交流用客户交流用客户交流用)))) 文文文文 档档档档 作作作作 者:者:者:者: 王 超 日期:日期:日期:日期:2012/01/06 开发开发开发开发/测试经理:测试经理:测试经理:测试经理: 程 达 日期:日期:日期:日期:2012/01/06 项项项项 目目目目 经经经经 理:理:理:理: 程 达 日期:日期:日期:日期:2012/01/06 文文文文 档档档档 编编编编 号:号:号:号: ___________ ___ LY-WCS-2012-01-06-01______________ 上海朗因智能科技有限公司上海朗因智能科技有限公司上海朗因智能科技有限公司上海朗因智能科技有限公司 版权所有版权所有版权所有版权所有 不得复制不得复制不得复制不得复制
recommend-type

xilinx.com_user_IIC_AXI_1.0.zip

可以直接用在vivado 2017.4版本里。查看各个寄存器就知道用来干什么了,一号寄存器分频系数,二号的start、stop信号,三号寄存器8bit数据,四号寄存器只读,返回IIC状态和ACK信号,其中二号的一个bit可以用来不等待从机ACK,方便使用。
recommend-type

extjs6.2加SenchaCmd-6.5.3.6-windows-64bit

SenchaCmd-6.5.3.6-windows-64bit ext6.2.0gpl SenchaCmd-6.5.3.6-windows-64bit ext6.2.0gpl

最新推荐

recommend-type

员工工资管理系统VBSQL样本 (1)(1).doc

员工工资管理系统VBSQL样本 (1)(1).doc
recommend-type

门户网站建设方案(1).doc

门户网站建设方案(1).doc
recommend-type

计算机逻辑结构与基础课件4_2ALU的组织new(1).ppt

计算机逻辑结构与基础课件4_2ALU的组织new(1).ppt
recommend-type

精选Java案例开发技巧集锦

从提供的文件信息中,我们可以看出,这是一份关于Java案例开发的集合。虽然没有具体的文件名称列表内容,但根据标题和描述,我们可以推断出这是一份包含了多个Java编程案例的开发集锦。下面我将详细说明与Java案例开发相关的一些知识点。 首先,Java案例开发涉及的知识点相当广泛,它不仅包括了Java语言的基础知识,还包括了面向对象编程思想、数据结构、算法、软件工程原理、设计模式以及特定的开发工具和环境等。 ### Java基础知识 - **Java语言特性**:Java是一种面向对象、解释执行、健壮性、安全性、平台无关性的高级编程语言。 - **数据类型**:Java中的数据类型包括基本数据类型(int、short、long、byte、float、double、boolean、char)和引用数据类型(类、接口、数组)。 - **控制结构**:包括if、else、switch、for、while、do-while等条件和循环控制结构。 - **数组和字符串**:Java数组的定义、初始化和多维数组的使用;字符串的创建、处理和String类的常用方法。 - **异常处理**:try、catch、finally以及throw和throws的使用,用以处理程序中的异常情况。 - **类和对象**:类的定义、对象的创建和使用,以及对象之间的交互。 - **继承和多态**:通过extends关键字实现类的继承,以及通过抽象类和接口实现多态。 ### 面向对象编程 - **封装、继承、多态**:是面向对象编程(OOP)的三大特征,也是Java编程中实现代码复用和模块化的主要手段。 - **抽象类和接口**:抽象类和接口的定义和使用,以及它们在实现多态中的不同应用场景。 ### Java高级特性 - **集合框架**:List、Set、Map等集合类的使用,以及迭代器和比较器的使用。 - **泛型编程**:泛型类、接口和方法的定义和使用,以及类型擦除和通配符的应用。 - **多线程和并发**:创建和管理线程的方法,synchronized和volatile关键字的使用,以及并发包中的类如Executor和ConcurrentMap的应用。 - **I/O流**:文件I/O、字节流、字符流、缓冲流、对象序列化的使用和原理。 - **网络编程**:基于Socket编程,使用java.net包下的类进行网络通信。 - **Java内存模型**:理解堆、栈、方法区等内存区域的作用以及垃圾回收机制。 ### Java开发工具和环境 - **集成开发环境(IDE)**:如Eclipse、IntelliJ IDEA等,它们提供了代码编辑、编译、调试等功能。 - **构建工具**:如Maven和Gradle,它们用于项目构建、依赖管理以及自动化构建过程。 - **版本控制工具**:如Git和SVN,用于代码的版本控制和团队协作。 ### 设计模式和软件工程原理 - **设计模式**:如单例、工厂、策略、观察者、装饰者等设计模式,在Java开发中如何应用这些模式来提高代码的可维护性和可扩展性。 - **软件工程原理**:包括软件开发流程、项目管理、代码审查、单元测试等。 ### 实际案例开发 - **项目结构和构建**:了解如何组织Java项目文件,合理使用包和模块化结构。 - **需求分析和设计**:明确项目需求,进行系统设计,如数据库设计、系统架构设计等。 - **代码编写和实现**:根据设计编写符合要求的代码,实现系统的各个模块功能。 - **测试和维护**:进行单元测试、集成测试,确保代码质量,对项目进行维护和升级。 ### 其他相关知识点 - **Java虚拟机(JVM)**:了解JVM的基本工作原理,包括类加载机制、内存管理、垃圾回收算法等。 - **常用Java框架**:比如Spring、Hibernate、MyBatis等,在实际开发中常常与Java基础结合使用,提高开发效率。 以上知识点可以作为学习Java案例开发的基础框架。在实际的开发实践中,开发者需要结合具体的项目需求,对这些知识点进行灵活运用。通过反复的案例实践,可以加深对Java编程的理解,并逐步提升开发技能。这份集锦可能包含的案例可能涉及上述知识点的具体应用,能够帮助学习者更好地理解理论与实践的结合,从而快速提升个人的Java开发能力。
recommend-type

【VASP报错深度解析】:5大技巧识别并永久解决离子距离太近警告

# 1. VASP软件简介及离子距离太近问题概述 ## 1.1 VASP软件简介 **VASP(Vienna Ab initio Simulation Package)** 是一款广泛应用于计算材料科学的软件,它基于密度泛函理论(DFT)计算固体、表面和分子的电子结构和性质。
recommend-type

npm error A complete log of this run can be found in: D:\Program Files\nodejs\node_cache\_logs\2025-04-20T15_11_51_454Z-debug-0.log

<think>好的,我需要帮助用户找到npm的错误调试日志位置,并解决他们遇到的npm错误。首先,用户已经提供了一个具体的日志路径:'D:\Program Files\nodejs\node_cache\_logs\2025-04-20T15_11_51_454Z-debug-0.log',但看起来这个路径可能有问题,因为日期是2025年,这可能是一个示例或输入错误。我需要确认正确的日志路径生成方式。 根据npm的默认配置,日志文件通常位于npm的缓存目录下的_logs文件夹中。默认情况下,Windows系统中npm的缓存路径是%AppData%\npm-cache,而日志文件会以当前日期和
recommend-type

深入理解内存技术文档详解

由于文件内容无法查看,仅能根据文件的标题、描述、标签以及文件名称列表来构建相关知识点。以下是对“内存详解”这一主题的详细知识点梳理。 内存,作为计算机硬件的重要组成部分,负责临时存放CPU处理的数据和指令。理解内存的工作原理、类型、性能参数等对优化计算机系统性能至关重要。本知识点将从以下几个方面来详细介绍内存: 1. 内存基础概念 内存(Random Access Memory,RAM)是易失性存储器,这意味着一旦断电,存储在其中的数据将会丢失。内存允许计算机临时存储正在执行的程序和数据,以便CPU可以快速访问这些信息。 2. 内存类型 - 动态随机存取存储器(DRAM):目前最常见的RAM类型,用于大多数个人电脑和服务器。 - 静态随机存取存储器(SRAM):速度较快,通常用作CPU缓存。 - 同步动态随机存取存储器(SDRAM):在时钟信号的同步下工作的DRAM。 - 双倍数据速率同步动态随机存取存储器(DDR SDRAM):在时钟周期的上升沿和下降沿传输数据,大幅提升了内存的传输速率。 3. 内存组成结构 - 存储单元:由存储位构成的最小数据存储单位。 - 地址总线:用于选择内存中的存储单元。 - 数据总线:用于传输数据。 - 控制总线:用于传输控制信号。 4. 内存性能参数 - 存储容量:通常用MB(兆字节)或GB(吉字节)表示,指的是内存能够存储多少数据。 - 内存时序:指的是内存从接受到请求到开始读取数据之间的时间间隔。 - 内存频率:通常以MHz或GHz为单位,是内存传输数据的速度。 - 内存带宽:数据传输速率,通常以字节/秒为单位,直接关联到内存频率和数据位宽。 5. 内存工作原理 内存基于电容器和晶体管的工作原理,电容器存储电荷来表示1或0的状态,晶体管则用于读取或写入数据。为了保持数据不丢失,动态内存需要定期刷新。 6. 内存插槽与安装 - 计算机主板上有专用的内存插槽,常见的有DDR2、DDR3、DDR4和DDR5等不同类型。 - 安装内存时需确保兼容性,并按照正确的方向插入内存条,避免物理损坏。 7. 内存测试与优化 - 测试:可以使用如MemTest86等工具测试内存的稳定性和故障。 - 优化:通过超频来提高内存频率,但必须确保稳定性,否则会导致数据损坏或系统崩溃。 8. 内存兼容性问题 不同内存条可能由于制造商、工作频率、时序、电压等参数的不匹配而产生兼容性问题。在升级或更换内存时,必须检查其与主板和现有系统的兼容性。 9. 内存条的常见品牌与型号 诸如金士顿(Kingston)、海盗船(Corsair)、三星(Samsung)和芝奇(G.Skill)等知名品牌提供多种型号的内存条,针对不同需求的用户。 由于“内存详解.doc”是文件标题指定的文件内容,我们可以预期在该文档中将详细涵盖以上知识点,并有可能包含更多的实践案例、故障排查方法以及内存技术的最新发展等高级内容。在实际工作中,理解并应用这些内存相关的知识点对于提高计算机性能、解决计算机故障有着不可估量的价值。
recommend-type

【机械特性分析进阶秘籍】:频域与时域对比的全面研究

# 1. 机械特性分析的频域与时域概述 ## 1.1 频域与时域分析的基本概念 机械特性分析是通
recommend-type

dslicsrv安装报错Too many errors

<think>好的,用户遇到了安装dslicsrv时出现“Too many errors”的问题,需要帮助解决。首先,我需要明确dslicsrv是什么。可能是指某个特定的软件服务,但根据常见软件库和搜索引擎的信息,没有直接对应的结果。可能是拼写错误,或者是某个特定领域的专有软件?比如,可能与Dell的某个服务有关?例如,Dell System License Manager Service(dsLicSvc)可能更接近。假设用户可能拼写错误,将dslicsrv理解为dsLicSvc,即Dell的系统许可证管理服务。 接下来,用户遇到的错误是安装时出现“Too many errors”,这通常
recommend-type

深入解析Pro Ajax与Java技术的综合应用框架

根据提供的文件信息,我们可以推断出一系列与标题《Pro Ajax and Java》相关的IT知识点。这本书是由Apress出版,关注的是Ajax和Java技术。下面我将详细介绍这些知识点。 ### Ajax技术 Ajax(Asynchronous JavaScript and XML)是一种无需重新加载整个页面即可更新网页的技术。它通过在后台与服务器进行少量数据交换,实现了异步更新网页内容的目的。 1. **异步通信**:Ajax的核心是通过XMLHttpRequest对象或者现代的Fetch API等技术实现浏览器与服务器的异步通信。 2. **DOM操作**:利用JavaScript操作文档对象模型(DOM),能够实现页面内容的动态更新,而无需重新加载整个页面。 3. **数据交换格式**:Ajax通信中常使用的数据格式包括XML和JSON,但近年来JSON因其轻量级和易用性更受青睐。 4. **跨浏览器兼容性**:由于历史原因,实现Ajax的JavaScript代码需要考虑不同浏览器的兼容性问题。 5. **框架和库**:有许多流行的JavaScript库和框架支持Ajax开发,如jQuery、Dojo、ExtJS等,这些工具简化了Ajax的实现和数据操作。 ### Java技术 Java是一种广泛使用的面向对象编程语言,其在企业级应用、移动应用开发(Android)、Web应用开发等方面有着广泛应用。 1. **Java虚拟机(JVM)**:Java程序运行在Java虚拟机上,这使得Java具有良好的跨平台性。 2. **Java标准版(Java SE)**:包含了Java的核心类库和API,是Java应用开发的基础。 3. **Java企业版(Java EE)**:为企业级应用提供了额外的API和服务,如Java Servlet、JavaServer Pages(JSP)、Enterprise JavaBeans(EJB)等。 4. **面向对象编程(OOP)**:Java是一种纯粹的面向对象语言,它的语法和机制支持封装、继承和多态性。 5. **社区和生态系统**:Java拥有庞大的开发者社区和丰富的第三方库和框架,如Spring、Hibernate等,这些资源极大丰富了Java的应用范围。 ### 结合Ajax和Java 在结合使用Ajax和Java进行开发时,我们通常会采用MVC(模型-视图-控制器)架构模式,来构建可维护和可扩展的应用程序。 1. **服务器端技术**:Java经常被用来构建服务器端应用逻辑。例如,使用Servlet来处理客户端的请求,再将数据以Ajax请求的响应形式返回给客户端。 2. **客户端技术**:客户端的JavaScript(或使用框架库如jQuery)用于发起Ajax请求,并更新页面内容。 3. **数据格式**:Java后端通常会使用JSON或XML格式与Ajax进行数据交换。 4. **安全性**:Ajax请求可能涉及敏感数据,因此需要考虑如跨站请求伪造(CSRF)等安全问题。 5. **性能优化**:合理使用Ajax可以提升用户体验,但同时也需要注意对服务器和网络的负载,以及客户端脚本的执行性能。 ### 出版信息及文件信息 《Pro Ajax and Java》由Apress出版社出版,通常这种出版物会包含丰富的实例代码、开发指导、最佳实践以及相关的技术讨论。它旨在帮助开发者深化对Ajax和Java技术的理解和应用能力。 文件名“Apress.Pro.Ajax.and.Java.Frameworks.Jul.2006.HAPPY.NEW.YEAR.pdf”暗示了这份文档可能是一本专业的技术书籍。从文件名可以看出,该书还可能包含了框架使用方面的内容,并且是2006年出版的。标题中的“HAPPY.NEW.YEAR”可能仅仅是为了庆祝新年而加入的非标准部分。 总结而言,了解Ajax和Java的结合使用,不仅需要掌握两种技术的基本原理和使用方法,还要熟悉如何将它们整合到实际项目中,解决可能出现的技术挑战,从而构建功能强大且用户友好的Web应用。