USP_DATAFORMTEMPLATE_EDIT_DONORCHALLENGEBASECURRENCY

The save procedure used by the edit dataform template "Donor Challenge Base Currency Edit Form".

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier IN The input ID parameter indicating the ID of the record being edited.
@CHANGEAGENTID uniqueidentifier IN Input parameter indicating the ID of the change agent invoking the procedure.
@BASECURRENCYID uniqueidentifier IN Base currency

Definition

Copy


CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_DONORCHALLENGEBASECURRENCY (
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier = null,
    @BASECURRENCYID uniqueidentifier
)
as

    set nocount on;

    if @CHANGEAGENTID is null  
        exec dbo.USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output

    declare @CURRENTDATE datetime
    set @CURRENTDATE = getdate()

    if exists(select top(1) 1 from dbo.DONORCHALLENGEENCUMBERED where DONORCHALLENGEID = @ID)
        raiserror('BBERR_CHALLENGEHASENCUMBEREDFUNDS', 13, 1);

    begin try

        declare @DATEADDED datetime;
        declare @ORGANIZATIONCURRENCYID uniqueidentifier;
        declare @ORGANIZATIONEXCHANGERATEID uniqueidentifier;

        select @DATEADDED = DATEADDED from dbo.DONORCHALLENGE where DONORCHALLENGE.ID = @ID;    
        set @ORGANIZATIONCURRENCYID = dbo.UFN_CURRENCY_GETORGANIZATIONCURRENCY();
        set @ORGANIZATIONEXCHANGERATEID = dbo.UFN_CURRENCYEXCHANGERATE_GETLATEST(@BASECURRENCYID, @ORGANIZATIONCURRENCYID, @DATEADDED, 0, null);

        update dbo.DONORCHALLENGE set
            BASECURRENCYID = @BASECURRENCYID,
            ORGANIZATIONEXCHANGERATEID = @ORGANIZATIONEXCHANGERATEID,
            ORGANIZATIONTOTALFUNDS = dbo.UFN_CURRENCY_CONVERT(TOTALFUNDS, @ORGANIZATIONEXCHANGERATEID),
            ORGANIZATIONMATCHTHRESHOLD = dbo.UFN_CURRENCY_CONVERT(MATCHTHRESHOLD, @ORGANIZATIONEXCHANGERATEID),
            ORGANIZATIONMINGIFTAMOUNT = dbo.UFN_CURRENCY_CONVERT(MINGIFTAMOUNT, @ORGANIZATIONEXCHANGERATEID),
            ORGANIZATIONMAXMATCHPERGIFT = dbo.UFN_CURRENCY_CONVERT(MAXMATCHPERGIFT, @ORGANIZATIONEXCHANGERATEID),
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
        where 
            DONORCHALLENGE.ID = @ID

        declare @SPLITS xml = dbo.UFN_DONORCHALLENGE_GETSPLITS_2_TOITEMLISTXML(@ID);
        set @SPLITS = dbo.UFN_DONORCHALLENGESPLIT_CONVERTAMOUNTSINXML(@SPLITS, @BASECURRENCYID, @ORGANIZATIONEXCHANGERATEID);
        exec dbo.USP_DONORCHALLENGE_GETSPLITS_2_UPDATEFROMXML @ID, @SPLITS, @CHANGEAGENTID;

    end try
    begin catch
        exec dbo.USP_RAISE_ERROR
        return 1
    end catch

return 0;