USP_DATAFORMTEMPLATE_ADD_PRELOAD_RECOGNITIONPROGRAM

The load procedure used by the edit dataform template "Recognition Program Add Data Form"

Parameters

Parameter	Parameter Type	Mode	Description
@RECORDTYPEID	uniqueidentifier	INOUT
@CURRENTAPPUSERID	uniqueidentifier	IN	Input parameter indicating the ID of the current user.
@SITEREQUIRED	bit	INOUT	Site Required
@SITEID	uniqueidentifier	INOUT	Site
@BASECURRENCYID	uniqueidentifier	INOUT	Base currency
@RECOGNITIONCREDITTYPES	xml	INOUT	Recognition credit types

Definition

Copy



                CREATE procedure dbo.USP_DATAFORMTEMPLATE_ADD_PRELOAD_RECOGNITIONPROGRAM
                    (
                        @RECORDTYPEID uniqueidentifier = null output,
                        @CURRENTAPPUSERID uniqueidentifier,
                        @SITEREQUIRED bit = null output,
                        @SITEID uniqueidentifier = null output,
                        @BASECURRENCYID uniqueidentifier = null output,
                        @RECOGNITIONCREDITTYPES xml = null output
                    )
                    as
                    begin
                        set nocount on;

                        select 
                            @RECORDTYPEID = ID
                        from 
                            dbo.RECORDTYPE 
                        where 
                            upper(NAME) = 'REVENUE';

                        set @SITEREQUIRED = dbo.UFN_SITEREQUIREDFORUSER(@CURRENTAPPUSERID)
                        set @SITEID=dbo.UFN_APPUSER_DEFAULTSITEFORUSER(@CURRENTAPPUSERID)

                        select
                            @BASECURRENCYID = CURRENCYSET.BASECURRENCYID
                        from dbo.CURRENCYSET
                        where ID = dbo.UFN_CURRENCYSET_GETAPPUSERCURRENCYSET(@CURRENTAPPUSERID);

                        set @RECOGNITIONCREDITTYPES =  (select newid() as ID, 
                                                       REVENUERECOGNITIONTYPECODE.ID as REVENUERECOGNITIONTYPECODEID
                                                       from dbo.REVENUERECOGNITIONTYPECODE
                                                       order by 
                                                            case when dbo.UFN_GETLISTSORTMETHOD('REVENUERECOGNITIONTYPECODE') = 0
                                                            then row_number() over(order by REVENUERECOGNITIONTYPECODE.DESCRIPTION)
                                                            else REVENUERECOGNITIONTYPECODE.SEQUENCE end
                                                       for xml raw('ITEM'),type,elements,root('RECOGNITIONCREDITTYPES'),BINARY BASE64)

                        return 0;
                    end