dbo.RPS_ZAllForOneRPSReport

1     create   procedure RPS_ZAllForOneRPSReport (@SlotNumber int , @uid_RPSReport varchar(38) , @dummy varchar(38) , @GenProcID varchar(38) ) as
2 begin declare @MsgTxt nvarchar(1024) declare @DebugLevel char(1) = 'W' BEGIN TRY if not exists (select top 1 1 from RPSReport where uid_RPSReport = isnull
3(@uid_RPSReport,'')) begin select @MsgTxt = N'RPSReport ' + rtrim(@uid_RPSReport) + ' not exists, Job ALLFORONERPSReport was killed' exec QBM_PJournal 
4@MsgTxt, @@procid, 'D', @DebugLevel goto ende  end declare @DBQueueElements_01 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid
5) select x.uid, null, @GenProcID from ( select co.UID_Org as uid from BaseTreeHasRPSReport bhr join BaseTreeCollection co on bhr.UID_Org = co.UID_ParentOrg
6 where bhr.UID_RPSReport = @uid_RPSReport and bhr.XOrigin > 0  ) as x exec QBM_PDBQueueInsert_Bulk 'RPS-K-OrgHasRPSReport', @DBQueueElements_01 declare
7 @DBQueueElements_02 QBM_YDBQueueRaw insert into @DBQueueElements_02 (object, subobject, genprocid) select x.uid, null, @GenProcID from ( select uid_person
8 as uid from PersonHasRPSReport where uid_RPSReport = @uid_RPSReport and XOrigin > 0  union select pio.UID_Person from BaseTreeHasRPSReport bhr join PersonInBaseTree
9 pio on bhr.UID_Org = pio.UID_Org and bhr.XOrigin > 0  where bhr.UID_RPSReport = @uid_RPSReport union select pio.UID_Person from BaseTreeHasRPSReport bhr
10 join HelperPersonOrg pio on bhr.UID_Org = pio.UID_Org and bhr.XOrigin > 0  where bhr.UID_RPSReport = @uid_RPSReport ) as x exec QBM_PDBQueueInsert_Bulk
11 'RPS-K-PersonHasRPSReport', @DBQueueElements_02 END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende:
12 return end 
13