USP_PLANNEDGIFT_GETPAYOUTSPLITS_UPDATEFROMXML

Used to update a set of records defined by UFN_PLANNEDGIFT_GETPAYOUTSPLITS from the given xml string.

Parameters

Parameter Parameter Type Mode Description
@REVENUEID uniqueidentifier IN
@XML xml IN
@CHANGEAGENTID uniqueidentifier IN
@CHANGEDATE datetime IN

Definition

Copy


            CREATE procedure [dbo].[USP_PLANNEDGIFT_GETPAYOUTSPLITS_UPDATEFROMXML] 
            (
                @REVENUEID uniqueidentifier,
                @XML xml,
                @CHANGEAGENTID uniqueidentifier = null,
                @CHANGEDATE datetime = null
            )

            as
            begin
                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,
                   [BASECURRENCYID] uniqueidentifier,
                   [BASEEXCHANGERATEID] uniqueidentifier,
                   [DESIGNATIONID] uniqueidentifier,
                   [ID] uniqueidentifier,
                   [ORGANIZATIONAMOUNT] money,
                   [ORGANIZATIONEXCHANGERATEID] uniqueidentifier,
                   [TRANSACTIONAMOUNT] money,
                   [TRANSACTIONCURRENCYID] uniqueidentifier
                   )

                insert into @TempTbl select 
                    [AMOUNT],
                    [BASECURRENCYID],
                    [BASEEXCHANGERATEID],
                    [DESIGNATIONID],
                    [ID],
                    [ORGANIZATIONAMOUNT],
                    [ORGANIZATIONEXCHANGERATEID],
                    [TRANSACTIONAMOUNT],
                    [TRANSACTIONCURRENCYID]
                from dbo.UFN_REVENUE_GETPLANNEDGIFTPAYOUTSPLITS_FROMITEMLISTXML(@XML)

                update @TempTbl set ID = newid() where (ID is null) or (ID = '00000000-0000-0000-0000-000000000000');

                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.[PLANNEDGIFTPAYOUTSPLIT] where [PLANNEDGIFTPAYOUTSPLIT].ID in 
                    (select ID from dbo.UFN_REVENUE_GETPLANNEDGIFTPAYOUTSPLITS
                    (
                        @REVENUEID
                    )
                    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;



            merge into  dbo.[PLANNEDGIFTPAYOUTSPLIT]
            using  @TempTbl as [temp] on [PLANNEDGIFTPAYOUTSPLIT].ID = [temp].ID
            when matched and 
                (
                    ([PLANNEDGIFTPAYOUTSPLIT].[AMOUNT]<>temp.[AMOUNT]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[AMOUNT] is null and temp.[AMOUNT] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[AMOUNT] is not null and temp.[AMOUNT] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[BASECURRENCYID]<>temp.[BASECURRENCYID]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[BASECURRENCYID] is null and temp.[BASECURRENCYID] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[BASECURRENCYID] is not null and temp.[BASECURRENCYID] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[BASEEXCHANGERATEID]<>temp.[BASEEXCHANGERATEID]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[BASEEXCHANGERATEID] is null and temp.[BASEEXCHANGERATEID] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[BASEEXCHANGERATEID] is not null and temp.[BASEEXCHANGERATEID] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[DESIGNATIONID]<>temp.[DESIGNATIONID]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[DESIGNATIONID] is null and temp.[DESIGNATIONID] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[DESIGNATIONID] is not null and temp.[DESIGNATIONID] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ID]<>temp.[ID]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ID] is null and temp.[ID] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ID] is not null and temp.[ID] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONAMOUNT]<>temp.[ORGANIZATIONAMOUNT]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONAMOUNT] is null and temp.[ORGANIZATIONAMOUNT] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONAMOUNT] is not null and temp.[ORGANIZATIONAMOUNT] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONEXCHANGERATEID]<>temp.[ORGANIZATIONEXCHANGERATEID]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONEXCHANGERATEID] is null and temp.[ORGANIZATIONEXCHANGERATEID] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONEXCHANGERATEID] is not null and temp.[ORGANIZATIONEXCHANGERATEID] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONAMOUNT]<>temp.[TRANSACTIONAMOUNT]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONAMOUNT] is null and temp.[TRANSACTIONAMOUNT] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONAMOUNT] is not null and temp.[TRANSACTIONAMOUNT] is null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONCURRENCYID]<>temp.[TRANSACTIONCURRENCYID]) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONCURRENCYID] is null and temp.[TRANSACTIONCURRENCYID] is not null) or 
                    ([PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONCURRENCYID] is not null and temp.[TRANSACTIONCURRENCYID] is null)
                )
            then update 
                set        
                    [PLANNEDGIFTPAYOUTSPLIT].[AMOUNT]=temp.[AMOUNT],
                    [PLANNEDGIFTPAYOUTSPLIT].[BASECURRENCYID]=temp.[BASECURRENCYID],
                    [PLANNEDGIFTPAYOUTSPLIT].[BASEEXCHANGERATEID]=temp.[BASEEXCHANGERATEID],
                    [PLANNEDGIFTPAYOUTSPLIT].[DESIGNATIONID]=temp.[DESIGNATIONID],
                    [PLANNEDGIFTPAYOUTSPLIT].[ID]=temp.[ID],
                    [PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONAMOUNT]=temp.[ORGANIZATIONAMOUNT],
                    [PLANNEDGIFTPAYOUTSPLIT].[ORGANIZATIONEXCHANGERATEID]=temp.[ORGANIZATIONEXCHANGERATEID],
                    [PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONAMOUNT]=temp.[TRANSACTIONAMOUNT],
                    [PLANNEDGIFTPAYOUTSPLIT].[TRANSACTIONCURRENCYID]=temp.[TRANSACTIONCURRENCYID],
                    [PLANNEDGIFTPAYOUTSPLIT].CHANGEDBYID = @CHANGEAGENTID,
                    [PLANNEDGIFTPAYOUTSPLIT].DATECHANGED = @CHANGEDATE;

                if @@Error <> 0
                    return 3;    

                -- insert new items

                insert into [PLANNEDGIFTPAYOUTSPLIT] 
                    ([REVENUEID], 
                    [AMOUNT],
                    [APPLICATIONCODE],
                    [BASECURRENCYID],
                    [BASEEXCHANGERATEID],
                    [DESIGNATIONID],
                    [ID],
                    [ORGANIZATIONAMOUNT],
                    [ORGANIZATIONEXCHANGERATEID],
                    [TRANSACTIONAMOUNT],
                    [TRANSACTIONCURRENCYID],
                    [TYPECODE],                
                    ADDEDBYID, 
                    CHANGEDBYID, 
                    DATEADDED, 
                    DATECHANGED)
                select @REVENUEID
                    [AMOUNT],
                    0,
                    [BASECURRENCYID],
                    [BASEEXCHANGERATEID],
                    [DESIGNATIONID],
                    [ID],
                    [ORGANIZATIONAMOUNT],
                    [ORGANIZATIONEXCHANGERATEID],
                    [TRANSACTIONAMOUNT],
                    [TRANSACTIONCURRENCYID],
                    0
                    @CHANGEAGENTID
                    @CHANGEAGENTID
                    @CHANGEDATE
                    @CHANGEDATE
                from @TempTbl as [temp]
                where not exists (select ID from dbo.[PLANNEDGIFTPAYOUTSPLIT] as data where data.ID = [temp].ID)

                if @@Error <> 0
                    return 4;

                return 0;
            end