USP_DATAFORMTEMPLATE_EDIT_FEE

The save procedure used by the edit dataform template "Fee 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.
@NAME	nvarchar(100)	IN	Name
@DESCRIPTION	nvarchar(255)	IN	Description
@APPLIESTOCODE	tinyint	IN	Applies to
@TYPECODE	tinyint	IN	Calculation type
@AMOUNT	money	IN	Value
@PERCENT	decimal(5, 2)	IN	Value

Definition

Copy



                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_FEE
                    (
                        @ID uniqueidentifier,
                        @CHANGEAGENTID uniqueidentifier = null,
                        @NAME nvarchar(100),
                        @DESCRIPTION nvarchar(255),
                        @APPLIESTOCODE tinyint,
                        @TYPECODE tinyint,
                        @AMOUNT money,
                        @PERCENT decimal(5,2)
                    )
                    as
                        set nocount on;

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

                        if @TYPECODE = 0
                            set @PERCENT = 0;
                        else if @TYPECODE = 1
                            set @AMOUNT = 0;

                        declare @CURRENTDATE datetime;
                        set @CURRENTDATE = getdate();

                        begin try

                            if @APPLIESTOCODE = 0 and exists (select 1 from dbo.PROGRAMFEE where FEEID = @ID)
                                raiserror('ERR_PROGRAMFEE', 13, 1);

                            update dbo.FEE set
                                NAME = @NAME,
                                [DESCRIPTION] = @DESCRIPTION,
                                APPLIESTOCODE = @APPLIESTOCODE,
                                TYPECODE = @TYPECODE,
                                AMOUNT = @AMOUNT,
                                [PERCENT] = @PERCENT,
                                CHANGEDBYID = @CHANGEAGENTID,
                                DATECHANGED = @CURRENTDATE
                            where
                                ID = @ID;

                        end try

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

                        return 0;