USP_DATAFORMTEMPLATE_EDITLOAD_PDACCOUNTCODEMAPDEVELOPMENT_INTERCURRENCY

The load procedure used by the edit dataform template "Development Intercurrency 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.
@PDACCOUNTSYSTEMID	uniqueidentifier	INOUT	Account system
@GLACCOUNTID	uniqueidentifier	INOUT	Account
@TYPESELECTED	tinyint	INOUT	Debit/Credit
@PDACCOUNTSEGMENTVALUEID	uniqueidentifier	INOUT	Account code

Definition

Copy


CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDITLOAD_PDACCOUNTCODEMAPDEVELOPMENT_INTERCURRENCY(
  @ID uniqueidentifier,
  @DATALOADED bit = 0 output,
  @TSLONG bigint = 0 output,
    @PDACCOUNTSYSTEMID uniqueidentifier = null output,
    @GLACCOUNTID uniqueidentifier = null output,
  @TYPESELECTED tinyint = null output,
    @PDACCOUNTSEGMENTVALUEID uniqueidentifier = null output
)
as

    set nocount on;

    -- be sure to set these, in case the select returns no rows
    set @DATALOADED = 0
    set @TSLONG = 0

    -- populate the output parameters, which correspond to fields on the form.  Note that
    -- we set @DATALOADED = 1 to indicate that the load was successful.  Otherwise, the system
    -- will display a "no data loaded" message.  Also note that we fetch the TSLONG so that concurrency
    -- can be considered.
    select
        @DATALOADED = 1,
        @TSLONG = TSLONG,
        @GLACCOUNTID = CREDITGLACCOUNTID,
        @PDACCOUNTSEGMENTVALUEID = CREDITPDACCOUNTSEGMENTVALUEID,
    @TYPESELECTED = CASE WHEN CREDITGLACCOUNTID is null then 1 else 0 end,
        @PDACCOUNTSYSTEMID = PDACCOUNTSYSTEMID    
    from dbo.PDACCOUNTCODEMAPPING
    where ID = @ID

    return 0;