USP_DATAFORMTEMPLATE_EDITLOAD_RECEIVABLEPAYMENTCREDITAPPLICATIONS

The load procedure used by the edit dataform template "Receivable Payment Credit Applications Edit Data 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.
@APPLICATIONS	xml	INOUT
@AMOUNTREMAINING	money	INOUT	Amount left to apply
@TRANSACTIONTYPE	nvarchar(50)	INOUT

Definition

Copy


                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDITLOAD_RECEIVABLEPAYMENTCREDITAPPLICATIONS
                    (
                        @ID uniqueidentifier,
                        @DATALOADED bit = 0 output,
                        @TSLONG bigint = 0 output,
                        @APPLICATIONS xml = null output,
                        @AMOUNTREMAINING money = null output,
                        @TRANSACTIONTYPE nvarchar(50) = null output
                    )
                    as
                        set nocount on;

                        set @DATALOADED = 0
                        set @TSLONG = 0

                        declare @RECEIVABLEPAYMENTCREDITLINEITEMID uniqueidentifier;
                        select top 1 @RECEIVABLEPAYMENTCREDITLINEITEMID = FINANCIALTRANSACTIONLINEITEM.ID,
                                        @TRANSACTIONTYPE = FINANCIALTRANSACTION.TYPE
                        from FINANCIALTRANSACTION
                            inner join FINANCIALTRANSACTIONLINEITEM
                                on FINANCIALTRANSACTION.ID = FINANCIALTRANSACTIONLINEITEM.FINANCIALTRANSACTIONID
                        where (FINANCIALTRANSACTION.ID = @ID) and
                                (FINANCIALTRANSACTIONLINEITEM.DELETEDON is null) and
                                (FINANCIALTRANSACTIONLINEITEM.TYPECODE = 0);

                        select   
                            @DATALOADED = 1,
                            @APPLICATIONS = dbo.UFN_RECEIVABLEPAYMENTCREDITAPPLICATIONS_TOITEMLISTXML(@RECEIVABLEPAYMENTCREDITLINEITEMID, null, 1),
                            @AMOUNTREMAINING = FINANCIALTRANSACTIONLINEITEM_RECEIVABLEPAYMENTCREDIT.TRANSACTIONAMOUNT - sum(isnull(FINANCIALTRANSACTIONLINEITEM_APPLICATION.TRANSACTIONAMOUNT, 0))
                        from dbo.FINANCIALTRANSACTIONLINEITEM as FINANCIALTRANSACTIONLINEITEM_RECEIVABLEPAYMENTCREDIT
                            left outer join dbo.FINANCIALTRANSACTIONLINEITEM as FINANCIALTRANSACTIONLINEITEM_APPLICATION
                                on (FINANCIALTRANSACTIONLINEITEM_APPLICATION.SOURCELINEITEMID = FINANCIALTRANSACTIONLINEITEM_RECEIVABLEPAYMENTCREDIT.ID) and
                                    (FINANCIALTRANSACTIONLINEITEM_APPLICATION.DELETEDON is null)
                        where (FINANCIALTRANSACTIONLINEITEM_RECEIVABLEPAYMENTCREDIT.ID = @RECEIVABLEPAYMENTCREDITLINEITEMID)
                        group by FINANCIALTRANSACTIONLINEITEM_RECEIVABLEPAYMENTCREDIT.TRANSACTIONAMOUNT;

                        select @TSLONG = max(FINANCIALTRANSACTIONLINEITEM_APPLICATION.TSLONG)
                        from dbo.FINANCIALTRANSACTIONLINEITEM as FINANCIALTRANSACTIONLINEITEM_APPLICATION
                        where (FINANCIALTRANSACTIONLINEITEM_APPLICATION.SOURCELINEITEMID = @ID);

                        return 0;