Page 444 Reminder/Fin. Charge Entries, source in 29
Source29
src/Layers/W1/BaseApp/Sales/FinanceCharge/ReminderFinChargeEntries.Page.al119 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.Sales.FinanceCharge;
/// <summary>
/// Displays a historical list of reminder and finance charge entries with navigation capabilities.
/// </summary>
page 444 "Reminder/Fin. Charge Entries"
{
ApplicationArea = Suite;
Caption = 'Reminder/Fin. Charge Entries';
Editable = false;
PageType = List;
SourceTable = "Reminder/Fin. Charge Entry";
UsageCategory = History;
layout
{
area(content)
{
repeater(Control1)
{
ShowCaption = false;
field("Posting Date"; Rec."Posting Date")
{
ApplicationArea = Basic, Suite;
}
field(Type; Rec.Type)
{
ApplicationArea = Basic, Suite;
}
field("No."; Rec."No.")
{
ApplicationArea = Basic, Suite;
}
field("Customer Entry No."; Rec."Customer Entry No.")
{
ApplicationArea = Basic, Suite;
}
field("Document Type"; Rec."Document Type")
{
ApplicationArea = Basic, Suite;
}
field("Document No."; Rec."Document No.")
{
ApplicationArea = Basic, Suite;
}
field("Interest Posted"; Rec."Interest Posted")
{
ApplicationArea = Basic, Suite;
}
field("Remaining Amount"; Rec."Remaining Amount")
{
ApplicationArea = Basic, Suite;
}
field("Reminder Level"; Rec."Reminder Level")
{
ApplicationArea = Basic, Suite;
}
field(Canceled; Rec.Canceled)
{
ApplicationArea = Basic, Suite;
}
field("Entry No."; Rec."Entry No.")
{
ApplicationArea = Basic, Suite;
}
}
}
area(factboxes)
{
systempart(Control1900383207; Links)
{
ApplicationArea = RecordLinks;
Visible = false;
}
systempart(Control1905767507; Notes)
{
ApplicationArea = Notes;
Visible = false;
}
}
}
actions
{
area(processing)
{
action("&Navigate")
{
ApplicationArea = Suite;
Caption = 'Find entries...';
Image = Navigate;
ShortCutKey = 'Ctrl+Alt+Q';
ToolTip = 'Find entries and documents that exist for the document number and posting date on the selected document. (Formerly this action was named Navigate.)';
trigger OnAction()
begin
Rec.Navigate();
end;
}
}
area(Promoted)
{
group(Category_Process)
{
Caption = 'Process';
actionref("&Navigate_Promoted"; "&Navigate")
{
}
}
}
}
}