USP_DATAFORMTEMPLATE_EDIT_R68_2
The save procedure used by the edit dataform template "R68 Process 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. |
@NAME | nvarchar(100) | IN | Name |
@REFERENCENUMBER | nvarchar(20) | IN | Charity claim reference number |
@DESCRIPTION | nvarchar(255) | IN | Description |
@STARTDATE | date | IN | Start date |
@ENDDATE | date | IN | End date |
@IDSETREGISTERID | uniqueidentifier | IN | Selection |
@UPDATEGIFTAIDSTATUS | bit | IN | Update Gift Aid status |
@TAXCLAIMNUMBER | nvarchar(10) | IN | Tax claim number |
@RUNGIFTAIDSPONSORSHIPSONLY | bit | IN | Process only Gift Aid sponsorships |
@CURRENTAPPUSERID | uniqueidentifier | IN | Input parameter indicating the ID of the current user. |
Definition
Copy
CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_R68_2
(
@ID uniqueidentifier,
@CHANGEAGENTID uniqueidentifier,
@NAME nvarchar(100),
@REFERENCENUMBER nvarchar(20),
@DESCRIPTION nvarchar(255),
@STARTDATE date,
@ENDDATE date,
@IDSETREGISTERID uniqueidentifier,
@UPDATEGIFTAIDSTATUS bit,
@TAXCLAIMNUMBER nvarchar(10),
@RUNGIFTAIDSPONSORSHIPSONLY bit,
@CURRENTAPPUSERID uniqueidentifier
)
as
set nocount on
declare @CURRENTDATE datetime
set @CURRENTDATE = getdate()
if @CHANGEAGENTID is null
exec dbo.USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output
if @STARTDATE > @ENDDATE
raiserror('BBERR_EDITR68_STARTDATEAFTERENDDATE', 13, 1)
declare @BUSINESSPROCESSCATALOGID uniqueidentifier = '5F83E4C6-7CAD-4b2c-95A6-506BB18130AB';
begin try
update dbo.R68 set
NAME = @NAME,
DESCRIPTION = @DESCRIPTION,
REFERENCENUMBER = @REFERENCENUMBER,
IDSETREGISTERID = @IDSETREGISTERID,
STARTDATE = @STARTDATE,
ENDDATE = @ENDDATE,
UPDATEGIFTAIDSTATUS = @UPDATEGIFTAIDSTATUS,
TAXCLAIMNUMBER = @TAXCLAIMNUMBER,
RUNGIFTAIDSPONSORSHIPSONLY = @RUNGIFTAIDSPONSORSHIPSONLY,
DATECHANGED = @CURRENTDATE,
CHANGEDBYID = @CHANGEAGENTID
where ID = @ID
end try
begin catch
exec dbo.USP_RAISE_ERROR
return 1
end catch
return 0;