dbo.QER_ZHelperHardwareOrg

1       create   procedure QER_ZHelperHardwareOrg (@SlotNumber int) AS begin declare @Sourcedata QBM_YDataForDelta , @CountDeltaQantity int , @CountDeltaOrigin
2 int declare @DebugSwitch int = 0 declare @DebugMessage nvarchar(1000) declare @DBQueueCurrent QBM_YDBQueueCurrent BEGIN TRY insert into @DBQueueCurrent
3(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent
4 cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount = 0 begin goto EndLabel end  insert into @SourceData( IsUpcommingContent, XOriginAfter
5 , Element, AssignedElement, XOriginBefore ) select 0, 0 , hho.uid_Hardware, hho.uid_Org, 1 from @DBQueueCurrent x join HelperHardwareOrg hho on uid_Hardware
6 = x.uid_parameter  join BaseTree b on hho.uid_org = b.uid_org where b.uid_OrgRoot like '___-V-%'  if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Hardware\FromDepartment'
7) > ' ' begin insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_Hardware, p.uid_Department
8 from Hardware p join @DBQueueCurrent x on p.UID_Hardware= x.uid_parameter where p.uid_Department > ' ' end if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Hardware\FromLocality'
9) > ' ' begin insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_Hardware, p.uid_Locality
10 from Hardware p join @DBQueueCurrent x on p.UID_Hardware= x.uid_parameter where p.uid_Locality > ' ' end if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Hardware\FromProfitCenter'
11) > ' ' begin insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_Hardware, p.uid_ProfitCenter
12 from Hardware p join @DBQueueCurrent x on p.UID_Hardware= x.uid_parameter where p.uid_ProfitCenter > ' ' end exec QBM_PDBQueueCalculateDelta @SourceData
13, @DeltaQuantity = 1, @DeltaDelete = 1, @DeltaInsert = 1, @DeltaOrigin = 0, @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin
14 output , @UseIsInEffect = 0 , @SlotNumber = @SlotNumber , @DBQueueCurrentExtern = @DBQueueCurrent if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert
15 'HelperHardwareOrg', 'UID_Hardware', 'UID_Org' exec QBM_PMNTableDelete 'HelperHardwareOrg', 'UID_Hardware', 'UID_Org'             declare @DBQueueElements_01
16 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid) select x.uid, null, x.GenProcID from ( select distinct q.Element as uid
17, q.GenProcID from #QBMDeltaQuantity q ) as x exec QBM_PDBQueueInsert_Bulk 'QER-K-AllForOneHardware', @DBQueueElements_01  end  END TRY BEGIN CATCH exec
18 QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH  endLabel: return end 
19