USP_DATAFORMTEMPLATE_EDITLOAD_REVALUECOMMITMENTSBUSINESS

The load procedure used by the edit dataform template "Revalue Foreign-Denominated Commitments Business Process Edit Form"

Parameters

Parameter	Parameter Type	Mode	Description
@ID	uniqueidentifier	IN	The input ID parameter used to load the fields defined on the form.
@DATALOADED	bit	INOUT	Output parameter indicating whether or not data was actually loaded.
@TSLONG	bigint	INOUT	Output parameter indicating the TSLONG value of the record being edited. This is used to manage multi-user concurrency issues when multiple users access the same record.
@DEFAULTTIMEZONEENTRYID	uniqueidentifier	INOUT	Default time zone
@RECORDTYPEID	uniqueidentifier	INOUT	Record type ID
@NAME	nvarchar(100)	INOUT	Name
@DESCRIPTION	nvarchar(255)	INOUT	Description
@REVALUEBYTYPECODE	tinyint	INOUT	Revalue by:
@INCLUDEGRANTAWARDS	bit	INOUT	Grant awards
@INCLUDEPLANNEDGIFTS	bit	INOUT	Planned gifts
@INCLUDEPLEDGES	bit	INOUT	Pledges
@INCLUDERECURRINGGIFTS	bit	INOUT	Recurring gifts
@IDSETREGISTERID	uniqueidentifier	INOUT	Selection
@CURRENCYEXCHANGERATEASOFTYPECODE	tinyint	INOUT	Use rates as of:
@CURRENCYEXCHANGERATEASOFDATE	date	INOUT	Date
@CURRENCYEXCHANGERATEASOFTIME	time	INOUT	Time
@TIMEZONEENTRYID	uniqueidentifier	INOUT	Time zone
@CURRENCYEXCHANGERATESOURCECODEID	uniqueidentifier	INOUT	Source
@ADJUSTMENTDATE	date	INOUT	Adjustment date
@ADJUSTMENTPOSTDATE	date	INOUT	Adjustment post date
@ADJUSTMENTPOSTSTATUSCODE	tinyint	INOUT	Adjustment post status
@ADJUSTMENTREASONCODEID	uniqueidentifier	INOUT	Adjustment reason
@ADJUSTMENTREASON	nvarchar(300)	INOUT	Adjustment details
@CREATEOUTPUTIDSET	bit	INOUT	Create selection from results
@OUTPUTIDSETRECORDTYPEID	uniqueidentifier	INOUT	Selection type
@OUTPUTIDSETNAME	nvarchar(100)	INOUT	Selection name
@OVERWRITEOUTPUTIDSET	bit	INOUT	Overwrite existing selection
@CREATEEXCEPTIONIDSET	bit	INOUT	Create selection of exceptions
@EXCEPTIONIDSETNAME	nvarchar(100)	INOUT	Selection name
@OVERWRITEEXCEPTIONIDSET	bit	INOUT	Overwrite existing selection
@USEEXCHANGERATEDATEFORADJUSTMENTDATES	bit	INOUT	Default dates to the same date from which exchange rates will be selected.
@CURRENTAPPUSERID	uniqueidentifier	IN	Input parameter indicating the ID of the current user.
@SITEID	uniqueidentifier	INOUT	Site
@INCLUDEINSTALLMENTPLANS	bit	INOUT

Definition

