Back to OIM Explorer

dbo.RMS_ZWorkDeskHasESet

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 5.317 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_FGIBitPatternXOrigin source text reference
references source dbo.QBM_FGIConfigparmValue source text reference
references source dbo.QBM_PDBQueueCalculateDelta source text reference
references source dbo.QBM_PMNTableInsert source text reference
references source dbo.QBM_PMNTableOriginUpdate source text reference
references source dbo.QBM_PSessionErrorAdd source text reference

References

Referenced By

No direct source references extracted.

Complete Source

1CREATE PROCEDURE RMS_ZWorkDeskHasESet(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @Sourcedata QBM_YDataForDelta,7  @CountDeltaQantity int,8  @CountDeltaOrigin int9  DECLARE @GenProcID varchar(38)10  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent11  DECLARE @QBM_BitPatternXOrigin_Inherit int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|',12  0)13  DECLARE @QBM_BitPatternXOrigin_Inherit_inv int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|',14  1)15  BEGIN TRY16    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,17    UID_Parameter,18    UID_SubParameter,19    GenProcID)20    SELECT21      UID_DialogDBQueue,22      UID_Parameter,23      UID_SubParameter,24      GenProcID25    FROM QBMDBQueueCurrent cu26      WITH(readpast)27    WHERE28      cu.SlotNumber = @SlotNumber29    IF @@rowcount = 030    BEGIN31      GOTO EndLabel32    END33    INSERT INTO @SourceData(IsUpcommingContent,34    XOriginAfter,35    Element,36    AssignedElement,37    XOriginBefore,38    XIsInEffectBefore,39    XIsInEffectAfter)40    SELECT41      0,42      0,43      uid_WorkDesk,44      uid_ESet,45      XOrigin,46      whe.XIsInEffect,47      048    FROM WorkDeskHasESet whe49    JOIN @DBQueueCurrent x50      ON uid_WorkDesk = x.uid_parameter51    INSERT INTO @SourceData(IsUpcommingContent,52    XOriginBefore,53    XOriginAfter,54    Element,55    AssignedElement,56    XIsInEffectBefore,57    XIsInEffectAfter)58    SELECT59      1,60      0,61      whe.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv,62      uid_WorkDesk,63      e.UID_ESet,64      0,65      e.IsInActive ^ 166    FROM WorkDeskHasESet whe67    JOIN @DBQueueCurrent x68      ON uid_WorkDesk = x.uid_parameter69    JOIN ESet e70      ON whe.UID_ESet = e.UID_ESet71    INSERT INTO @SourceData(IsUpcommingContent,72    XOriginBefore,73    Element,74    AssignedElement,75    XOriginAfter,76    XIsInEffectBefore,77    XIsInEffectAfter)78    SELECT79      1,80      0,81      x.uid_WorkDesk,82      x.uid_ESet,83      @QBM_BitPatternXOrigin_Inherit,84      0,85      x.IsInActive ^ 186    FROM(87    SELECT88      DISTINCT ph.uid_WorkDesk,89      e.UID_Eset AS uid_ESet,90      e.IsInActive91    FROM(92    SELECT93      hpo.uid_WorkDesk, hpo.uid_org94    FROM @DBQueueCurrent p95    JOIN helperWorkDeskorg hpo96      ON p.uid_parameter = hpo.uid_WorkDesk97    UNION98    SELECT99      pio.uid_WorkDesk, pio.uid_org100    FROM @DBQueueCurrent p101    JOIN WorkDeskinBaseTree pio102      ON p.uid_parameter = pio.uid_WorkDesk AND pio.XOrigin > 0) AS ph103    JOIN WorkDesk w104      ON w.uid_WorkDesk = ph.uid_WorkDesk AND w.IsNoInherite = 0105    JOIN BaseTree b106      ON b.uid_org = ph.uid_org AND b.IsNoInheriteToWorkDesk = 0107    JOIN BaseTreeHasESet oha108      ON oha.uid_org = ph.uid_org AND oha.XOrigin > 0 AND oha.XIsInEffect = 1109    JOIN ESet e110      ON oha.UID_ESet = e.UID_ESet) AS x111    INSERT INTO @SourceData(IsUpcommingContent,112    XOriginBefore,113    Element,114    AssignedElement,115    XOriginAfter,116    XIsInEffectBefore,117    XIsInEffectAfter)118    SELECT119      1,120      0,121      x.uid_WorkDesk,122      x.UID_ESet,123      @QBM_BitPatternXOrigin_Inherit,124      0,125      x.IsInActive ^ 1126    FROM(127    SELECT128      s.Element AS uid_WorkDesk,129      e.UID_ESet AS UID_Eset,130      e.IsInActive131    FROM @SourceData s132    JOIN ESetCollection ec133      ON s.AssignedElement = ec.uid_ESet AND ec.uid_ESet <> ec.UID_EsetChild AND s.XOriginAfter > 0 AND s.IsUpcommingContent = 1134    JOIN ESet e135      ON ec.UID_ESetChild = e.UID_ESet136    JOIN WorkDesk p137      ON p.UID_WorkDesk = s.Element AND p.IsNoInherite = 0138    WHERE139      s.IsUpcommingContent = 1) AS x140    IF dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\ESetExclusion') > ' '141    BEGIN142      IF EXISTS(143        SELECT TOP 1 1144        FROM ESetExcludesEset ex145        WITH(nolock)146      JOIN @Sourcedata s147        ON ex.UID_ESetExcluded = s.AssignedElement148      WHERE149        s.IsUpcommingContent = 1 AND s.XOriginAfter > 0 AND s.XIsInEffectAfter = 1)150      BEGIN151        DECLARE @ExcludeCandidate QER_YExcludeCandidate152        INSERT INTO @ExcludeCandidate(Element,153        AssignedElement,154        XIsInEffectAfter)155        SELECT156          s.Element,157          s.AssignedElement,158          1159        FROM @Sourcedata s160        JOIN(161        SELECT exe.UID_ESetExcluded AS UID_Excluded162        FROM ESetExcludesEset exe) AS ex163          ON s.AssignedElement = ex.UID_Excluded164        WHERE165          s.IsUpcommingContent = 1 AND s.XOriginAfter > 0 AND s.XIsInEffectAfter = 1166        UNION all167        SELECT168          s.Element,169          s.AssignedElement,170          1171        FROM @Sourcedata s172        JOIN(173        SELECT exe.UID_ESet AS UID_Excluding174        FROM ESetExcludesEset exe) AS ex175          ON s.AssignedElement = ex.UID_Excluding176        WHERE177          s.IsUpcommingContent = 1 AND s.XOriginAfter > 0 AND s.XIsInEffectAfter = 1178        UPDATE @ExcludeCandidate179        SET XIsInEffectAfter = 0180        FROM @ExcludeCandidate l181        JOIN(182        SELECT183          exe.UID_ESetExcluded AS UID_Excluded,184          exe.UID_ESet AS UID_Excluding185        FROM ESetExcludesEset exe) AS ex186          ON l.AssignedElement = ex.UID_Excluded187        JOIN(188        SELECT sh.*189        FROM @ExcludeCandidate sh) AS h190          ON l.Element = h.Element AND h.AssignedElement = ex.UID_Excluding191        IF @@ROWCOUNT > 0192        BEGIN193          UPDATE @Sourcedata194          SET XIsInEffectAfter = 0195          FROM @Sourcedata l196          JOIN @ExcludeCandidate k197            ON l.Element = k.Element AND l.AssignedElement = k.AssignedElement AND k.XIsInEffectAfter = 0198          WHERE199            l.IsUpcommingContent = 1 AND l.XOriginAfter > 0 AND l.XIsInEffectAfter = 1200        END201      END202    END203    EXEC QBM_PDBQueueCalculateDelta @SourceData,204      @DeltaQuantity = 0,205      @DeltaDelete = 0,206      @DeltaInsert = 1,207      @DeltaOrigin = 1,208      @CountDeltaQantity = @CountDeltaQantity OUTPUT,209      @CountDeltaOrigin = @CountDeltaOrigin OUTPUT,210      @UseIsInEffect = 1,211      @SlotNumber = @SlotNumber,212      @DBQueueCurrentExtern = @DBQueueCurrent213    IF @CountDeltaOrigin > 0214    BEGIN215      EXEC QBM_PMNTableOriginUpdate 'WorkDeskHasESet',216      'uid_WorkDesk',217      'uid_ESet'218    END219    IF @CountDeltaQantity > 0220    BEGIN221      EXEC QBM_PMNTableInsert 'WorkDeskHasESet',222      'uid_WorkDesk',223      'uid_ESet',224        @TargetIsView = 0,225        @FKTableNameElement = 'WorkDesk',226        @FKColumnNameElement = 'uid_WorkDesk'227    END228  END TRY229  BEGIN CATCH230    EXEC QBM_PSessionErrorAdd DEFAULT231    RAISERROR('',232    18,233    1)234      WITH NOWAIT235  END CATCH236  endLabel:237END

