USP_DELETE_WEALTHCAPACITYFORMULA

Executes the "Wealth Capacity Formula: Delete" record operation.

Parameters

Parameter	Parameter Type	Mode	Description
@ID	uniqueidentifier	IN	Input parameter indicating the ID of the record being deleted.
@CHANGEAGENTID	uniqueidentifier	IN	Input parameter indicating the ID of the change agent invoking the delete.
@CURRENTAPPUSERID	uniqueidentifier	IN	Input parameter indicating the ID of the current user.

Definition

Copy



                    create procedure dbo.USP_DELETE_WEALTHCAPACITYFORMULA (
                        @ID uniqueidentifier,
                        @CHANGEAGENTID uniqueidentifier,
                        @CURRENTAPPUSERID uniqueidentifier
                    ) as
                        set nocount on;

                        if (select
                            TODELETE.ISDEFAULT
                        from
                            dbo.WEALTHCAPACITYFORMULA [TODELETE]
                        where
                            TODELETE.ID = @ID) = 1
                        begin
                            raiserror ('ERR_DEFAULT_WEALTHCAPACITYFORMULA_DELETE',13,1);
                            return 0;
                        end

                        declare @USERCANMODIFY bit;
                        set @USERCANMODIFY = 0;

                        select
                            @USERCANMODIFY = 1
                        from
                            dbo.WEALTHCAPACITYFORMULA WCF
                        where
                            WCF.ID = @ID and
                            (WCF.OTHERSCANMODIFY = 1 or
                             WCF.OWNERID = @CURRENTAPPUSERID or
                             WCF.OWNERID is null or
                             dbo.UFN_APPUSER_ISSYSADMIN(@CURRENTAPPUSERID) = 1);

                        if @USERCANMODIFY = 1 begin                    
                            exec dbo.USP_WEALTHCAPACITYFORMULA_DELETEBYID_WITHCHANGEAGENTID @ID, @CHANGEAGENTID;
                        end
                        else begin
                            raiserror ('ERR_WEALTHCAPACITYFORMULA_CANNOTMODIFY',13,1);
                            return 0;
                        end

                        return 0;