USP_DATAFORMTEMPLATE_PRELOAD_ADD_POSTTOGLPROCESSTREASURY

The load procedure used by the edit dataform template "Post to GL Process For Basic GL Add Form"

Parameters

Parameter	Parameter Type	Mode	Description
@REVENUERECORDTYPEID	uniqueidentifier	INOUT
@DEPOSITRECORDTYPEID	uniqueidentifier	INOUT
@ADJUSTMENTRECORDTYPEID	uniqueidentifier	INOUT
@CURRENTAPPUSERID	uniqueidentifier	IN	Input parameter indicating the ID of the current user.
@PDACCOUNTSYSTEMID	uniqueidentifier	INOUT	Account system
@SHOWACCOUNTSYSTEM	bit	INOUT	Show account system
@BANKACCOUNTS	xml	INOUT
@DEPOSITTEMPLATES	xml	INOUT
@TRANSACTIONTYPES	xml	INOUT
@LASTDAYOFTHISPERIOD	date	INOUT
@LASTDAYOFLASTPERIOD	date	INOUT
@FENXTPDACCOUNTSYSTEMIDS	xml	INOUT

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_PRELOAD_ADD_POSTTOGLPROCESSTREASURY
(
    @REVENUERECORDTYPEID uniqueidentifier = null output,
    @DEPOSITRECORDTYPEID uniqueidentifier = null output,
    @ADJUSTMENTRECORDTYPEID uniqueidentifier = null output,
    @CURRENTAPPUSERID uniqueidentifier,
    @PDACCOUNTSYSTEMID uniqueidentifier = null output,
    @SHOWACCOUNTSYSTEM bit = null output,
    @BANKACCOUNTS xml = null output,
    @DEPOSITTEMPLATES xml = null output,
    @TRANSACTIONTYPES xml = null output,
    @LASTDAYOFTHISPERIOD date = null output,
    @LASTDAYOFLASTPERIOD date = null output,
    @FENXTPDACCOUNTSYSTEMIDS xml = null output
)
as
    set nocount on;
    select 
        @REVENUERECORDTYPEID = ID 
    from 
        dbo.RECORDTYPE 
    where 
        upper(NAME) = 'REVENUE';

    select @DEPOSITRECORDTYPEID = ID from dbo.RECORDTYPE where upper(NAME) = 'BANK ACCOUNT DEPOSIT';

    select @ADJUSTMENTRECORDTYPEID = ID from dbo.RECORDTYPE where upper(NAME) = 'BANK ACCOUNT ADJUSTMENT';

    if dbo.UFN_VALID_BASICGL_INSTALLED() != 0
        begin
            if dbo.UFN_PDACCOUNTSYSTEM_GETNUMBEROFSYSTEMSFORUSER(@CURRENTAPPUSERID) = 1
                begin
                    set @SHOWACCOUNTSYSTEM = 0
                    select @PDACCOUNTSYSTEMID =  T1.ID from dbo.UFN_PDACCOUNTSYSTEM_GETSYSTEMIDSFORUSER(@CURRENTAPPUSERID) as T1
                end 
            else
                begin
                    set @SHOWACCOUNTSYSTEM = 1        
                    set @PDACCOUNTSYSTEMID = dbo.UFN_PDACCOUNTSYSTEM_GETDEFAULTSYSTEMIDSFORUSER(@CURRENTAPPUSERID)
                end 
      set @FENXTPDACCOUNTSYSTEMIDS = dbo.UFN_FENXT_INTEGRATEDPDACCOUNTSYSTEMS_TOITEMLISTXML()
        end
    else
        begin
            set @SHOWACCOUNTSYSTEM = 0
            set @PDACCOUNTSYSTEMID = '4B121C2C-CCE6-440D-894C-EA0DEF80D50B'
        end

    set @BANKACCOUNTS = dbo.UFN_POST_BANKACCOUNTS_TOITEMLISTXML(null);
    set @DEPOSITTEMPLATES = dbo.UFN_POST_DEPOSITTEMPLATES_TOITEMLISTXML(null);
    set @TRANSACTIONTYPES = dbo.UFN_POST_TRANSACTIONTYPES_TOITEMLISTXML(null);

    declare @TODAY date = CAST(getdate() as date)
    select @LASTDAYOFTHISPERIOD = P.ENDDATE, @LASTDAYOFLASTPERIOD = DATEADD("d", -1, P.STARTDATE) from dbo.GLFISCALPERIOD P where P.STARTDATE <= @TODAY and P.ENDDATE >= @TODAY

    return 0;