USP_DATAFORMTEMPLATE_EDIT_FAF_PENDING_GIFT

The save procedure used by the edit dataform template "FAF Pending Gift Edit Data 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.
@AMOUNT	money	IN	Amount
@EXPECTEDDATE	datetime	IN	Date sent by registrant
@LOOKUPID	nvarchar(100)	IN	Revenue ID

Definition

Copy


CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_FAF_PENDING_GIFT (
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier = null,
    --@CONSTITUENTID uniqueidentifier,
    @AMOUNT money  ,
    @EXPECTEDDATE datetime ,
    @LOOKUPID nvarchar(100) 
)
as

    set nocount on;

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

    declare @CURRENTDATE datetime
    set @CURRENTDATE = getdate()

    begin try
        -- handle updating the data
    update dbo.REVENUEOFFLINEDONATION
    set
      EXPECTEDDATE = @EXPECTEDDATE,
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
    where ID = @ID  


        update dbo.REVENUE 
    set
     -- CONSTITUENTID = @CONSTITUENTID,
            AMOUNT = @AMOUNT,
      TRANSACTIONAMOUNT = @AMOUNT,
            CUSTOMIDENTIFIER = rtrim(ltrim(@LOOKUPID)),
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
        where ID = @ID

    update dbo.REVENUESPLIT 
    set
      AMOUNT = @AMOUNT,
      TRANSACTIONAMOUNT = @AMOUNT,
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
    where 
      REVENUEID in (select ID from dbo.REVENUE where ID = @ID and TRANSACTIONTYPECODE = 9) 
        and APPLICATIONCODE = 0 

    update dbo.INSTALLMENT
    set
      AMOUNT = @AMOUNT,
      TRANSACTIONAMOUNT = @AMOUNT,
      ORGANIZATIONAMOUNT = @AMOUNT,
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
    where 
      REVENUEID = @ID

    update dbo.INSTALLMENTSPLIT
    set 
      AMOUNT = @AMOUNT,
      TRANSACTIONAMOUNT = @AMOUNT,
      ORGANIZATIONAMOUNT = @AMOUNT,
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
    where 
      PLEDGEID = @ID

    update dbo.REVENUERECOGNITION  
    set       
      AMOUNT = @AMOUNT,
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
    where 
      REVENUESPLITID in (select RS.ID from dbo.REVENUE R join dbo.REVENUESPLIT RS on R.ID = RS.REVENUEID where R.ID = @ID and RS.APPLICATIONCODE = 0 and R.TRANSACTIONTYPECODE = 9)

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

return 0;