Back to OIM Explorer

dbo.QER_ZHelperWorkDeskOrg

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 2.493 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

1CREATE PROCEDURE QER_ZHelperWorkDeskOrg(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      hwo.uid_WorkDesk,37      hwo.uid_Org,38      139    FROM @DBQueueCurrent x40    JOIN HelperWorkDeskOrg hwo41      ON uid_WorkDesk = x.uid_parameter42    JOIN BaseTree b43      ON hwo.uid_org = b.uid_org44    WHERE45      b.uid_OrgRoot LIKE '___-V-%'46    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\WorkDesk\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_WorkDesk,58        p.uid_Department59      FROM WorkDesk p60      JOIN @DBQueueCurrent x61        ON uid_WorkDesk= x.uid_parameter62      WHERE63        p.uid_Department > ' '64    END65    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\WorkDesk\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_WorkDesk,77        p.uid_Locality78      FROM WorkDesk p79      JOIN @DBQueueCurrent x80        ON uid_WorkDesk= x.uid_parameter81      WHERE82        p.uid_Locality > ' '83    END84    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\WorkDesk\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_WorkDesk,96        p.uid_ProfitCenter97      FROM WorkDesk p98      JOIN @DBQueueCurrent x99        ON uid_WorkDesk= 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_PMNTableInsert 'HelperWorkDeskOrg',116      'UID_WorkDesk',117      'UID_Org'118      EXEC QBM_PMNTableDelete 'HelperWorkDeskOrg',119      'UID_WorkDesk',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

1      create   procedure QER_ZHelperWorkDeskOrg (@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 , hwo.uid_WorkDesk5, hwo.uid_Org, 1 from @DBQueueCurrent x join HelperWorkDeskOrg hwo on uid_WorkDesk = x.uid_parameter  join BaseTree b on hwo.uid_org = b.uid_org where 6b.uid_OrgRoot like '___-V-%'  if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\WorkDesk\FromDepartment') > ' ' begin insert into @SourceData( IsUpcommingContent7, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_WorkDesk, p.uid_Department from WorkDesk p join @DBQueueCurrent x on 8uid_WorkDesk= x.uid_parameter where p.uid_Department > ' ' end if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\WorkDesk\FromLocality') > ' ' begin9 insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_WorkDesk, p.uid_Locality 10from WorkDesk p join @DBQueueCurrent x on uid_WorkDesk= x.uid_parameter where p.uid_Locality > ' ' end if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\WorkDesk\FromProfitCenter'11) > ' ' begin insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement ) select 1, 0, 1 , p.uid_WorkDesk, p.uid_ProfitCenter12 from WorkDesk p join @DBQueueCurrent x on uid_WorkDesk= x.uid_parameter where p.uid_ProfitCenter > ' ' end exec QBM_PDBQueueCalculateDelta @SourceData13, @DeltaQuantity = 0, @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 'HelperWorkDeskOrg', 'UID_WorkDesk', 'UID_Org' exec QBM_PMNTableDelete 'HelperWorkDeskOrg', 'UID_WorkDesk', 'UID_Org' end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd16 default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH  endLabel: return end 17