USP_DATAFORMTEMPLATE_EDITLOAD_CREDITCARDPROCESSING

The load procedure used by the edit dataform template "Credit Card Processing 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.
@NAME	nvarchar(100)	INOUT	Name
@DESCRIPTION	nvarchar(255)	INOUT	Description
@BATCHID	uniqueidentifier	INOUT	Batch
@MERCHANTACCOUNTID	uniqueidentifier	INOUT	Account
@IDSETREGISTERID	uniqueidentifier	INOUT	Selection
@CUTOFFDATE	datetime	INOUT	Include transactions on or before
@BATCHTEMPLATEID	uniqueidentifier	INOUT	Payment batch template
@TRANSACTIONTYPECODE	tinyint	INOUT	Transaction types
@OWNERID	uniqueidentifier	INOUT	Payment batch owner
@DUEDATETYPECODE	tinyint	INOUT	Payments due on or before
@DAYSAFTER	int	INOUT	Days after this process runs
@REVENUERECORDTYPEID	uniqueidentifier	INOUT
@WILLRESUME	bit	INOUT	Will resume
@CURRENTAPPUSERID	uniqueidentifier	IN	Input parameter indicating the ID of the current user.
@PDACCOUNTSYSTEMID	uniqueidentifier	INOUT	Associated account system
@SHOWACCOUNTSYSTEM	bit	INOUT	Show account system
@MERCHANTACCOUNTS	xml	INOUT	Accounts
@CONSOLIDATEPAYMENTS	bit	INOUT	Consolidate multiple commitments to a single payment by constituent
@PERMANENTREJECTIONBEHAVIORTYPECODE	tinyint	INOUT
@PROVISIONALREJECTIONBEHAVIORTYPECODE	tinyint	INOUT
@PERMANENTREJECTIONEXPORTDEFINITIONID	uniqueidentifier	INOUT
@CREATEPERMANENTREJECTIONIDSET	bit	INOUT
@PERMANENTREJECTIONIDSETNAME	nvarchar(100)	INOUT
@OVERWRITEPERMANENTREJECTIONIDSET	bit	INOUT
@PROVISIONALREJECTIONMAXATTEMPTS	tinyint	INOUT
@REJECTIONRECORDTYPEID	uniqueidentifier	INOUT
@VALIDATEPROJECTEDBATCHTOTALS	bit	INOUT
@SITEID	uniqueidentifier	INOUT

Definition

