Page 982 Payment Registration Setup

App
Base Application
Namespace
Microsoft.Bank.Payment
Versions
17-28
Source table
980

Versions171819202122232425262728

Source29

Source in 29

src/Layers/W1/BaseApp/Bank/Payment/PaymentRegistrationSetup.Page.al93 lines, Copyright (c) Microsoft Corporation. MIT

// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace Microsoft.Bank.Payment;

/// <summary>
/// Page 982 "Payment Registration Setup" provides configuration interface for payment registration functionality.
/// This page allows users to set up journal templates, batch names, and balancing accounts for payment processing.
/// </summary>
/// <remarks>
/// Source table: Payment Registration Setup. Used for configuring user-specific defaults
/// for payment registration including journal settings and automation preferences.
/// </remarks>
page 982 "Payment Registration Setup"
{
    ApplicationArea = Basic, Suite;
    Caption = 'Payment Registration Setup';
    DataCaptionExpression = PageCaptionVariable;
    DeleteAllowed = false;
    InsertAllowed = false;
    PageType = StandardDialog;
    SourceTable = "Payment Registration Setup";
    UsageCategory = Administration;

    layout
    {
        area(content)
        {
            group(General)
            {
                Caption = 'General';
                InstructionalText = 'Select which balancing account you want to register the payment to, as well as which journal template to use.';
                field("Journal Template Name"; Rec."Journal Template Name")
                {
                    ApplicationArea = Basic, Suite;
                }
                field("Journal Batch Name"; Rec."Journal Batch Name")
                {
                    ApplicationArea = Basic, Suite;
                }
                field("Bal. Account Type"; Rec."Bal. Account Type")
                {
                    ApplicationArea = Basic, Suite;
                    Caption = 'Balancing Account Type';
                }
                field("Bal. Account No."; Rec."Bal. Account No.")
                {
                    ApplicationArea = Basic, Suite;
                    Caption = 'Balancing Account';
                }
                field("Use this Account as Def."; Rec."Use this Account as Def.")
                {
                    ApplicationArea = Basic, Suite;
                    Caption = 'Use this Account as Default';
                    ToolTip = 'Specifies if the account in the Bal. Account No. field is used for all payments.';
                }
                field("Auto Fill Date Received"; Rec."Auto Fill Date Received")
                {
                    ApplicationArea = Basic, Suite;
                    Caption = 'Automatically Fill Date Received';
                }
            }
        }
    }

    actions
    {
    }

    trigger OnOpenPage()
    begin
        if not Rec.Get(UserId()) then begin
            if Rec.Get() then;

            Rec."User ID" := CopyStr(UserId(), 1, MaxStrLen(Rec."User ID"));
            Rec.Insert();
        end;

        PageCaptionVariable := '';
    end;

    trigger OnQueryClosePage(CloseAction: Action): Boolean
    begin
        if CloseAction = ACTION::LookupOK then
            exit(Rec.ValidateMandatoryFields(true));
    end;

    var
        PageCaptionVariable: Text[10];
}