USP_DATAFORMTEMPLATE_EDITSAVE_WPAFFLUENCEINDICATOR

The save procedure used by the edit dataform template "WealthPoint Affluence Indicator 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.
@SOURCE	nvarchar(100)	IN	Source
@PHONE	nvarchar(20)	IN	Phone
@GENDERCODE	nvarchar(6)	IN	Gender
@MULTIMILLN	nvarchar(25)	IN	Millionaire code
@WEALTHIND	nvarchar(1000)	IN	Wealth indicators
@RPASSETS	money	IN	Retirement plan assets
@FULLNAME	nvarchar(100)	IN	Name
@CNOTES	nvarchar(1024)	IN	Notes

Definition

Copy



                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDITSAVE_WPAFFLUENCEINDICATOR  (
                        @ID uniqueidentifier,
                        @CHANGEAGENTID uniqueidentifier = null,
                        @SOURCE nvarchar(100),
                        @PHONE nvarchar(20),
                        @GENDERCODE nvarchar(6),
                        @MULTIMILLN nvarchar(25),
                        @WEALTHIND nvarchar(1000),
                        @RPASSETS money,
                        @FULLNAME nvarchar(100),
                        @CNOTES nvarchar(1024)
                    ) as begin

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

                        update dbo.WPAFFLUENCEINDICATOR set
                            CHANGEDBYID = @CHANGEAGENTID,
                            DATECHANGED = getdate(),
                            SOURCE = @SOURCE,
                            PHONE = @PHONE,
                            GENDERCODE = @GENDERCODE,
                            MULTIMILLN = @MULTIMILLN,
                            WEALTHIND = @WEALTHIND,
                            RPASSETS = @RPASSETS,
                            FULLNAME = @FULLNAME,
                            CNOTES = @CNOTES
                        where
                            ID=@ID;

                        if    (select
                                count(WEALTHSOURCE.SOURCE)
                            from
                                dbo.WEALTHSOURCE
                            where
                                WEALTHSOURCE.SOURCE = @SOURCE
                            ) = 0
                            begin
                                insert into dbo.WEALTHSOURCE (
                                    [SOURCE],
                                    [ISBUILTIN],
                                    [ADDEDBYID],
                                    [CHANGEDBYID]
                                )values(
                                    @SOURCE,
                                    0,
                                    @CHANGEAGENTID,
                                    @CHANGEAGENTID
                                );
                            end

                        declare @WEALTHID uniqueidentifier;
                        select @WEALTHID=WEALTHID from dbo.WPAFFLUENCEINDICATOR where ID=@ID;

                        exec dbo.USP_WEALTHPOINT_UPDATEWEALTHSUMMARY_AFFLUENCEINDICATOR @WEALTHID, @CHANGEAGENTID;
                        exec dbo.USP_WEALTHCAPACITY_UPDATE @WEALTHID, @CHANGEAGENTID;

                        return 0;

                    end;