Copy



                CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDITLOAD_CREDITCARDPROCESSING
                (
                    @ID uniqueidentifier,
                    @DATALOADED bit = 0 output,
                    @TSLONG bigint = 0 output,
                    @NAME nvarchar(100) = null output,
                    @DESCRIPTION nvarchar(255) = null output,
                    @BATCHID uniqueidentifier = null output,
                    @MERCHANTACCOUNTID uniqueidentifier = null output,
                    @IDSETREGISTERID uniqueidentifier = null output,
                    @CUTOFFDATE datetime = null output,
                    @BATCHTEMPLATEID uniqueidentifier = null output,
                    @TRANSACTIONTYPECODE tinyint = null output,
                    @OWNERID uniqueidentifier = null output,
                    @DUEDATETYPECODE tinyint = null output,
                    @DAYSAFTER integer = null output,
                    @REVENUERECORDTYPEID uniqueidentifier = null output,
                    @WILLRESUME bit = null output,
                    @CURRENTAPPUSERID uniqueidentifier,
                    @PDACCOUNTSYSTEMID uniqueidentifier = null output,
                    @SHOWACCOUNTSYSTEM bit = null output,
                    @MERCHANTACCOUNTS xml = null output,
                    @CONSOLIDATEPAYMENTS bit = null output,
                    @PERMANENTREJECTIONBEHAVIORTYPECODE tinyint = null output,
                    @PROVISIONALREJECTIONBEHAVIORTYPECODE tinyint = null output,
                    @PERMANENTREJECTIONEXPORTDEFINITIONID uniqueidentifier = null output,
                    @CREATEPERMANENTREJECTIONIDSET bit = null output,
                    @PERMANENTREJECTIONIDSETNAME nvarchar(100) = null output,
                    @OVERWRITEPERMANENTREJECTIONIDSET bit = null output,
                    @PROVISIONALREJECTIONMAXATTEMPTS tinyint = null output,
                    @REJECTIONRECORDTYPEID uniqueidentifier = null output,
                    @VALIDATEPROJECTEDBATCHTOTALS bit = null output,
                    @SITEID uniqueidentifier = null output
                )
                as
                    set nocount on

                    select
                        @NAME = CREDITCARDPROCESSING.NAME,
                        @DESCRIPTION = CREDITCARDPROCESSING.DESCRIPTION,
                        @BATCHID = CREDITCARDPROCESSING.BATCHID,
                        @MERCHANTACCOUNTID = CREDITCARDPROCESSING.MERCHANTACCOUNTID,
                        @TSLONG = CREDITCARDPROCESSING.TSLONG,
                        @DATALOADED = 1,
                        @IDSETREGISTERID = CREDITCARDPROCESSING.IDSETREGISTERID,
                        @CUTOFFDATE = CREDITCARDPROCESSING.CUTOFFDATE,
                        @BATCHTEMPLATEID = CREDITCARDPROCESSING.BATCHTEMPLATEID,
                        @TRANSACTIONTYPECODE = CREDITCARDPROCESSING.TRANSACTIONTYPECODE,
                        @OWNERID = CREDITCARDPROCESSING.OWNERID,
                        @DUEDATETYPECODE = CREDITCARDPROCESSING.DUEDATETYPECODE,
                        @DAYSAFTER = CREDITCARDPROCESSING.DAYSAFTER,
                        @WILLRESUME = 
                        case
                            when exists (select * from dbo.UFN_CREDITCARDPROCESSING_GETRESUMEINFO(CREDITCARDPROCESSING.BATCHID)) then cast(1 as bit)
                            else cast(0 as bit)
                        end,
                        @PDACCOUNTSYSTEMID = CREDITCARDPROCESSING.PDACCOUNTSYSTEMID,
                        @CONSOLIDATEPAYMENTS = CREDITCARDPROCESSING.CONSOLIDATEPAYMENTS,
                        @PERMANENTREJECTIONBEHAVIORTYPECODE = CREDITCARDPROCESSING.PERMANENTREJECTIONBEHAVIORTYPECODE,
                        @PROVISIONALREJECTIONBEHAVIORTYPECODE = CREDITCARDPROCESSING.PROVISIONALREJECTIONBEHAVIORTYPECODE,
                        @PERMANENTREJECTIONEXPORTDEFINITIONID = CREDITCARDPROCESSING.PERMANENTREJECTIONEXPORTDEFINITIONID,
                        @CREATEPERMANENTREJECTIONIDSET = CREDITCARDPROCESSING.CREATEPERMANENTREJECTIONIDSET,
                        @PERMANENTREJECTIONIDSETNAME = CREDITCARDPROCESSING.PERMANENTREJECTIONIDSETNAME,
                        @OVERWRITEPERMANENTREJECTIONIDSET = CREDITCARDPROCESSING.OVERWRITEPERMANENTREJECTIONIDSET,
                        @PROVISIONALREJECTIONMAXATTEMPTS = CREDITCARDPROCESSING.PROVISIONALREJECTIONMAXATTEMPTS,
                        @VALIDATEPROJECTEDBATCHTOTALS = CREDITCARDPROCESSING.VALIDATEPROJECTEDBATCHTOTALS,
                        @SITEID = BUSINESSPROCESSINSTANCE.SITEID
                    from dbo.CREDITCARDPROCESSING
                    left join dbo.BUSINESSPROCESSINSTANCE 
                                on  BUSINESSPROCESSINSTANCE.BUSINESSPROCESSPARAMETERSETID = CREDITCARDPROCESSING.ID
                                and BUSINESSPROCESSINSTANCE.BUSINESSPROCESSCATALOGID = '8C1E67B1-FB82-4C44-AB03-417D7E70CE94'
                    where CREDITCARDPROCESSING.ID = @ID;

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

                    select @REJECTIONRECORDTYPEID = ID
                    from dbo.RECORDTYPE 
                    where upper(NAME) = 'CREDIT CARD PROCESSING OUTPUT';

                    set @SHOWACCOUNTSYSTEM = 0;
                    if dbo.UFN_VALID_BASICGL_INSTALLED() != 0 and dbo.UFN_PDACCOUNTSYSTEM_GETNUMBEROFSYSTEMSFORUSER(@CURRENTAPPUSERID) > 1
                        set @SHOWACCOUNTSYSTEM = 1;

                    --JamesWill WI150280 2011-05-09 Don't show the user merchant accounts if the user doesn't have site access to them

                    set @MERCHANTACCOUNTS  = 
                        (    select 
                                [M].ID, 
                                [M].CURRENCYID, 
                                case 
                                    when dbo.UFN_APPUSER_ISSYSADMIN(@CURRENTAPPUSERID) = 1 or 
                                         dbo.UFN_MERCHANTACCOUNT_USERHASSITEACCESS([M].MERCHANTACCOUNTID, @CURRENTAPPUSERID, '7b2fa1cf-913c-4835-b596-60f119d43df3', 1) = 1 then    
                                        [M].MERCHANTACCOUNTID 
                                    else 
                                        null
                                end as MERCHANTACCOUNTID
                            from dbo.UFN_CREDITCARDPROCESSING_GETMERCHANTACCOUNTS(@ID) [M]
                            for xml raw('ITEM'),type,elements,root('MERCHANTACCOUNTS'),BINARY BASE64
                        );

                    return 0