Back to OIM Explorer

dbo.TSB_ZUNSGroupBHasUNSItemB

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 3.633 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_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 TSB_ZUNSGroupBHasUNSItemB(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @Sourcedata QBM_YDataForDelta,7  @CountDeltaQantity int,8  @CountDeltaOrigin int9  DECLARE @GenProcID varchar(38)10  DECLARE @UID_UNSRootB varchar(38)11  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent12  DECLARE @QBM_BitPatternXOrigin_Inherit int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|',13  0)14  DECLARE @QBM_BitPatternXOrigin_Inherit_inv int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|',15  1)16  BEGIN TRY17    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,18    UID_Parameter,19    UID_SubParameter,20    GenProcID)21    SELECT22      UID_DialogDBQueue,23      UID_Parameter,24      UID_SubParameter,25      GenProcID26    FROM QBMDBQueueCurrent cu27      WITH(readpast)28    WHERE29      cu.SlotNumber = @SlotNumber30    IF @@rowcount = 031    BEGIN32      GOTO EndLabel33    END34    INSERT INTO @SourceData(IsUpcommingContent,35    XOriginAfter,36    Element,37    AssignedElement,38    XOriginBefore,39    XIsInEffectBefore,40    XIsInEffectAfter)41    SELECT42      0,43      0,44      aig.UID_UNSGroupB,45      aig.UID_UNSItemB,46      aig.XOrigin,47      aig.XIsInEffect,48      049    FROM UNSGroupBHasUNSItemB aig50    JOIN @DBQueueCurrent x51      ON UID_UNSGroupB = x.UID_parameter52    INSERT INTO @SourceData(IsUpcommingContent,53    XOriginBefore,54    XOriginAfter,55    Element,56    AssignedElement,57    XIsInEffectBefore,58    XIsInEffectAfter)59    SELECT60      1,61      0,62      aig.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv,63      aig.UID_UNSGroupB,64      aig.UID_UNSItemB,65      aig.XIsInEffect,66    CASE67      WHEN n.UID_UNSRootB = g.UID_UNSRootB THEN68    169      WHEN ns.IsExtendedInheritance = 0 THEN70    071      WHEN ns.IsExtendedInheritance = 1 AND ns.UID_DPRNameSpace = rg.UID_DPRNameSpace THEN72    173    ELSE 074    END75    FROM UNSGroupBHasUNSItemB aig76    JOIN @DBQueueCurrent x77      ON aig.UID_UNSGroupB = x.UID_parameter78    JOIN UNSGroupB n79      ON aig.UID_UNSGroupB = n.UID_UNSGroupB80    JOIN UNSItemB g81      ON aig.UID_UNSItemB = g.UID_UNSItemB82    JOIN UNSRootB rn83      ON n.UID_UNSRootB = rn.UID_UNSRootB84    JOIN DPRNameSpace ns85      ON rn.UID_DPRNameSpace = ns.UID_DPRNameSpace86    JOIN UNSRootB rg87      ON g.UID_UNSRootB = rg.UID_UNSRootB88    INSERT INTO @SourceData(IsUpcommingContent,89    XOriginBefore,90    Element,91    AssignedElement,92    XOriginAfter,93    XIsInEffectBefore,94    XIsInEffectAfter)95    SELECT96      1,97      0,98      gig.uid_UNSGroupBChild,99      t.uid_UnsItemB,100      @QBM_BitPatternXOrigin_Inherit,101      0,102      1103    FROM UNSGroupBInUNSGroupB gig104    JOIN @DBQueueCurrent x105      ON gig.UID_UNSGroupBChild = x.UID_parameter AND gig.UID_UNSGroupBChild <> gig.UID_UNSGroupBParent106    JOIN UNSGroupBHasUNSItemB t107      ON t.uid_UNsGroupB = gig.uid_UNSGroupBParent AND XIsInEffect = 1108    JOIN UNSGroupB n109      ON t.UID_UNSGroupB = n.UID_UNSGroupB110    JOIN UNSItemB g111      ON t.UID_UNSItemB = g.UID_UNSItemB112    JOIN UNSRootB rn113      ON n.UID_UNSRootB = rn.UID_UNSRootB114    JOIN DPRNameSpace ns115      ON rn.UID_DPRNameSpace = ns.UID_DPRNameSpace116    JOIN UNSRootB rg117      ON g.UID_UNSRootB = rg.UID_UNSRootB118    WHERE119      1 = CASE120    WHEN n.UID_UNSRootB = g.UID_UNSRootB THEN121    1122    WHEN ns.IsExtendedInheritance = 0 THEN123    0124    WHEN ns.IsExtendedInheritance = 1 AND ns.UID_DPRNameSpace = rg.UID_DPRNameSpace THEN125    1126    ELSE 0127    END128    EXEC QBM_PDBQueueCalculateDelta @SourceData,129      @DeltaQuantity = 0,130      @DeltaDelete = 0,131      @DeltaInsert = 1,132      @DeltaOrigin = 1,133      @CountDeltaQantity = @CountDeltaQantity OUTPUT,134      @CountDeltaOrigin = @CountDeltaOrigin OUTPUT,135      @UseIsInEffect = 1,136      @SlotNumber = @SlotNumber,137      @DBQueueCurrentExtern = @DBQueueCurrent138    IF @CountDeltaOrigin > 0139    BEGIN140      EXEC QBM_PMNTableOriginUpdate 'UNSGroupBHasUNSItemB',141      'UID_UNSGroupB',142      'UID_UNSItemB'143    END144    IF @CountDeltaQantity > 0145    BEGIN146      EXEC QBM_PMNTableInsert 'UNSGroupBHasUNSItemB',147      'UID_UNSGroupB',148      'UID_UNSItemB',149        @TargetIsView = 0,150        @FKTableNameElement = 'UNSGroupB',151        @FKColumnNameElement = 'UID_UNSGroupB'152    END153  END TRY154  BEGIN CATCH155    EXEC QBM_PSessionErrorAdd DEFAULT156    RAISERROR('',157    18,158    1)159      WITH NOWAIT160  END CATCH161  endLabel:162END