Open raw exported source

1       create   procedure RMS_ZWorkDeskHasESet (@SlotNumber int) AS begin declare @Sourcedata QBM_YDataForDelta , @CountDeltaQantity int , @CountDeltaOrigin2 int declare @GenProcID varchar(38) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @QBM_BitPatternXOrigin_Inherit int = dbo.QBM_FGIBitPatternXOrigin3('|Inherit|', 0) declare @QBM_BitPatternXOrigin_Inherit_inv int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|', 1)  BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue4, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast5) where cu.SlotNumber = @SlotNumber if @@rowcount = 0 begin goto EndLabel end  insert into @SourceData( IsUpcommingContent, XOriginAfter , Element, AssignedElement6, XOriginBefore , XIsInEffectBefore, XIsInEffectAfter ) select 0, 0 , uid_WorkDesk, uid_ESet, XOrigin , whe.XIsInEffect, 0 from WorkDeskHasESet whe join7 @DBQueueCurrent x on uid_WorkDesk = x.uid_parameter  insert into @SourceData( IsUpcommingContent, XOriginBefore, XOriginAfter , Element, AssignedElement8 , XIsInEffectBefore, XIsInEffectAfter ) select 1, 0, whe.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv , uid_WorkDesk, e.UID_ESet , 0, e.IsInActive ^ 19 from WorkDeskHasESet whe join @DBQueueCurrent x on uid_WorkDesk = x.uid_parameter  join ESet e on whe.UID_ESet = e.UID_ESet insert into @SourceData( IsUpcommingContent10, XOriginBefore , Element, AssignedElement, XOriginAfter , XIsInEffectBefore, XIsInEffectAfter ) select 1, 0 , x.uid_WorkDesk, x.uid_ESet, @QBM_BitPatternXOrigin_Inherit11 , 0, x.IsInActive ^ 1 from (      select distinct ph.uid_WorkDesk, e.UID_Eset as uid_ESet , e.IsInActive from  ( select hpo.uid_WorkDesk , hpo.uid_org12 from @DBQueueCurrent p join helperWorkDeskorg hpo on p.uid_parameter = hpo.uid_WorkDesk union select pio.uid_WorkDesk , pio.uid_org from @DBQueueCurrent13 p join WorkDeskinBaseTree pio on p.uid_parameter = pio.uid_WorkDesk and pio.XOrigin > 0   ) as ph  join WorkDesk w on w.uid_WorkDesk = ph.uid_WorkDesk14 and w.IsNoInherite = 0 join BaseTree b on b.uid_org = ph.uid_org and b.IsNoInheriteToWorkDesk = 0 join BaseTreeHasESet oha on oha.uid_org = ph.uid_org15 and oha.XOrigin > 0 and oha.XIsInEffect = 1 join ESet e on oha.UID_ESet = e.UID_ESet ) as x  insert into @SourceData( IsUpcommingContent, XOriginBefore16 , Element, AssignedElement, XOriginAfter , XIsInEffectBefore, XIsInEffectAfter ) select 1, 0 , x.uid_WorkDesk, x.UID_ESet, @QBM_BitPatternXOrigin_Inherit17 ,0 , x.IsInActive ^ 1 from ( select s.Element as uid_WorkDesk, e.UID_ESet as UID_Eset, e.IsInActive from @SourceData s join ESetCollection ec on s.AssignedElement18 = ec.uid_ESet and ec.uid_ESet <> ec.UID_EsetChild and s.XOriginAfter > 0 and s.IsUpcommingContent = 1 join ESet e on ec.UID_ESetChild = e.UID_ESet join19 WorkDesk p on p.UID_WorkDesk = s.Element and p.IsNoInherite = 0 where s.IsUpcommingContent = 1 ) as x if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\ESetExclusion'20) > ' '  begin if exists (select top 1 1 from ESetExcludesEset ex with (nolock) join @Sourcedata s on ex.UID_ESetExcluded  = s.AssignedElement where s.IsUpcommingContent21 = 1 and s.XOriginAfter > 0 and s.XIsInEffectAfter = 1 ) begin declare @ExcludeCandidate QER_YExcludeCandidate insert into @ExcludeCandidate(Element, AssignedElement22, XIsInEffectAfter) select s.Element, s.AssignedElement, 1 from @Sourcedata s join ( select exe.UID_ESetExcluded as UID_Excluded from ESetExcludesEset 23exe ) as ex on s.AssignedElement = ex.UID_Excluded where s.IsUpcommingContent = 1 and s.XOriginAfter > 0 and s.XIsInEffectAfter = 1 union all select s.Element24, s.AssignedElement, 1 from @Sourcedata s join ( select exe.UID_ESet as UID_Excluding from ESetExcludesEset exe ) as ex on s.AssignedElement = ex.UID_Excluding25 where s.IsUpcommingContent = 1 and s.XOriginAfter > 0 and s.XIsInEffectAfter = 1 update @ExcludeCandidate set XIsInEffectAfter = 0 from @ExcludeCandidate26 l  join ( select exe.UID_ESetExcluded as UID_Excluded, exe.UID_ESet as UID_Excluding from ESetExcludesEset exe ) as ex on l.AssignedElement = ex.UID_Excluded27 join (select sh.* from @ExcludeCandidate sh  ) as h on l.Element = h.Element and h.AssignedElement = ex.UID_Excluding if @@ROWCOUNT > 0 begin update @Sourcedata28 set XIsInEffectAfter = 0 from @Sourcedata l join @ExcludeCandidate k on l.Element = k.Element and l.AssignedElement = k.AssignedElement and k.XIsInEffectAfter29 = 0 where l.IsUpcommingContent = 1 and l.XOriginAfter > 0 and l.XIsInEffectAfter = 1 end end  end   exec QBM_PDBQueueCalculateDelta @SourceData, @DeltaQuantity30 = 0, @DeltaDelete = 0, @DeltaInsert = 1, @DeltaOrigin = 1, @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin output31 , @UseIsInEffect = 1 , @SlotNumber = @SlotNumber , @DBQueueCurrentExtern = @DBQueueCurrent  if @CountDeltaOrigin > 0 begin exec QBM_PMNTableOriginUpdate32 'WorkDeskHasESet', 'uid_WorkDesk', 'uid_ESet' end if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert 'WorkDeskHasESet', 'uid_WorkDesk', 'uid_ESet'33, @TargetIsView = 0 , @FKTableNameElement = 'WorkDesk' , @FKColumnNameElement = 'uid_WorkDesk' end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default34 RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: end 35