USP_DATAFORMTEMPLATE_EDIT_BANKACCOUNTADJUSTMENTCATEGORY

The save procedure used by the edit dataform template "Bank Account Adjustment Category 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.
@CATEGORY	nvarchar(60)	IN	Category
@ADJUSTMENTFUZZYDATEID	uniqueidentifier	IN	Adjustment date
@AMOUNT	decimal(19, 4)	IN	Amount
@ADJUSTMENTTYPECODE	smallint	IN	Type
@DEFAULTREFERENCE	nvarchar(100)	IN	Reference
@POSTSTATUSCODE	smallint	IN	Post status
@POSTDATECODE	smallint	IN	Post date
@TRANSFERBANKACCOUNTID	uniqueidentifier	IN	Transfer account

Definition

Copy



                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_BANKACCOUNTADJUSTMENTCATEGORY (
                        @ID uniqueidentifier,
                        @CHANGEAGENTID uniqueidentifier = null,
                        @CATEGORY nvarchar(60),
                        @ADJUSTMENTFUZZYDATEID uniqueidentifier,
                        @AMOUNT decimal(19,4),
                        @ADJUSTMENTTYPECODE smallint,
                        @DEFAULTREFERENCE nvarchar(100),
                        @POSTSTATUSCODE smallint,
                        @POSTDATECODE smallint,
                        --@NOTES nvarchar(4000),

                        --@EFTSTATUSCODE smallint,

                        --@BANKACCOUNTNAME nvarchar(100),

                        --@IMPORTID nvarchar(100),

                        @TRANSFERBANKACCOUNTID uniqueidentifier
                    )
                    as

                        set nocount on;

                        -- Check GL business rule for this account system and set to 'Do not post' if needed.

                        -- ****

                        declare @PDACCOUNTSYSTEMID uniqueidentifier;
                        select @PDACCOUNTSYSTEMID = PDACCOUNTSYSTEMID 
                        from dbo.BANKACCOUNTADJUSTMENTCATEGORY as BAAC
                        inner join dbo.BANKACCOUNT as BA on BA.ID = BAAC.BANKACCOUNTID                        
                        where BAAC.ID = @ID;

                        declare @ALLOWGLDISTRIBUTIONS bit;
                        set @ALLOWGLDISTRIBUTIONS = dbo.UFN_PDACCOUNTSYSTEM_ALLOWGLDISTRIBUTIONS(@PDACCOUNTSYSTEMID);
                        if @ALLOWGLDISTRIBUTIONS = 0 
                            begin
                                set @POSTSTATUSCODE = 2        -- Do not post

                                set @POSTDATECODE = null
                            end
                        -- ****                                        


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

                        declare @CURRENTDATE datetime
                        set @CURRENTDATE = getdate()

                        if @POSTDATECODE is null
                            set @POSTDATECODE = 0

                        begin try
                            -- handle updating the data

                            update dbo.BANKACCOUNTADJUSTMENTCATEGORY set
                                CATEGORY=@CATEGORY,
                                ADJUSTMENTFUZZYDATEID=@ADJUSTMENTFUZZYDATEID,
                                AMOUNT=@AMOUNT,
                                ADJUSTMENTTYPECODE=@ADJUSTMENTTYPECODE,
                                DEFAULTREFERENCE=@DEFAULTREFERENCE,
                                POSTSTATUSCODE=@POSTSTATUSCODE,
                                POSTDATECODE=@POSTDATECODE,
                                --NOTES=@NOTES,

                                TRANSFERBANKACCOUNTID=@TRANSFERBANKACCOUNTID,
                                --EFTSTATUSCODE=@EFTSTATUSCODE,

                                --IMPORTID=@IMPORTID,

                                --BANKACCOUNTNAME=@BANKACCOUNTNAME,

                                CHANGEDBYID = @CHANGEAGENTID,
                                DATECHANGED = @CURRENTDATE
                            where ID = @ID
                        end try
                        begin catch
                            exec dbo.USP_RAISE_ERROR
                            return 1
                        end catch

                    return 0;