Back to OIM Explorer

dbo.QER_ZHelperHardwareOrg

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure. Bulk DBQueue insert -> QER-K-AllForOneHardware / QER_ZAllForOneHardware at line 17; References QBM_PDBQueueInsert_Bulk

Source: sandbox-db sys.sql_modules

Source size: 2.883 characters

Interpretation

  • Database routine. Review parameters, called procedures, DBQueue inserts, and QBM_PJobCreate helper calls before assuming side effects.
  • DBQueue relation detected. Follow the task procedure and referenced-by list for async processing.

Relations

  • Bulk DBQueue insert -> QER-K-AllForOneHardware / QER_ZAllForOneHardware at line 17
  • References QBM_PDBQueueInsert_Bulk

Typed Edges

  • queues DBQueue task QER_ZAllForOneHardware at line 17 Bulk DBQueue insert -> QER-K-AllForOneHardware / QER_ZAllForOneHardware at line 17
  • references source dbo.QBM_FGIConfigparmValue source text reference
  • references source dbo.QBM_PDBQueueCalculateDelta source text reference
  • references source dbo.QBM_PDBQueueInsert_Bulk source text reference
  • references source dbo.QBM_PMNTableDelete source text reference
  • references source dbo.QBM_PMNTableInsert source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference
  • queues DBQueue task QER-K-AllForOneHardware -> QER_ZAllForOneHardware QBM_PDBQueueInsert_Bulk 'QER-K-AllForOneHardware', @DBQueueElements_01 end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: return end

References

Referenced By

  • No direct source references extracted.

Complete Source

