USP_REVENUE_GETSOLICITORS_UPDATEFROMXML
Update solicitors on a given revenue detail record.
Parameters
Parameter | Parameter Type | Mode | Description |
---|---|---|---|
@REVENUESPLITID | uniqueidentifier | IN | |
@XML | xml | IN | |
@CHANGEAGENTID | uniqueidentifier | IN | |
@CHANGEDATE | datetime | IN |
Definition
Copy
CREATE procedure dbo.USP_REVENUE_GETSOLICITORS_UPDATEFROMXML
(
@REVENUESPLITID uniqueidentifier,
@XML xml,
@CHANGEAGENTID uniqueidentifier = null,
@CHANGEDATE datetime = null
)
as
set nocount on;
if @CHANGEAGENTID is null
exec USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output
if @CHANGEDATE is null
set @CHANGEDATE = getdate()
-- build a temporary table containing the values from the XML
declare @TempTbl table (
[AMOUNT] money,
[CONSTITUENTID] uniqueidentifier,
[ID] uniqueidentifier,
[BUSINESSUNITCODEID] uniqueidentifier,
[SEQUENCE] int)
insert into @TempTbl([AMOUNT], [CONSTITUENTID], [ID], [SEQUENCE]) select
[AMOUNT],
[CONSTITUENTID],
[ID],
[SEQUENCE]
from dbo.UFN_REVENUE_GETSOLICITORS_FROMITEMLISTXML(@XML)
update @TempTbl set ID = newid() where (ID is null) or (ID = '00000000-0000-0000-0000-000000000000');
-- Update the BUSINESSUNITCODEID here
declare @REVENUEDATE datetime;
select
@REVENUEDATE = REVENUE.[DATE]
from
dbo.REVENUESPLIT
inner join dbo.REVENUE on REVENUE.ID = REVENUESPLIT.REVENUEID
where REVENUESPLIT.ID = @REVENUESPLITID;
with CONSTITUENTBUSINESSUNIT as (
select
ORGANIZATIONPOSITIONHOLDER.CONSTITUENTID,
ORGANIZATIONPOSITION.BUSINESSUNITCODEID
from
dbo.ORGANIZATIONPOSITIONHOLDER
inner join dbo.ORGANIZATIONPOSITION on ORGANIZATIONPOSITION.ID = ORGANIZATIONPOSITIONHOLDER.POSITIONID
where
(@REVENUEDATE between ORGANIZATIONPOSITIONHOLDER.DATEFROM and ORGANIZATIONPOSITIONHOLDER.DATETO)
or (ORGANIZATIONPOSITIONHOLDER.DATETO is null and @REVENUEDATE >= ORGANIZATIONPOSITIONHOLDER.DATEFROM)
)
update
@TempTbl
set
BUSINESSUNITCODEID = CONSTITUENTBUSINESSUNIT.BUSINESSUNITCODEID
from
@TempTbl [SOLICITORS]
inner join CONSTITUENTBUSINESSUNIT on CONSTITUENTBUSINESSUNIT.CONSTITUENTID = SOLICITORS.CONSTITUENTID
where
ID = [SOLICITORS].ID;
if @@Error <> 0
return 1;
declare @contextCache varbinary(128);
declare @e int;
-- cache current context information
set @contextCache = context_info();
-- set CONTEXT_INFO to @CHANGEAGENTID
if not @CHANGEAGENTID is null
set context_info @CHANGEAGENTID;
-- delete any items that no longer exist in the XML table
delete from dbo.[REVENUESOLICITOR] where [REVENUESOLICITOR].ID in
(select ID from dbo.UFN_REVENUE_GETSOLICITORS
(
@REVENUESPLITID
)
except select ID from @TempTbl)
select @e=@@error;
-- reset CONTEXT_INFO to previous value
if not @contextCache is null
set context_info @contextCache;
if @e <> 0
return 2;
-- update the items that exist in the XML table and the db
update [REVENUESOLICITOR]
set [REVENUESOLICITOR].[AMOUNT] = temp.[AMOUNT],
[REVENUESOLICITOR].[CONSTITUENTID] = temp.[CONSTITUENTID],
[REVENUESOLICITOR].[BUSINESSUNITCODEID] = temp.[BUSINESSUNITCODEID],
[REVENUESOLICITOR].[SEQUENCE] = temp.[SEQUENCE],
[REVENUESOLICITOR].CHANGEDBYID = @CHANGEAGENTID,
[REVENUESOLICITOR].DATECHANGED = @CHANGEDATE
from dbo.[REVENUESOLICITOR] inner join @TempTbl as [temp] on [REVENUESOLICITOR].ID = [temp].ID
where
([REVENUESOLICITOR].[AMOUNT] <> temp.[AMOUNT]) or
([REVENUESOLICITOR].[AMOUNT] is null and temp.[AMOUNT] is not null) or
([REVENUESOLICITOR].[AMOUNT] is not null and temp.[AMOUNT] is null) or
([REVENUESOLICITOR].[CONSTITUENTID] <> temp.[CONSTITUENTID]) or
([REVENUESOLICITOR].[CONSTITUENTID] is null and temp.[CONSTITUENTID] is not null) or
([REVENUESOLICITOR].[CONSTITUENTID] is not null and temp.[CONSTITUENTID] is null) or
([REVENUESOLICITOR].[BUSINESSUNITCODEID] <> temp.[BUSINESSUNITCODEID]) or
([REVENUESOLICITOR].[BUSINESSUNITCODEID] is null and temp.[BUSINESSUNITCODEID] is not null) or
([REVENUESOLICITOR].[BUSINESSUNITCODEID] is not null and temp.[BUSINESSUNITCODEID] is null) or
([REVENUESOLICITOR].[SEQUENCE] <> temp.[SEQUENCE]) or
([REVENUESOLICITOR].[SEQUENCE] is null and temp.[SEQUENCE] is not null) or
([REVENUESOLICITOR].[SEQUENCE] is not null and temp.[SEQUENCE] is null)
if @@Error <> 0
return 3;
-- insert new items
insert into [REVENUESOLICITOR]
([REVENUESPLITID],
[AMOUNT],
[CONSTITUENTID],
[ID],
[BUSINESSUNITCODEID],
[SEQUENCE],
ADDEDBYID,
CHANGEDBYID,
DATEADDED,
DATECHANGED)
select @REVENUESPLITID,
[AMOUNT],
[CONSTITUENTID],
[ID],
[BUSINESSUNITCODEID],
[SEQUENCE],
@CHANGEAGENTID,
@CHANGEAGENTID,
@CHANGEDATE,
@CHANGEDATE
from @TempTbl as [temp]
where not exists (select ID from dbo.[REVENUESOLICITOR] as data where data.ID = [temp].ID)
if @@Error <> 0
return 4;
return 0;