dbo.QBM_PSingleUserRelease
Stored ProcedureSQL_STORED_PROCEDURESandbox DB
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_FGISessionErrorRethrow source text reference
- references source dbo.QBM_PSessionErrorAdd source text reference
Complete Source
1CREATE PROCEDURE QBM_PSingleUserRelease(2 @RequestingProcessID int = 03)4AS5BEGIN6 DECLARE @Erg int = 07 DECLARE @SingleUserProcess int8 DECLARE @SingleUserStart datetime9 DECLARE @XUser nvarchar(64) = object_name(@@procid)10 DECLARE @Xdate datetime = getutcdate()11 SET XACT_ABORT OFF12 BEGIN TRY13 SELECT14 TOP 1 @SingleUserProcess = SingleUserProcess,15 @SingleUserStart = SingleUserStart16 FROM DialogDatabase17 WHERE18 IsMainDatabase = 119 IF @SingleUserProcess IS NULL20 BEGIN21 SELECT @SingleUserProcess = 022 END23 IF @RequestingProcessID = 024 BEGIN25 SELECT @RequestingProcessID = @@SPID26 END27 IF @SingleUserProcess = 0 OR @SingleUserProcess = @RequestingProcessID28 BEGIN29 UPDATE DialogDatabase30 SET SingleUserProcess = 0,31 SingleUserStart = NULL,32 XDateUpdated = @Xdate,33 XUserUpdated = @XUser34 WHERE35 IsMainDatabase = 136 SELECT @Erg = 137 END38 END TRY39 BEGIN CATCH40 EXEC QBM_PSessionErrorAdd DEFAULT41 DECLARE @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()42 RAISERROR(@Rethrow,43 18,44 1)45 WITH NOWAIT46 END CATCH47 endLabel:48 RETURN(@erg)49END
Open raw exported source
1 create procedure QBM_PSingleUserRelease (@RequestingProcessID int = 0 ) as begin declare @Erg int = 0 declare @SingleUserProcess int declare2 @SingleUserStart datetime declare @XUser nvarchar(64) = object_name(@@procid) declare @Xdate datetime = getutcdate() SET XACT_ABORT OFF BEGIN TRY select3 top 1 @SingleUserProcess = SingleUserProcess , @SingleUserStart = SingleUserStart from DialogDatabase where IsMainDatabase = 1 if @SingleUserProcess is4 null begin select @SingleUserProcess = 0 end if @RequestingProcessID = 0 begin select @RequestingProcessID = @@SPID end if @SingleUserProcess = 0 or @SingleUserProcess5 = @RequestingProcessID begin update DialogDatabase set SingleUserProcess = 0 , SingleUserStart = null , XDateUpdated = @Xdate , XUserUpdated = @XUser6 where IsMainDatabase = 1 select @Erg = 1 end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default declare @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow7() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH endLabel: return (@erg) end 8