dbo.QER_PDynamicGroupMakeProc_hlp

1     create   procedure QER_PDynamicGroupMakeProc_hlp (@UID_DynamicGroup varchar(38)) as begin declare @DisplayName nvarchar(255) declare @ObjectClass
2 varchar(30) declare @IsdeactivatedByPreprocessor bit declare @WhereClause nvarchar(max) declare @UID_BaseTreeOrg varchar(38) declare @preprop nvarchar
3(16) declare @cons nvarchar(16) declare @ProcNameRechneAlle nvarchar(64) declare @ProcNameRechneDetail nvarchar(64) declare @Declarations nvarchar(max)
4  declare @SQLcmd nvarchar(max) declare @content1 nvarchar(max) declare @content2 nvarchar(max) declare @contentDN1 nvarchar(max)  declare @DebugSwitch
5 int = 0  declare @DebugLevel char(1) = 'W' declare @StringPatternDynamic varchar(16) = dbo.QBM_FCVBinaryToString( CONVERT(varbinary, dbo.QBM_FGIBitPatternXOrigin
6('|Dynamic|',0)), 0) declare @StringPatternDynamicInv varchar(16) = dbo.QBM_FCVBinaryToString( CONVERT(varbinary, dbo.QBM_FGIBitPatternXOrigin('|Dynamic|'
7,1)), 0) declare @StringPatternDelay varchar(16) = dbo.QBM_FCVBinaryToString( CONVERT(varbinary, dbo.QBM_FGIBitPatternXMarkedForDel('|Delay|',0)), 0) declare
8 @StringPatternDelayInv varchar(16) = dbo.QBM_FCVBinaryToString( CONVERT(varbinary, dbo.QBM_FGIBitPatternXMarkedForDel('|Delay|',1)), 0) SET XACT_ABORT
9 OFF BEGIN TRY if @DebugSwitch > 0 begin  exec QER_PDynamicGroupMakeProc_Drop @UID_DynamicGroup end select @DisplayName = isnull(dg.DisplayName, '<no Display>'
10), @ObjectClass = t.TableName, @whereclause = case b.IsInvalidForDynamicGroup when 1 then ' 1 = 0 ' else dg.WhereClause end , @UID_BaseTreeOrg = dbo.QBM_FCVObjectkeyToElement
11('ColumnValue1', dg.ObjectKeyBaseTree) from DynamicGroup dg join DialogTable t with (readpast) on dg.UID_DialogTableObjectClass = t.UID_DialogTable join
12 BaseTree b on dg.ObjectKeyBaseTree = b.XObjectKey where UID_DynamicGroup = @UID_DynamicGroup if 1 = @IsdeactivatedByPreprocessor begin select @preprop
13 = '' end else begin select @preprop = N'--' end if @ObjectClass in ('Hardware', 'Person') begin select @cons = '' end else begin select @cons = N'--' 
14end  select @Declarations = concat('
15	declare @GenProcID varchar(38)
16	declare @Sourcedata QBM_YDataForDelta
17		, @CountDeltaQantity int 
18		, @CountDeltaOrigin int 
19	declare @BlackListExists bit = 0
20	declare @DBQueueCurrent QBM_YDBQueueCurrent
21	declare @UID_Org varchar(38) = '''
22, @UID_BaseTreeOrg , '''
23	declare @UID_DynamicGroup varchar(38) = ''', @UID_DynamicGroup , '''
24	declare @XUser nvarchar(64) = object_name(@@procid)
25	declare @Xdate datetime = getutcdate()
26	
27'
28) declare @ContentStandardsA nvarchar(max) = concat('
29--34076
30	if exists (select top 1 1
31			from DynamicGroup b
32			where b.UID_DynamicGroup = @UID_DynamicGroup 
33			 and b.IsRecalculationDeactivated = 1
34			)
35	 begin
36		goto EndLabel
37	 end
38
39	insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID)
40					select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID
41				from QBMDBQueueCurrent cu with (readpast)
42				where cu.SlotNumber = @SlotNumber
43
44	if @@rowcount = 0
45	 begin
46		goto EndLabel
47	 end
48
49	if exists (select top 1 1
50			from QERDynamicGroupBlackList b
51			where b.UID_DynamicGroup = @UID_DynamicGroup 
52			)
53	 begin
54		select @BlackListExists = 1
55	 end
56'
57, '') declare @ContentStandardsE nvarchar(max) = concat('
58--34076
59	if exists (select top 1 1
60			from DynamicGroup b
61			where b.UID_DynamicGroup = @UID_DynamicGroup 
62			 and b.IsRecalculationDeactivated = 1
63			)
64	 begin
65		goto EndLabel
66	 end
67
68	insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID)
69					select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID
70				from QBMDBQueueCurrent cu with (readpast)
71				where cu.SlotNumber = @SlotNumber
72				and cu.UID_SubParameter = @UID_DynamicGroup
73
74	if @@rowcount = 0
75	 begin
76		goto EndLabel
77	 end
78
79	if exists (select top 1 1
80			from QERDynamicGroupBlackList b