USP_DATAFORMTEMPLATE_EDIT_PAYMENTGIFTFEEOVERRIDE_ADJUST
The save procedure used by the edit dataform template "Payment Gift Fee Override Adjust Form".
Parameters
Parameter | Parameter Type | Mode | Description |
---|---|---|---|
@ID | uniqueidentifier | IN | The input ID parameter indicating the ID of the record being edited. |
@GIFTFEES | xml | IN | Gift fees |
@REASONCODEID | uniqueidentifier | IN | Reason code |
@COMMENTS | nvarchar(255) | IN | Details |
@CHANGEAGENTID | uniqueidentifier | IN | Input parameter indicating the ID of the change agent invoking the procedure. |
@ADJUSTMENTDATE | datetime | IN | Adjustment date |
@ADJUSTMENTPOSTDATE | datetime | IN | Adjustment post date |
@ADJUSTMENTREASON | nvarchar(300) | IN | Adjustment reason |
Definition
Copy
CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_PAYMENTGIFTFEEOVERRIDE_ADJUST
(
@ID uniqueidentifier,
@GIFTFEES xml,
@REASONCODEID uniqueidentifier,
@COMMENTS nvarchar(255),
@CHANGEAGENTID uniqueidentifier = null,
@ADJUSTMENTDATE datetime,
@ADJUSTMENTPOSTDATE datetime,
@ADJUSTMENTREASON nvarchar(300)
)
as
begin try
set nocount on;
declare @CHANGEDATE datetime
set @CHANGEDATE = getdate()
if @CHANGEAGENTID is null
exec dbo.USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output
declare @ADJUST bit;
declare @ADJUSTMENTID uniqueidentifier;
declare @ORIGINALPAYMENTMETHODCODE tinyint;
declare @ORIGINALREVENUEPAYMENTMETHODID uniqueidentifier;
declare @STOCKSALEADJUSTMENTIDS xml;
declare @PROPERTYDETAILADJUSTMENTID uniqueidentifier;
/* Check if designations changed */
if dbo.UFN_REVENUE_GIFTFEE_CHANGED(@ID, @GIFTFEES) = 1
begin
set @ADJUST = 1;
end
--PRE ADJUST
if @ADJUST = 1
exec dbo.USP_PAYMENT_ADJUST_PRE @ID, @ADJUSTMENTPOSTDATE, @ADJUSTMENTDATE, @ADJUSTMENTREASON, @ADJUSTMENTID output,
@STOCKSALEADJUSTMENTIDS output, @PROPERTYDETAILADJUSTMENTID output, @ORIGINALPAYMENTMETHODCODE output,
@ORIGINALREVENUEPAYMENTMETHODID output, @CHANGEAGENTID, @CHANGEDATE;
--MAKE CHANGES
exec dbo.USP_REVENUE_PAYMENTGIFTFEE_SAVE @ID, @GIFTFEES, @REASONCODEID, @COMMENTS, @CHANGEAGENTID;
--POST ADJUSTMENTS
if @ADJUST = 1
exec dbo.USP_PAYMENT_ADJUST_POST @ID, @ADJUSTMENTID, @STOCKSALEADJUSTMENTIDS, @PROPERTYDETAILADJUSTMENTID, @ORIGINALPAYMENTMETHODCODE,
@ORIGINALREVENUEPAYMENTMETHODID, @CHANGEAGENTID, @CHANGEDATE;
end try
begin catch
exec dbo.USP_RAISE_ERROR;
return 1;
end catch
return 0;