USP_DATAFORMTEMPLATE_EDIT_DISBURSEMENTPROCESSEDITSELECTION

The save procedure used by the edit dataform template "Disbursement Process Filters 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.
@FILTERCODE	tinyint	IN	Include
@DUEDATE	datetime	IN	Due dates on or before
@INCLUDEDISCOUNTS	bit	IN	Include invoices with discounts
@DISCOUNTEXPIRATIONDATE	datetime	IN	Discount expiration dates on or before
@DISCOUNTASOFDATE	datetime	IN	Calculate discounts as of
@IDSETREGISTERID	uniqueidentifier	IN	Selection

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_DISBURSEMENTPROCESSEDITSELECTION (
    @ID uniqueidentifier
    ,@CHANGEAGENTID uniqueidentifier = null
    ,@FILTERCODE tinyint
    ,@DUEDATE datetime
    ,@INCLUDEDISCOUNTS bit    
    ,@DISCOUNTEXPIRATIONDATE datetime
    ,@DISCOUNTASOFDATE datetime
    ,@IDSETREGISTERID uniqueidentifier
)
as
    set nocount on;

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

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

    begin try
        if @INCLUDEDISCOUNTS = 0
            set @DISCOUNTEXPIRATIONDATE = null;

        -- handle updating the data

        update dbo.DISBURSEMENTPROCESS set
            FILTERCODE = @FILTERCODE
            ,DISCOUNTASOFDATE = @DISCOUNTASOFDATE
            ,DUEDATE = @DUEDATE
      ,DISCOUNTDATE = @DISCOUNTEXPIRATIONDATE
            ,IDSETREGISTERID = @IDSETREGISTERID
            -- Standard

            ,CHANGEDBYID = @CHANGEAGENTID
            ,DATECHANGED = @CURRENTDATE
        where ID = @ID;

        exec USP_DISBURSEMENTPROCESS_RELOAD @ID = @ID, @CHANGEAGENTID = @CHANGEAGENTID;

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

return 0;