dbo.QBM_PLoginAuditShrink
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_FCVStringToInt source text reference
- references source dbo.QBM_FGIConfigparmValue source text reference
- references source dbo.QBM_FGISessionErrorRethrow source text reference
- references source dbo.QBM_PDeleteBulk source text reference
- references source dbo.QBM_PSessionErrorAdd source text reference
Complete Source
1CREATE PROCEDURE QBM_PLoginAuditShrink2AS3BEGIN4 DECLARE @AnzahlTage int5 DECLARE @AnzahlTageLoginSuccess int6 DECLARE @AnzahlTageLoginFailure int7 DECLARE @AnzahlTageLogOff int8 DECLARE @BulkCount int9 DECLARE @TotalCount int10 DECLARE @Klausel nvarchar(max)11 DECLARE @AnzahlGeloescht int12 DECLARE @AnzahlTotal int = 013 DECLARE @DebugSwitch int = 014 SET XACT_ABORT OFF15 BEGIN TRY16 SELECT17 @BulkCount = dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue('Common\Journal\Delete\BulkCount'),18 200)19 SELECT20 @TotalCount = dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue('Common\Journal\Delete\TotalCount'),21 10000)22 SELECT23 @AnzahlTage = dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue('Common\Journal\LifeTime'),24 30)25 SELECT26 @AnzahlTageLoginSuccess = abs(dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue('Common\Journal\LoginAudit\LifeTimeSuccess'),27 @AnzahlTage)) *(-1)28 SELECT29 @AnzahlTageLoginFailure = abs(dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue('Common\Journal\LoginAudit\LifeTimeFailure'),30 @AnzahlTage)) *(-1)31 SELECT32 @AnzahlTageLogOff = abs(dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue('Common\Journal\LogoffAudit\LifeTimeLogoff'),33 @AnzahlTage)) *(-1)34 SELECT35 @Klausel = CONCAT('( Type = 0 and XDateInserted < ''',36 convert(nvarchar(64), dateadd(dd, @AnzahlTageLoginFailure, GetUTCDate()), 121) + N ''' )',37 char(13),38 char(10),39 'OR ( Type = 1 and XDateInserted < ''' + convert(nvarchar(64), dateadd(dd, @AnzahlTageLoginSuccess, GetUTCDate()),40 121) + N ''')',41 char(13),42 char(10),43 'OR ( Type = 2 and XDateInserted < ''' + convert(nvarchar(64), dateadd(dd, @AnzahlTageLogOff, GetUTCDate()),44 121) + N ''')')45 IF @DebugSwitch > 046 BEGIN47 print @Klausel48 END49 EXEC @AnzahlGeloescht = QBM_PDeleteBulk 'QBMLoginAudit',50 @Klausel,51 @BulkCount,52 @TotalCount53 SELECT @AnzahlTotal += @AnzahlGeloescht54 END TRY55 BEGIN CATCH56 EXEC QBM_PSessionErrorAdd DEFAULT57 DECLARE @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()58 RAISERROR(@Rethrow,59 18,60 1)61 WITH NOWAIT62 END CATCH63 ende:64 RETURN(@AnzahlTotal)65END
Open raw exported source
1 create procedure QBM_PLoginAuditShrink as begin declare @AnzahlTage int declare @AnzahlTageLoginSuccess int declare @AnzahlTageLoginFailure 2int declare @AnzahlTageLogOff int declare @BulkCount int declare @TotalCount int declare @Klausel nvarchar(max) declare @AnzahlGeloescht int declare @AnzahlTotal3 int = 0 declare @DebugSwitch int = 0 SET XACT_ABORT OFF BEGIN TRY select @BulkCount = dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue( 'Common\Journal\Delete\BulkCount'4), 200) select @TotalCount = dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue( 'Common\Journal\Delete\TotalCount'), 10000) select @AnzahlTage = dbo.QBM_FCVStringToInt5(dbo.QBM_FGIConfigparmValue( 'Common\Journal\LifeTime'), 30) select @AnzahlTageLoginSuccess = abs(dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue( 'Common\Journal\LoginAudit\LifeTimeSuccess'6), @AnzahlTage)) * (-1) select @AnzahlTageLoginFailure = abs(dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue( 'Common\Journal\LoginAudit\LifeTimeFailure'7), @AnzahlTage)) * (-1) select @AnzahlTageLogOff = abs(dbo.QBM_FCVStringToInt(dbo.QBM_FGIConfigparmValue( 'Common\Journal\LogoffAudit\LifeTimeLogoff'),8 @AnzahlTage)) * (-1) select @Klausel = concat( '( Type = 0 and XDateInserted < ''' , convert(nvarchar(64), dateadd(dd, @AnzahlTageLoginFailure, GetUTCDate9()), 121) + N''' )' , char(13), char(10), 'OR ( Type = 1 and XDateInserted < ''' + convert(nvarchar(64), dateadd(dd, @AnzahlTageLoginSuccess, GetUTCDate10()), 121) + N''')' , char(13), char(10), 'OR ( Type = 2 and XDateInserted < ''' + convert(nvarchar(64), dateadd(dd, @AnzahlTageLogOff, GetUTCDate()), 11121) + N''')' ) if @DebugSwitch > 0 begin print @Klausel end exec @AnzahlGeloescht = QBM_PDeleteBulk 'QBMLoginAudit', @Klausel, @BulkCount, @TotalCount12 select @AnzahlTotal += @AnzahlGeloescht END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default declare @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow13() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH ende: return (@AnzahlTotal) end 14