USP_PLEDGE_ADDORIGINALAMOUNT

            CREATE procedure dbo.USP_PLEDGE_ADDORIGINALAMOUNT(
                @REVENUEID uniqueidentifier,
                @ORIGINALAMOUNT money = null, --This parameter is ignored

                @CHANGEAGENTID uniqueidentifier = null,
                @CHANGEDATE datetime = null
            )as
                set nocount on

                --The @ORIGINALAMOUNT parameter is ignored. It shipped with

                -- BB_2.6, but the correct behavior is to use the value from the

                -- REVENUE table. It only remains for binary compatibility.


                --If there is no revenueid then exit

                if (@REVENUEID is null)
                    return 0;

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

                if @CHANGEDATE is null
                    set @CHANGEDATE = getdate()


                if exists(select top 1 [ID] from dbo.[FINANCIALTRANSACTION] where [ID] = @REVENUEID and [TYPECODE] = 1 and DELETEDON is null) and
                    not exists(select top 1 [ID] from dbo.[PLEDGEORIGINALAMOUNT] where ID = @REVENUEID) 
                begin

                    insert into dbo.[PLEDGEORIGINALAMOUNT](
                        [ID],
                        [ORIGINALAMOUNT],
                        [TRANSACTIONAMOUNT],
                        [ORGANIZATIONAMOUNT],
                        [BASECURRENCYID],
                        [TRANSACTIONCURRENCYID],
                        [BASEEXCHANGERATEID],
                        [ORGANIZATIONEXCHANGERATEID],
                        [ADDEDBYID],
                        [CHANGEDBYID], 
                        [DATEADDED], 
                        [DATECHANGED]
                    )
                    select
                        ID,
                        AMOUNT,
                        TRANSACTIONAMOUNT,
                        ORGANIZATIONAMOUNT,
                        BASECURRENCYID,
                        TRANSACTIONCURRENCYID,
                        BASEEXCHANGERATEID,
                        ORGANIZATIONEXCHANGERATEID,
                        @CHANGEAGENTID,
                        @CHANGEAGENTID,
                        @CHANGEDATE,
                        @CHANGEDATE
                    from
                        dbo.REVENUE
                    where
                        ID = @REVENUEID;

                end    
                else
                    return 0;