USP_DATAFORMTEMPLATE_EDIT_PLEDGEWRITEOFFPROCESS_4

Parameters

Parameter	Parameter Type	Mode
@ID	uniqueidentifier	IN
@CHANGEAGENTID	uniqueidentifier	IN
@NAME	nvarchar(100)	IN
@DESCRIPTION	nvarchar(255)	IN
@IDSETREGISTERID	uniqueidentifier	IN
@REASON	nvarchar(300)	IN
@POSTSTATUSCODE	tinyint	IN
@POSTDATE	datetime	IN
@CREATEOUTPUTIDSET	bit	IN
@OUTPUTIDSETNAME	nvarchar(100)	IN
@OVERWRITEOUTPUTIDSET	bit	IN
@REASONCODEID	uniqueidentifier	IN
@CURRENTAPPUSERID	uniqueidentifier	IN
@SITEID	uniqueidentifier	IN
@RECOGNITIONCREDITADJUSTMENTCODE	tinyint	IN
Definition

Copy


                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_PLEDGEWRITEOFFPROCESS_4
                    (
                        @ID uniqueidentifier,
                        @CHANGEAGENTID uniqueidentifier = null,
                        @NAME nvarchar(100), 
                        @DESCRIPTION nvarchar(255), 
                        @IDSETREGISTERID uniqueidentifier,
                        @REASON nvarchar(300),
                        @POSTSTATUSCODE tinyint,
                        @POSTDATE datetime,
                        @CREATEOUTPUTIDSET bit,
                        @OUTPUTIDSETNAME nvarchar(100), 
                        @OVERWRITEOUTPUTIDSET bit,
                        @REASONCODEID uniqueidentifier,
                        @CURRENTAPPUSERID uniqueidentifier,
                        @SITEID uniqueidentifier,
                        @RECOGNITIONCREDITADJUSTMENTCODE tinyint
                    )
                    as
                    begin
                        set nocount on;

                        declare @CURRENTDATE datetime;
                        declare @IDSETREGISTERSITEID uniqueidentifier;

                        if @ID is null
                            set @ID = NewID();

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

                        set @CURRENTDATE = GetDate();

                        begin try
                            if (@SITEID is not null) 
                            begin
                                    if dbo.UFN_SITEALLOWEDFORUSER(@CURRENTAPPUSERID, @SITEID) = 0 
                                    begin
                                            raiserror ('ERR_SITE_NOACCESS',13,1);
                                            return 1;
                                    end
                            end

                            set @IDSETREGISTERSITEID = (select SITEID from dbo.IDSETREGISTER where ID = @IDSETREGISTERID);

                            if dbo.UFN_SITEALLOWEDFORUSER(@CURRENTAPPUSERID, @IDSETREGISTERSITEID) = 0 
                            begin
                                    raiserror ('ERR_SELECTION_NOACCESS',13,1);
                                    return 1;
                            end

                            update
                                dbo.PLEDGEWRITEOFFPROCESS
                            set
                                NAME = @NAME, 
                                IDSETREGISTERID = @IDSETREGISTERID, 
                                DESCRIPTION = @DESCRIPTION,
                                REASON = @REASON,
                                POSTDATE = @POSTDATE,
                                POSTSTATUSCODE = @POSTSTATUSCODE,
                                CREATEOUTPUTIDSET = @CREATEOUTPUTIDSET,
                                OUTPUTIDSETNAME = @OUTPUTIDSETNAME, 
                                OVERWRITEOUTPUTIDSET = @OVERWRITEOUTPUTIDSET,
                                REASONCODEID = @REASONCODEID,
                                CHANGEDBYID = @CHANGEAGENTID,
                                DATECHANGED = @CURRENTDATE,
                                RECOGNITIONCREDITADJUSTMENTCODE = @RECOGNITIONCREDITADJUSTMENTCODE
                            where
                                ID = @ID;    

                                update 
                                    dbo.BUSINESSPROCESSINSTANCE 
                                set 
                                    SITEID = @SITEID,
                                    CHANGEDBYID = @CHANGEAGENTID,
                                    DATECHANGED = @CURRENTDATE
                                    where 
                                        BUSINESSPROCESSINSTANCE.BUSINESSPROCESSPARAMETERSETID = @ID
                                        and BUSINESSPROCESSINSTANCE.BUSINESSPROCESSCATALOGID = '17CC2C7F-8B70-4A07-A0E7-164060D215F5'
                                        and (BUSINESSPROCESSINSTANCE.SITEID <> @SITEID 
                                                or BUSINESSPROCESSINSTANCE.SITEID is null and @SITEID is not null 
                                                or BUSINESSPROCESSINSTANCE.SITEID is not null and @SITEID is null);
                        end try

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

                        return 0;
                    end