SQL149 lines
1CREATE PROCEDURE QER_ZHelperHardwareOrg(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @Sourcedata QBM_YDataForDelta,7  @CountDeltaQantity int,8  @CountDeltaOrigin int9  DECLARE @DebugSwitch int = 010  DECLARE @DebugMessage nvarchar(1000)11  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent12  BEGIN TRY13    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,14    UID_Parameter,15    UID_SubParameter,16    GenProcID)17    SELECT18      UID_DialogDBQueue,19      UID_Parameter,20      UID_SubParameter,21      GenProcID22    FROM QBMDBQueueCurrent cu23      WITH(readpast)24    WHERE25      cu.SlotNumber = @SlotNumber26    IF @@rowcount = 027    BEGIN28      GOTO EndLabel29    END30    INSERT INTO @SourceData(IsUpcommingContent,31    XOriginAfter,32    Element,33    AssignedElement,34    XOriginBefore)35    SELECT36      0,37      0,38      hho.uid_Hardware,39      hho.uid_Org,40      141    FROM @DBQueueCurrent x42    JOIN HelperHardwareOrg hho43      ON uid_Hardware = x.uid_parameter44    JOIN BaseTree b45      ON hho.uid_org = b.uid_org46    WHERE47      b.uid_OrgRoot LIKE '___-V-%'48    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Hardware\FromDepartment') > ' '49    BEGIN50      INSERT INTO @SourceData(IsUpcommingContent,51      XOriginBefore,52      XOriginAfter,53      Element,54      AssignedElement)55      SELECT56        1,57        0,58        1,59        p.uid_Hardware,60        p.uid_Department61      FROM Hardware p62      JOIN @DBQueueCurrent x63        ON p.UID_Hardware= x.uid_parameter64      WHERE65        p.uid_Department > ' '66    END67    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Hardware\FromLocality') > ' '68    BEGIN69      INSERT INTO @SourceData(IsUpcommingContent,70      XOriginBefore,71      XOriginAfter,72      Element,73      AssignedElement)74      SELECT75        1,76        0,77        1,78        p.uid_Hardware,79        p.uid_Locality80      FROM Hardware p81      JOIN @DBQueueCurrent x82        ON p.UID_Hardware= x.uid_parameter83      WHERE84        p.uid_Locality > ' '85    END86    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Hardware\FromProfitCenter') > ' '87    BEGIN88      INSERT INTO @SourceData(IsUpcommingContent,89      XOriginBefore,90      XOriginAfter,91      Element,92      AssignedElement)93      SELECT94        1,95        0,96        1,97        p.uid_Hardware,98        p.uid_ProfitCenter99      FROM Hardware p100      JOIN @DBQueueCurrent x101        ON p.UID_Hardware= x.uid_parameter102      WHERE103        p.uid_ProfitCenter > ' '104    END105    EXEC QBM_PDBQueueCalculateDelta @SourceData,106      @DeltaQuantity = 1,107      @DeltaDelete = 1,108      @DeltaInsert = 1,109      @DeltaOrigin = 0,110      @CountDeltaQantity = @CountDeltaQantity OUTPUT,111      @CountDeltaOrigin = @CountDeltaOrigin OUTPUT,112      @UseIsInEffect = 0,113      @SlotNumber = @SlotNumber,114      @DBQueueCurrentExtern = @DBQueueCurrent115    IF @CountDeltaQantity > 0116    BEGIN117      EXEC QBM_PMNTableInsert 'HelperHardwareOrg',118      'UID_Hardware',119      'UID_Org'120      EXEC QBM_PMNTableDelete 'HelperHardwareOrg',121      'UID_Hardware',122      'UID_Org'123      DECLARE @DBQueueElements_01 QBM_YDBQueueRaw124      INSERT INTO @DBQueueElements_01(object,125      subobject,126      genprocid)127      SELECT128        x.uid,129        NULL,130        x.GenProcID131      FROM(132      SELECT133        DISTINCT q.Element AS uid,134        q.GenProcID135      FROM #QBMDeltaQuantity q) AS x136      EXEC QBM_PDBQueueInsert_Bulk 'QER-K-AllForOneHardware',137        @DBQueueElements_01138    END139  END TRY140  BEGIN CATCH141    EXEC QBM_PSessionErrorAdd DEFAULT142    RAISERROR('',143    18,144    1)145      WITH NOWAIT146  END CATCH147  endLabel:148  RETURN149END
Open raw exported source
SQL ยท Raw19 lines
1       create   procedure QER_ZHelperHardwareOrg (@SlotNumber int) AS begin declare @Sourcedata QBM_YDataForDelta , @CountDeltaQantity int , @CountDeltaOrigin2 int declare @DebugSwitch int = 0 declare @DebugMessage nvarchar(1000) declare @DBQueueCurrent QBM_YDBQueueCurrent BEGIN TRY insert into @DBQueueCurrent3(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent4 cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount = 0 begin goto EndLabel end  insert into @SourceData( IsUpcommingContent, XOriginAfter5 , Element, AssignedElement, XOriginBefore ) select 0, 0 , hho.uid_Hardware, hho.uid_Org, 1 from @DBQueueCurrent x join HelperHardwareOrg hho on uid_Hardware6 = 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_Department8 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_Locality10 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_ProfitCenter12 from Hardware p join @DBQueueCurrent x on p.UID_Hardware= x.uid_parameter where p.uid_ProfitCenter > ' ' end exec QBM_PDBQueueCalculateDelta @SourceData13, @DeltaQuantity = 1, @DeltaDelete = 1, @DeltaInsert = 1, @DeltaOrigin = 0, @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin14 output , @UseIsInEffect = 0 , @SlotNumber = @SlotNumber , @DBQueueCurrentExtern = @DBQueueCurrent if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert15 'HelperHardwareOrg', 'UID_Hardware', 'UID_Org' exec QBM_PMNTableDelete 'HelperHardwareOrg', 'UID_Hardware', 'UID_Org'             declare @DBQueueElements_0116 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid) select x.uid, null, x.GenProcID from ( select distinct q.Element as uid17, q.GenProcID from #QBMDeltaQuantity q ) as x exec QBM_PDBQueueInsert_Bulk 'QER-K-AllForOneHardware', @DBQueueElements_01  end  END TRY BEGIN CATCH exec18 QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH  endLabel: return end 19