Back to OIM Explorer

dbo.QBM_ZGroupPattern

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 1.288 characters

Interpretation

  • Database routine. Review parameters, called procedures, DBQueue inserts, and QBM_PJobCreate helper calls before assuming side effects.

Relations

  • No extracted relations.

Typed Edges

  • references source dbo.QBM_FCVBinarySetBit source text reference
  • references source dbo.QBM_FGISessionContext source text reference
  • references source dbo.QBM_PSessionContextSet source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference

References

Referenced By

  • No direct source references extracted.

Complete Source

SQL62 lines
1CREATE PROCEDURE QBM_ZGroupPattern(2  @Slotnumber int,3  @uid_dialogGroup varchar(38),4  @dummy2 varchar(38),5  @GenProcID varchar(38)6)7AS8BEGIN9  DECLARE @Groupnumber int10  DECLARE @neu int11  DECLARE @GroupBitPattern varbinary(200)12  DECLARE @VectorLen int13  DECLARE @GenProcID_R varchar(38) = dbo.QBM_FGISessionContext('')14  BEGIN TRY15    IF NOT EXISTS(16      SELECT TOP 1 117      FROM DialogGroup18      WHERE19        uid_dialogGroup = @uid_dialogGroup)20    BEGIN21      GOTO ende22    END23    SELECT24      @VectorLen =(isnull(max(GroupNumber), 0) / 8) + 125    FROM dialogGroup26    IF isnull(@VectorLen,27    0) < 3228    BEGIN29      SELECT @VectorLen = 3230    END31    SELECT TOP 1 @Groupnumber = Groupnumber32    FROM dialogGroup33    WHERE34      uid_dialogGroup = @uid_dialogGroup35    SELECT36      @GroupBitPattern = convert(varbinary(200),37      replicate(0x00, @VectorLen))38    SELECT39      @GroupBitPattern = dbo.QBM_FCVBinarySetBit(@GroupBitPattern,40      @Groupnumber)41    EXEC QBM_PSessionContextSet 'GenProcID',42      @GenProcID43    UPDATE dialogGroup44    SET GroupBitPattern = @GroupBitPattern,45    xdateupdated = GetUTCDate(),46    Xuserupdated = 'DBScheduler'47    WHERE48      uid_dialogGroup = @uid_dialogGroup AND isnull(GroupBitPattern,49    0x00) <> @GroupBitPattern50  END TRY51  BEGIN CATCH52    EXEC QBM_PSessionErrorAdd DEFAULT53    RAISERROR('',54    18,55    1)56      WITH NOWAIT57  END CATCH58  ende:59  EXEC QBM_PSessionContextSet 'GenProcID',60    @GenProcID_R61  RETURN62END
Open raw exported source
SQL ยท Raw10 lines
1   create   procedure QBM_ZGroupPattern ( @Slotnumber int ,@uid_dialogGroup varchar(38) , @dummy2 varchar(38) , @GenProcID varchar(38) )  as begin2  declare @Groupnumber int declare @neu int declare @GroupBitPattern varbinary(200) declare @VectorLen int declare @GenProcID_R varchar(38) = dbo.QBM_FGISessionContext3('') BEGIN TRY if not exists (select top 1 1 from DialogGroup where uid_dialogGroup = @uid_dialogGroup ) begin goto ende end select @VectorLen = (isnull4(max(GroupNumber), 0) / 8)+ 1 from dialogGroup if isnull(@VectorLen, 0) < 32 begin select @VectorLen = 32 end select top 1 @Groupnumber = Groupnumber from5 dialogGroup where uid_dialogGroup = @uid_dialogGroup select @GroupBitPattern = convert(varbinary(200), replicate(0x00, @VectorLen)) select @GroupBitPattern6 = dbo.QBM_FCVBinarySetBit (@GroupBitPattern, @Groupnumber) exec QBM_PSessionContextSet 'GenProcID', @GenProcID update dialogGroup set GroupBitPattern 7= @GroupBitPattern, xdateupdated = GetUTCDate(), Xuserupdated = 'DBScheduler' where uid_dialogGroup = @uid_dialogGroup and isnull(GroupBitPattern, 0x008) <> @GroupBitPattern  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH  ende: exec QBM_PSessionContextSet9 'GenProcID', @GenProcID_R return end 10