Copy


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

                    set @DATALOADED = 0;

                    declare @BUSINESSPROCESSCATALOGID uniqueidentifier = '396ACD18-86CA-40F5-831A-1ED6E1955FEE';

                    select 
                        @DATALOADED = 1,
                        @TSLONG = REVALUECOMMITMENTSPROCESS.TSLONG,
                        @NAME = REVALUECOMMITMENTSPROCESS.NAME,
                        @DESCRIPTION = REVALUECOMMITMENTSPROCESS.DESCRIPTION,
                        @REVALUEBYTYPECODE = REVALUECOMMITMENTSPROCESS.REVALUEBYTYPECODE,
                        @INCLUDEGRANTAWARDS = REVALUECOMMITMENTSPROCESS.INCLUDEGRANTAWARDS,
                        @INCLUDEPLANNEDGIFTS = REVALUECOMMITMENTSPROCESS.INCLUDEPLANNEDGIFTS,
                        @INCLUDEPLEDGES = REVALUECOMMITMENTSPROCESS.INCLUDEPLEDGES,
                        @INCLUDERECURRINGGIFTS = REVALUECOMMITMENTSPROCESS.INCLUDERECURRINGGIFTS,
                        @IDSETREGISTERID = REVALUECOMMITMENTSPROCESS.IDSETREGISTERID,
                        @CURRENCYEXCHANGERATEASOFTYPECODE = REVALUECOMMITMENTSPROCESS.CURRENCYEXCHANGERATEASOFTYPECODE,
                        @CURRENCYEXCHANGERATEASOFDATE = cast(REVALUECOMMITMENTSPROCESS.CURRENCYEXCHANGERATEASOFDATETIMEOFFSET as date),
                        @CURRENCYEXCHANGERATEASOFTIME = cast(REVALUECOMMITMENTSPROCESS.CURRENCYEXCHANGERATEASOFDATETIMEOFFSET as time(0)),
                        @TIMEZONEENTRYID = REVALUECOMMITMENTSPROCESS.TIMEZONEENTRYID,
                        @CURRENCYEXCHANGERATESOURCECODEID = REVALUECOMMITMENTSPROCESS.CURRENCYEXCHANGERATESOURCECODEID,
                        @ADJUSTMENTDATE = REVALUECOMMITMENTSPROCESS.ADJUSTMENTDATE,
                        @ADJUSTMENTPOSTDATE = REVALUECOMMITMENTSPROCESS.ADJUSTMENTPOSTDATE,
                        @ADJUSTMENTPOSTSTATUSCODE = REVALUECOMMITMENTSPROCESS.ADJUSTMENTPOSTSTATUSCODE,
                        @ADJUSTMENTREASONCODEID = REVALUECOMMITMENTSPROCESS.ADJUSTMENTREASONCODEID,
                        @ADJUSTMENTREASON = REVALUECOMMITMENTSPROCESS.ADJUSTMENTREASON,
                        @CREATEOUTPUTIDSET = REVALUECOMMITMENTSPROCESS.CREATEOUTPUTIDSET,
                        @OUTPUTIDSETRECORDTYPEID = REVALUECOMMITMENTSPROCESS.OUTPUTIDSETRECORDTYPEID,
                        @OUTPUTIDSETNAME = REVALUECOMMITMENTSPROCESS.OUTPUTIDSETNAME,
                        @OVERWRITEOUTPUTIDSET = REVALUECOMMITMENTSPROCESS.OVERWRITEOUTPUTIDSET,
                        @CREATEEXCEPTIONIDSET = REVALUECOMMITMENTSPROCESS.CREATEEXCEPTIONIDSET,
                        @EXCEPTIONIDSETNAME = REVALUECOMMITMENTSPROCESS.EXCEPTIONIDSETNAME,
                        @OVERWRITEEXCEPTIONIDSET = REVALUECOMMITMENTSPROCESS.OVERWRITEEXCEPTIONIDSET,
                        @USEEXCHANGERATEDATEFORADJUSTMENTDATES = REVALUECOMMITMENTSPROCESS.USEEXCHANGERATEDATEFORADJUSTMENTDATES,
                        @SITEID = BUSINESSPROCESSINSTANCE.SITEID,
                        @INCLUDEINSTALLMENTPLANS = REVALUECOMMITMENTSPROCESS.INCLUDEINSTALLMENTPLANS
                    from 
                        dbo.REVALUECOMMITMENTSPROCESS
                    left join dbo.BUSINESSPROCESSINSTANCE 
                        on  BUSINESSPROCESSINSTANCE.BUSINESSPROCESSPARAMETERSETID = REVALUECOMMITMENTSPROCESS.ID
                        and BUSINESSPROCESSINSTANCE.BUSINESSPROCESSCATALOGID = @BUSINESSPROCESSCATALOGID
                    where
                        REVALUECOMMITMENTSPROCESS.ID = @ID;

                    if @DATALOADED = 1
                    begin
                        select
                            @RECORDTYPEID = RECORDTYPE.ID
                        from
                            dbo.RECORDTYPE
                        where
                            upper(RECORDTYPE.NAME) = N'REVENUE';

                        set @DEFAULTTIMEZONEENTRYID = dbo.UFN_TIMEZONEENTRY_GETSYSTEMDEFAULT();
                    end

                    return 0;