USP_DATAFORMTEMPLATE_ADD_REVALUECOMMITMENTSBUSINESS

The save procedure used by the add dataform template "Revalue Foreign-Denominated Commitments Business Process Add Form".

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier INOUT The output parameter indicating the ID of the record added.
@CHANGEAGENTID uniqueidentifier IN Input parameter indicating the ID of the change agent invoking the procedure.
@CURRENTAPPUSERID uniqueidentifier IN Input parameter indicating the ID of the current user.
@NAME nvarchar(100) IN Name
@DESCRIPTION nvarchar(255) IN Description
@REVALUEBYTYPECODE tinyint IN Revalue by:
@INCLUDEGRANTAWARDS bit IN Grant awards
@INCLUDEPLANNEDGIFTS bit IN Planned gifts
@INCLUDEPLEDGES bit IN Pledges
@INCLUDERECURRINGGIFTS bit IN Recurring gifts
@IDSETREGISTERID uniqueidentifier IN Selection
@CURRENCYEXCHANGERATEASOFTYPECODE tinyint IN Use rates as of:
@CURRENCYEXCHANGERATEASOFDATE date IN Date
@CURRENCYEXCHANGERATEASOFTIME time IN Time
@TIMEZONEENTRYID uniqueidentifier IN Time zone
@CURRENCYEXCHANGERATESOURCECODEID uniqueidentifier IN Source
@ADJUSTMENTDATE date IN Adjustment date
@ADJUSTMENTPOSTDATE date IN Adjustment post date
@ADJUSTMENTPOSTSTATUSCODE tinyint IN Adjustment post status
@ADJUSTMENTREASONCODEID uniqueidentifier IN Adjustment reason
@ADJUSTMENTREASON nvarchar(300) IN Adjustment details
@CREATEOUTPUTIDSET bit IN Create selection from results
@OUTPUTIDSETRECORDTYPEID uniqueidentifier IN Selection type
@OUTPUTIDSETNAME nvarchar(100) IN Selection name
@OVERWRITEOUTPUTIDSET bit IN Overwrite existing selection
@CREATEEXCEPTIONIDSET bit IN Create selection of exceptions
@EXCEPTIONIDSETNAME nvarchar(100) IN Selection name
@OVERWRITEEXCEPTIONIDSET bit IN Overwrite existing selection
@USEEXCHANGERATEDATEFORADJUSTMENTDATES bit IN Default dates to the same date from which exchange rates will be selected.
@SITEID uniqueidentifier IN Site
@INCLUDEINSTALLMENTPLANS bit IN

Definition

