Page 804 Online Map Parameter Setup, source in 29
Source29
src/Layers/W1/BaseApp/eServices/OnlineMap/OnlineMapParameterSetup.Page.al118 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.eServices.OnlineMap;
page 804 "Online Map Parameter Setup"
{
Caption = 'Online Map Parameter Setup';
PageType = List;
SourceTable = "Online Map Parameter Setup";
layout
{
area(content)
{
repeater(Control1)
{
ShowCaption = false;
field("Code"; Rec.Code)
{
ApplicationArea = Basic, Suite;
}
field(Name; Rec.Name)
{
ApplicationArea = Basic, Suite;
}
field("Map Service"; Rec."Map Service")
{
ApplicationArea = Basic, Suite;
}
field("Directions Service"; Rec."Directions Service")
{
ApplicationArea = Basic, Suite;
}
field("Directions from Location Serv."; Rec."Directions from Location Serv.")
{
ApplicationArea = Basic, Suite;
}
field("URL Encode Non-ASCII Chars"; Rec."URL Encode Non-ASCII Chars")
{
ApplicationArea = Basic, Suite;
}
field("Miles/Kilometers Option List"; Rec."Miles/Kilometers Option List")
{
ApplicationArea = Basic, Suite;
}
field("Quickest/Shortest Option List"; Rec."Quickest/Shortest Option List")
{
ApplicationArea = Basic, Suite;
}
field(Comment; Rec.Comment)
{
ApplicationArea = Comments;
ExtendedDatatype = URL;
}
}
}
area(factboxes)
{
part("Online Map Substitution Parameter"; "Online Map Parameter FactBox")
{
ApplicationArea = Basic, Suite;
Caption = 'Online Map Substitution Parameter';
}
systempart(Control1900383207; Links)
{
ApplicationArea = RecordLinks;
Visible = false;
}
systempart(Control1905767507; Notes)
{
ApplicationArea = Notes;
Visible = true;
}
}
}
actions
{
area(processing)
{
action("&Insert Default")
{
ApplicationArea = Basic, Suite;
Caption = '&Insert Default';
Image = Insert;
ToolTip = 'Insert default settings for the online map. This will overwrite any settings you may have.';
trigger OnAction()
begin
Rec.InsertDefaults();
end;
}
}
area(Promoted)
{
group(Category_Process)
{
Caption = 'Process';
actionref("&Insert Default_Promoted"; "&Insert Default")
{
}
}
}
}
trigger OnOpenPage()
var
OnlineMapParameterSetup: Record "Online Map Parameter Setup";
begin
if OnlineMapParameterSetup.IsEmpty() then
OnlineMapParameterSetup.InsertDefaults();
end;
}