USP_DATAFORMTEMPLATE_ADD_COMMENTS

The save procedure used by the add dataform template "Comments Add Form".

Parameters

Parameter	Parameter Type	Mode	Description
@ID	uniqueidentifier	INOUT	The output parameter indicating the ID of the record added.
@CHANGEAGENTID	uniqueidentifier	IN	Input parameter indicating the ID of the change agent invoking the procedure.
@COMMENTTEXT	nvarchar(1000)	IN	Commenttext
@AUTHORNAME	nvarchar(100)	IN	Authorname
@AUTHORCONSTITUENTID	uniqueidentifier	IN	Authorconstituentid
@EVENTID	uniqueidentifier	IN	Eventid
@REFERENCEID	uniqueidentifier	IN	Referenceid
@REFERENCETYPECODE	tinyint	IN	Referencetype

Definition

Copy


CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_COMMENTS
(
    @ID uniqueidentifier = null output,
    @CHANGEAGENTID uniqueidentifier = null,
    @COMMENTTEXT nvarchar(1000),
    @AUTHORNAME nvarchar(100),
    @AUTHORCONSTITUENTID uniqueidentifier = null,
    @EVENTID uniqueidentifier,
    @REFERENCEID uniqueidentifier,
    @REFERENCETYPECODE tinyint = 0
)
as

set nocount on;

if @ID is null
    set @ID = newid()

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

declare @CURRENTDATE datetime
set @CURRENTDATE = getdate()

begin try
    -- handle inserting the data
    insert into dbo.COMMENT_TEXT
        (ID, COMMENTTEXT, AUTHORNAME, AUTHORCONSTITUENTID, EVENTID, REFERENCEID, REFERENCETYPECODE, ADDEDBYID, CHANGEDBYID, DATEADDED, DATECHANGED)
    values
        (@ID, @COMMENTTEXT, @AUTHORNAME, @AUTHORCONSTITUENTID, @EVENTID, @REFERENCEID, @REFERENCETYPECODE, @CHANGEAGENTID, @CHANGEAGENTID, @CURRENTDATE, @CURRENTDATE)
end try

begin catch
    exec dbo.USP_RAISE_ERROR
    return 1
end catch


return 0