Open raw exported source

1     create   procedure TSB_ZUNSGroupBHasUNSItemB (@SlotNumber int) AS begin declare @Sourcedata QBM_YDataForDelta , @CountDeltaQantity int , @CountDeltaOrigin2 int declare @GenProcID varchar(38) declare @UID_UNSRootB varchar(38) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @QBM_BitPatternXOrigin_Inherit3 int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|', 0) declare @QBM_BitPatternXOrigin_Inherit_inv int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|', 1)  BEGIN4 TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter5, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount = 0 begin goto EndLabel end  insert into @SourceData6( IsUpcommingContent, XOriginAfter , Element, AssignedElement, XOriginBefore , XIsInEffectBefore, XIsInEffectAfter ) select 0, 0 , aig.UID_UNSGroupB, aig.UID_UNSItemB7, aig.XOrigin , aig.XIsInEffect, 0 from UNSGroupBHasUNSItemB aig join @DBQueueCurrent x on UID_UNSGroupB = x.UID_parameter insert into @SourceData( IsUpcommingContent8, XOriginBefore, XOriginAfter , Element, AssignedElement , XIsInEffectBefore, XIsInEffectAfter ) select 1, 0, aig.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv9 , aig.UID_UNSGroupB, aig.UID_UNSItemB  , aig.XIsInEffect, case when n.UID_UNSRootB = g.UID_UNSRootB then 1  when ns.IsExtendedInheritance = 0 then 0 when10 ns.IsExtendedInheritance = 1 and ns.UID_DPRNameSpace = rg.UID_DPRNameSpace then 1 else 0 end from UNSGroupBHasUNSItemB aig join @DBQueueCurrent x on aig.UID_UNSGroupB11 = x.UID_parameter join UNSGroupB n on aig.UID_UNSGroupB = n.UID_UNSGroupB join UNSItemB g on aig.UID_UNSItemB = g.UID_UNSItemB  join UNSRootB rn on n.UID_UNSRootB12 = rn.UID_UNSRootB join DPRNameSpace ns on rn.UID_DPRNameSpace = ns.UID_DPRNameSpace join UNSRootB rg on g.UID_UNSRootB = rg.UID_UNSRootB insert into @SourceData13( IsUpcommingContent, XOriginBefore , Element, AssignedElement, XOriginAfter , XIsInEffectBefore, XIsInEffectAfter ) select 1, 0 , gig.uid_UNSGroupBChild14, t.uid_UnsItemB, @QBM_BitPatternXOrigin_Inherit , 0, 1 from UNSGroupBInUNSGroupB gig join @DBQueueCurrent x on gig.UID_UNSGroupBChild = x.UID_parameter15  and gig.UID_UNSGroupBChild <> gig.UID_UNSGroupBParent join UNSGroupBHasUNSItemB t on t.uid_UNsGroupB = gig.uid_UNSGroupBParent and XIsInEffect = 1  join16 UNSGroupB n on t.UID_UNSGroupB = n.UID_UNSGroupB join UNSItemB g on t.UID_UNSItemB = g.UID_UNSItemB  join UNSRootB rn on n.UID_UNSRootB = rn.UID_UNSRootB17 join DPRNameSpace ns on rn.UID_DPRNameSpace = ns.UID_DPRNameSpace join UNSRootB rg on g.UID_UNSRootB = rg.UID_UNSRootB where 1 = case when n.UID_UNSRootB18 = g.UID_UNSRootB then 1  when ns.IsExtendedInheritance = 0 then 0 when ns.IsExtendedInheritance = 1 and ns.UID_DPRNameSpace = rg.UID_DPRNameSpace then19 1 else 0 end  exec QBM_PDBQueueCalculateDelta @SourceData, @DeltaQuantity = 0, @DeltaDelete = 0, @DeltaInsert = 1, @DeltaOrigin = 1, @CountDeltaQantity20 = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin output , @UseIsInEffect = 1 , @SlotNumber = @SlotNumber , @DBQueueCurrentExtern = 21@DBQueueCurrent if @CountDeltaOrigin > 0 begin exec QBM_PMNTableOriginUpdate 'UNSGroupBHasUNSItemB', 'UID_UNSGroupB', 'UID_UNSItemB' end if @CountDeltaQantity22 > 0 begin exec QBM_PMNTableInsert 'UNSGroupBHasUNSItemB', 'UID_UNSGroupB', 'UID_UNSItemB', @TargetIsView = 0 , @FKTableNameElement = 'UNSGroupB' , @FKColumnNameElement23 = 'UID_UNSGroupB' end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: end 24