Page 369 Order Address List, source in 29
Source29
src/Layers/W1/BaseApp/Purchases/Vendor/OrderAddressList.Page.al121 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.Purchases.Vendor;
page 369 "Order Address List"
{
Caption = 'Order Address List';
CardPageID = "Order Address";
DataCaptionFields = "Vendor No.";
Editable = false;
PageType = List;
SourceTable = "Order Address";
layout
{
area(content)
{
repeater(Control1)
{
ShowCaption = false;
field("Code"; Rec.Code)
{
ApplicationArea = Basic, Suite;
}
field(Name; Rec.Name)
{
ApplicationArea = Basic, Suite;
ToolTip = 'Specifies the company name for the order address.';
}
field("Name 2"; Rec."Name 2")
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field(Address; Rec.Address)
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field("Address 2"; Rec."Address 2")
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field("Post Code"; Rec."Post Code")
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field(City; Rec.City)
{
ApplicationArea = Basic, Suite;
}
field("Country/Region Code"; Rec."Country/Region Code")
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field("Phone No."; Rec."Phone No.")
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field("Fax No."; Rec."Fax No.")
{
ApplicationArea = Basic, Suite;
Visible = false;
}
field(Contact; Rec.Contact)
{
ApplicationArea = Basic, Suite;
Visible = false;
}
}
}
area(factboxes)
{
systempart(Control1900383207; Links)
{
ApplicationArea = RecordLinks;
Visible = false;
}
systempart(Control1905767507; Notes)
{
ApplicationArea = Notes;
Visible = false;
}
}
}
actions
{
area(navigation)
{
group("&Address")
{
Caption = '&Address';
Image = Addresses;
separator(Action1102601001)
{
}
action("Online Map")
{
ApplicationArea = Basic, Suite;
Caption = 'Online Map';
Image = Map;
ToolTip = 'View the address on an online map.';
trigger OnAction()
begin
Rec.DisplayMap();
end;
}
}
}
}
}