Copy

                CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_REVALUECOMMITMENTSBUSINESS
                (
                    @ID uniqueidentifier = null output,
                    @CHANGEAGENTID uniqueidentifier = null,
                    @CURRENTAPPUSERID uniqueidentifier,
                    @NAME nvarchar(100) = null,
                    @DESCRIPTION nvarchar(255) = null,
                    @REVALUEBYTYPECODE tinyint = 0,
                    @INCLUDEGRANTAWARDS bit = null,
                    @INCLUDEPLANNEDGIFTS bit = null,
                    @INCLUDEPLEDGES bit = null,
                    @INCLUDERECURRINGGIFTS bit = null,
                    @IDSETREGISTERID uniqueidentifier = null,
                    @CURRENCYEXCHANGERATEASOFTYPECODE tinyint = 0,
                    @CURRENCYEXCHANGERATEASOFDATE date = null,
                    @CURRENCYEXCHANGERATEASOFTIME time(0) = null,
                    @TIMEZONEENTRYID uniqueidentifier = null,
                    @CURRENCYEXCHANGERATESOURCECODEID uniqueidentifier = null,
                    @ADJUSTMENTDATE date = null,
                    @ADJUSTMENTPOSTDATE date = null,
                    @ADJUSTMENTPOSTSTATUSCODE tinyint = 1,
                    @ADJUSTMENTREASONCODEID uniqueidentifier,
                    @ADJUSTMENTREASON nvarchar(300) = null,
                    @CREATEOUTPUTIDSET bit = null,
                    @OUTPUTIDSETRECORDTYPEID uniqueidentifier = null,
                    @OUTPUTIDSETNAME nvarchar(100) = null,
                    @OVERWRITEOUTPUTIDSET bit = null,
                    @CREATEEXCEPTIONIDSET bit = null,
                    @EXCEPTIONIDSETNAME nvarchar(100) = null,
                    @OVERWRITEEXCEPTIONIDSET bit = null,
                    @USEEXCHANGERATEDATEFORADJUSTMENTDATES bit = 1,
                    @SITEID uniqueidentifier = null,
                    @INCLUDEINSTALLMENTPLANS bit = 0
                )
                as
                begin
                    set nocount on;

                    declare @CURRENTDATE datetime;

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

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

                    set @CURRENTDATE = getdate();

                    begin try
                        declare @CURRENCYEXCHANGERATEASOFDATETIME datetime = (cast(@CURRENCYEXCHANGERATEASOFDATE as datetime) +cast(@CURRENCYEXCHANGERATEASOFTIME as datetime));
                        declare @CURRENCYEXCHANGERATEASOFDATETIMEOFFSET datetimeoffset(3) = todatetimeoffset(@CURRENCYEXCHANGERATEASOFDATETIME, dbo.UFN_TIMEZONEENTRY_GETTIMEZONEOFFSETFROMUTC(@TIMEZONEENTRYID, @CURRENCYEXCHANGERATEASOFDATETIME, 0));

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

                        insert into dbo.REVALUECOMMITMENTSPROCESS
                        (
                            ID,
                            NAME,
                            DESCRIPTION,
                            REVALUEBYTYPECODE,
                            INCLUDEGRANTAWARDS,
                            INCLUDEPLANNEDGIFTS,
                            INCLUDEPLEDGES,
                            INCLUDERECURRINGGIFTS,
                            IDSETREGISTERID,
                            CURRENCYEXCHANGERATEASOFTYPECODE,
                            CURRENCYEXCHANGERATEASOFDATETIMEOFFSET,
                            TIMEZONEENTRYID,
                            CURRENCYEXCHANGERATESOURCECODEID,
                            ADJUSTMENTDATE,
                            ADJUSTMENTPOSTDATE,
                            ADJUSTMENTPOSTSTATUSCODE,
                            ADJUSTMENTREASONCODEID,
                            ADJUSTMENTREASON,
                            CREATEOUTPUTIDSET,
                            OUTPUTIDSETRECORDTYPEID,
                            OUTPUTIDSETNAME,
                            OVERWRITEOUTPUTIDSET,
                            CREATEEXCEPTIONIDSET,
                            EXCEPTIONIDSETNAME,
                            OVERWRITEEXCEPTIONIDSET,
                            ADDEDBYID,
                            CHANGEDBYID,
                            DATEADDED,
                            DATECHANGED,
                            USEEXCHANGERATEDATEFORADJUSTMENTDATES,
                            INCLUDEINSTALLMENTPLANS
                        )
                        values
                        (
                            @ID,
                            @NAME,
                            @DESCRIPTION,
                            @REVALUEBYTYPECODE,
                            @INCLUDEGRANTAWARDS,
                            @INCLUDEPLANNEDGIFTS,
                            @INCLUDEPLEDGES,
                            @INCLUDERECURRINGGIFTS,
                            @IDSETREGISTERID,
                            @CURRENCYEXCHANGERATEASOFTYPECODE,
                            @CURRENCYEXCHANGERATEASOFDATETIMEOFFSET,
                            @TIMEZONEENTRYID,
                            @CURRENCYEXCHANGERATESOURCECODEID,
                            @ADJUSTMENTDATE,
                            @ADJUSTMENTPOSTDATE,
                            @ADJUSTMENTPOSTSTATUSCODE,
                            @ADJUSTMENTREASONCODEID,
                            coalesce(@ADJUSTMENTREASON, N''),
                            @CREATEOUTPUTIDSET,
                            @OUTPUTIDSETRECORDTYPEID,
                            @OUTPUTIDSETNAME,
                            @OVERWRITEOUTPUTIDSET,
                            @CREATEEXCEPTIONIDSET,
                            @EXCEPTIONIDSETNAME,
                            @OVERWRITEEXCEPTIONIDSET,
                            @CHANGEAGENTID,
                            @CHANGEAGENTID,
                            @CURRENTDATE,
                            @CURRENTDATE,
                            @USEEXCHANGERATEDATEFORADJUSTMENTDATES,
                            COALESCE(@INCLUDEINSTALLMENTPLANS,0)
                        );

                        exec dbo.USP_BUSINESSPROCESSINSTANCE_ADD
                            @CHANGEAGENTID = @CHANGEAGENTID,
                            @BUSINESSPROCESSCATALOGID = '396acd18-86ca-40f5-831a-1ed6e1955fee',
                            @BUSINESSPROCESSPARAMETERSETID = @ID,
                            @OWNERID = @CURRENTAPPUSERID,
                            @SITEID = @SITEID;

                        return 0;

                    end try

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

                    return 0;
                end