Back to OIM Explorer

dbo.QER_ZHelperPersonOrg

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 2.458 characters

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_FGIConfigparmValue source text reference
  • references source dbo.QBM_PDBQueueCalculateDelta 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

References

Referenced By

  • No direct source references extracted.

Complete Source

SQL132 lines
1CREATE PROCEDURE QER_ZHelperPersonOrg(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @Sourcedata QBM_YDataForDelta,7  @CountDeltaQantity int,8  @CountDeltaOrigin int9  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent10  BEGIN TRY11    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,12    UID_Parameter,13    UID_SubParameter,14    GenProcID)15    SELECT16      UID_DialogDBQueue,17      UID_Parameter,18      UID_SubParameter,19      GenProcID20    FROM QBMDBQueueCurrent cu21      WITH(readpast)22    WHERE23      cu.SlotNumber = @SlotNumber24    IF @@rowcount = 025    BEGIN26      GOTO EndLabel27    END28    INSERT INTO @SourceData(IsUpcommingContent,29    XOriginAfter,30    Element,31    AssignedElement,32    XOriginBefore)33    SELECT34      0,35      0,36      hpo.uid_person,37      hpo.uid_Org,38      139    FROM @DBQueueCurrent x40    JOIN HelperPersonOrg hpo41      ON hpo.UID_Person = x.uid_parameter42    JOIN BaseTree b43      ON hpo.uid_org = b.uid_org44    WHERE45      b.uid_OrgRoot LIKE '___-V-%'46    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Person\FromDepartment') > ' '47    BEGIN48      INSERT INTO @SourceData(IsUpcommingContent,49      XOriginBefore,50      XOriginAfter,51      Element,52      AssignedElement)53      SELECT54        1,55        0,56        1,57        p.uid_person,58        p.uid_Department59      FROM person p60      JOIN @DBQueueCurrent x61        ON uid_person= x.uid_parameter62      WHERE63        p.uid_Department > ' '64    END65    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Person\FromLocality') > ' '66    BEGIN67      INSERT INTO @SourceData(IsUpcommingContent,68      XOriginBefore,69      XOriginAfter,70      Element,71      AssignedElement)72      SELECT73        1,74        0,75        1,76        p.uid_person,77        p.uid_Locality78      FROM person p79      JOIN @DBQueueCurrent x80        ON uid_person= x.uid_parameter81      WHERE82        p.uid_Locality > ' '83    END84    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Person\FromProfitCenter') > ' '85    BEGIN86      INSERT INTO @SourceData(IsUpcommingContent,87      XOriginBefore,88      XOriginAfter,89      Element,90      AssignedElement)91      SELECT92        1,93        0,94        1,95        p.uid_person,96        p.uid_ProfitCenter97      FROM person p98      JOIN @DBQueueCurrent x99        ON uid_person= x.uid_parameter100      WHERE101        p.uid_ProfitCenter > ' '102    END103    EXEC QBM_PDBQueueCalculateDelta @SourceData,104      @DeltaQuantity = 0,105      @DeltaDelete = 1,106      @DeltaInsert = 1,107      @DeltaOrigin = 0,108      @CountDeltaQantity = @CountDeltaQantity OUTPUT,109      @CountDeltaOrigin = @CountDeltaOrigin OUTPUT,110      @UseIsInEffect = 0,111      @SlotNumber = @SlotNumber,112      @DBQueueCurrentExtern = @DBQueueCurrent113    IF @CountDeltaQantity > 0114    BEGIN115      EXEC QBM_PMNTableDelete 'HelperPersonOrg',116      'UID_Person',117      'UID_Org'118      EXEC QBM_PMNTableInsert 'HelperPersonOrg',119      'UID_Person',120      'UID_Org'121    END122  END TRY123  BEGIN CATCH124    EXEC QBM_PSessionErrorAdd DEFAULT125    RAISERROR('',126    18,127    1)128      WITH NOWAIT129  END CATCH130  endLabel:131  RETURN132END
Open raw exported source
SQL ยท Raw17 lines
1      create   procedure QER_ZHelperPersonOrg (@SlotNumber int ) AS begin declare @Sourcedata QBM_YDataForDelta , @CountDeltaQantity int , @CountDeltaOrigin2 int declare @DBQueueCurrent QBM_YDBQueueCurrent BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select3 UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount4 = 0 begin goto EndLabel end  insert into @SourceData( IsUpcommingContent, XOriginAfter , Element, AssignedElement, XOriginBefore ) select 0, 0 , hpo.uid_person5, hpo.uid_Org, 1 from @DBQueueCurrent x join HelperPersonOrg hpo on hpo.UID_Person = x.uid_parameter  join BaseTree b on hpo.uid_org = b.uid_org where 6b.uid_OrgRoot like '___-V-%'  if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Person\FromDepartment') > ' ' begin insert into @SourceData( IsUpcommingContent7, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_person, p.uid_Department from person p join @DBQueueCurrent x on uid_person=8 x.uid_parameter where p.uid_Department > ' ' end if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Person\FromLocality') > ' ' begin insert into 9@SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_person, p.uid_Locality from person p join10 @DBQueueCurrent x on uid_person= x.uid_parameter where p.uid_Locality > ' ' end if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\Person\FromProfitCenter'11) > ' ' begin insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_person, p.uid_ProfitCenter12 from person p join @DBQueueCurrent x on uid_person= x.uid_parameter where p.uid_ProfitCenter > ' ' end exec QBM_PDBQueueCalculateDelta @SourceData, @DeltaQuantity13 = 0, @DeltaDelete = 1, @DeltaInsert = 1, @DeltaOrigin = 0, @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin output14 , @UseIsInEffect = 0 , @SlotNumber = @SlotNumber , @DBQueueCurrentExtern = @DBQueueCurrent if @CountDeltaQantity > 0 begin exec QBM_PMNTableDelete 'HelperPersonOrg'15, 'UID_Person', 'UID_Org' exec QBM_PMNTableInsert 'HelperPersonOrg', 'UID_Person', 'UID_Org' end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default16 RAISERROR ('', 18, 1) WITH NOWAIT END CATCH  endLabel: return end 17