dbo.QER_P30907EB9FB8232867B_proc
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_FCVStringToIndent source text reference
- references source dbo.QBM_PSessionErrorAdd source text reference
References
Referenced By
Complete Source
1CREATE PROCEDURE QER_P30907EB9FB8232867B_proc(2 @Statements QBM_YCursorbuffer READONLY,3 @UsageArea char(1),4 @ProcedureName varchar(30),5 @UID_PWODecisionRule varchar(38),6 @Komplett nvarchar(max) OUTPUT7)8AS9BEGIN10 DECLARE @Muster nvarchar(max)11 DECLARE @Body nvarchar(max) = N ''12 DECLARE @DebugSwitch int = 013 DECLARE @DebugLevel char(1) = 'W'14 SELECT15 @Muster = 'create or alter procedure %ProcedureName% (16 %parameters%17 )18 as19begin20declare @erg table(UID_Person varchar(38) collate database_default21 , UID_PWORulerOrigin varchar(38) collate database_default22 )23SET XACT_ABORT OFF2425BEGIN TRY2627-- definition for rule %UID_PWODecisionRule% 28drop table if Exists #Ruler29create table #Ruler(UID_Person varchar(38) collate database_default30 , UID_PWORulerOrigin varchar(38) collate database_default31 )3233%body%3435-- ende mit Rückgabe in temp-Tabelle36 insert into #Ruler_Main(UID_Person, UID_PWORulerOrigin)37 select z.UID_Person as UID_Person38 , max(convert(varchar(38), y.UID_PWORulerOrigin)) as UID_PWORulerOrigin39 --, convert(varchar(128), ''decision rule %UID_PWODecisionRule%'') as SourceInfo40 from (41 select x.UID_Person, x.UID_PWORulerOrigin42 from @erg x43 ) as y join Person z on y.UID_Person = z.UID_Person 44 and z.IsInActive = 0 45 group by z.UID_Person 46 47END TRY48BEGIN CATCH4950 exec QBM_PSessionErrorAdd default ,N''decision rule %UID_PWODecisionRule%''51 52 RAISERROR ('''', 18, 1) WITH NOWAIT5354END CATCH55 56endLabel:57 58end5960'61 SELECT62 @Body = string_agg(CONCAT(' --insert into @erg (UID_Person, UID_PWORulerOrigin)63', CASE64 WHEN65 LEFT(ltrim(d.ContentFull), 4) = 'Exec' THEN66 CONCAT(' -- code from PWODecisionRuleRulerDetect: ', d.UID1, nchar(13), nchar(10), dbo.QBM_FCVStringToIndent(d.ContentFull,67 1), nchar(13), nchar(10), 'insert into @erg(UID_Person,UID_PWORulerOrigin)68 select UID_Person,UID_PWORulerOrigin69 from #ruler70 -- / code from PWODecisionRuleRulerDetect'71 , nchar(13), nchar(10))72 ELSE CONCAT(' insert into @erg(UID_Person,UID_PWORulerOrigin)73 select x.UID_Person, x.UID_PWORulerOrigin74 from (75 -- code from PWODecisionRuleRulerDetect: '76 , d.UID1, nchar(13), nchar(10), dbo.QBM_FCVStringToIndent(d.ContentFull, 1), '77 78 -- / code from PWODecisionRuleRulerDetect79 ) as x ',80 nchar(13), nchar(10))81 END),82 nchar(13) + nchar(10))83 FROM @Statements d84 IF @DebugSwitch > 085 BEGIN86 print '#####################'87 SELECT @Body print '#####################'88 END89 SELECT90 @Komplett = replace(replace(replace(REPLACE(@Muster, '%ProcedureName%', @ProcedureName), '%parameters%',91 CASE @UsageArea92 WHEN 'I' THEN93 '@uid_PersonWantsOrg varchar(38)'94 ELSE '@uid_AttestationCase varchar(38)'95 END + ' , @UID_QERWorkingStep varchar(38)'), '%Body%', dbo.qbm_fcvstringtoindent(@Body, 1)),96 '%UID_PWODecisionRule%',97 @UID_PWODecisionRule)98ENDOpen raw exported source
1 create procedure QER_P30907EB9FB8232867B_proc ( @Statements QBM_YCursorbuffer readonly , @UsageArea char(1) , @ProcedureName varchar(30) , 2@UID_PWODecisionRule varchar(38) , @Komplett nvarchar(max) output ) as begin declare @Muster nvarchar(max) declare @Body nvarchar(max) = N'' declare @DebugSwitch3 int = 0 declare @DebugLevel char(1) = 'W' select @Muster = 'create or alter procedure %ProcedureName% (4 %parameters%5 )6 as7begin8declare @erg table(UID_Person varchar(38) collate database_default9 , UID_PWORulerOrigin varchar(38) collate database_default10 )11SET XACT_ABORT OFF1213BEGIN TRY1415-- definition for rule %UID_PWODecisionRule% 16drop table if Exists #Ruler17create table #Ruler(UID_Person varchar(38) collate database_default18 , UID_PWORulerOrigin varchar(38) collate database_default19 )2021%body%2223-- ende mit Rückgabe in temp-Tabelle24 insert into #Ruler_Main(UID_Person, UID_PWORulerOrigin)25 select z.UID_Person as UID_Person26 , max(convert(varchar(38), y.UID_PWORulerOrigin)) as UID_PWORulerOrigin27 --, convert(varchar(128), ''decision rule %UID_PWODecisionRule%'') as SourceInfo28 from (29 select x.UID_Person, x.UID_PWORulerOrigin30 from @erg x31 ) as y join Person z on y.UID_Person = z.UID_Person 32 and z.IsInActive = 0 33 group by z.UID_Person 34 35END TRY36BEGIN CATCH3738 exec QBM_PSessionErrorAdd default ,N''decision rule %UID_PWODecisionRule%''39 40 RAISERROR ('''', 18, 1) WITH NOWAIT4142END CATCH43 44endLabel:45 46end4748'49 select @Body = string_agg(concat( ' --insert into @erg (UID_Person, UID_PWORulerOrigin)50', case when left(ltrim(d.ContentFull), 4) = 'Exec' then concat51(' -- code from PWODecisionRuleRulerDetect: ' , d.UID1 , nchar(13) , nchar(10) ,dbo.QBM_FCVStringToIndent(d.ContentFull , 1) , nchar(13) , nchar(10) , 52'insert into @erg(UID_Person,UID_PWORulerOrigin)53 select UID_Person,UID_PWORulerOrigin54 from #ruler55 -- / code from PWODecisionRuleRulerDetect'56 , nchar(13) , nchar(10) ) else concat( ' insert into @erg(UID_Person,UID_PWORulerOrigin)57 select x.UID_Person, x.UID_PWORulerOrigin58 from (59 -- code from PWODecisionRuleRulerDetect: '60 , d.UID1, nchar(13) , nchar(10) , dbo.QBM_FCVStringToIndent(d.ContentFull , 1) , '61 62 -- / code from PWODecisionRuleRulerDetect63 ) as x ', nchar64(13) , nchar(10) ) end ) , nchar(13) + nchar(10) ) from @Statements d if @DebugSwitch > 0 begin print '#####################' select @Body print '#####################'65 end select @Komplett = replace(replace(replace(REPLACE(@Muster , '%ProcedureName%', @ProcedureName) , '%parameters%', case @UsageArea when 'I' then '@uid_PersonWantsOrg varchar(38)'66 Else '@uid_AttestationCase varchar(38)' end + ' , @UID_QERWorkingStep varchar(38)') , '%Body%', dbo.qbm_fcvstringtoindent( @Body, 1)) , '%UID_PWODecisionRule%'67, @UID_PWODecisionRule) end 68