From cf851754c659effe004f5c00069a22520bb1b3e9 Mon Sep 17 00:00:00 2001
From: Thomas Williamson
Date: Thu, 12 Dec 2024 14:05:04 +0100
Subject: [PATCH] Fix spelling errors in group names and enum references across
multiple files
---
.../App/Email/src/Account/EmailAccountWizard.Page.al | 2 +-
.../App/File System/src/Account/FileAccountWizard.Page.al | 2 +-
.../App/File System/src/Lookup/FileAccountBrowser.Page.al | 7 +++----
.../src/Lookup/FileAccountBrowserMgt.Codeunit.al | 6 +++---
.../App/File System/src/Lookup/FileAccountContent.Table.al | 1 +
...countEntryType.Enum.al => FileAccountEntryType.Enum.al} | 2 +-
.../File System/src/Scenario/FileAccountScenario.Table.al | 2 +-
.../File System/src/Scenario/FileScenarioImpl.Codeunit.al | 2 +-
.../App/File System/src/Scenario/FileScenarioSetup.Page.al | 2 +-
9 files changed, 13 insertions(+), 13 deletions(-)
rename src/System Application/App/File System/src/Scenario/{FileAcountEntryType.Enum.al => FileAccountEntryType.Enum.al} (93%)
diff --git a/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al b/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al
index 4f6251618b..e2e9c1b36c 100644
--- a/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al
+++ b/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al
@@ -161,7 +161,7 @@ page 8886 "Email Account Wizard"
}
}
- group(NoConnectrosAvailableGroup)
+ group(NoConnectorsAvailableGroup)
{
Visible = ChooseConnectorVisible and not ConnectorsAvailable;
label(NoConnectorsAvailable)
diff --git a/src/System Application/App/File System/src/Account/FileAccountWizard.Page.al b/src/System Application/App/File System/src/Account/FileAccountWizard.Page.al
index 3129bad5a7..7a8611c5e9 100644
--- a/src/System Application/App/File System/src/Account/FileAccountWizard.Page.al
+++ b/src/System Application/App/File System/src/Account/FileAccountWizard.Page.al
@@ -143,7 +143,7 @@ page 9451 "File Account Wizard"
}
}
- group(NoConnectrosAvailableGroup)
+ group(NoConnectorsAvailableGroup)
{
Visible = ChooseConnectorVisible and not ConnectorsAvailable;
label(NoConnectorsAvailable)
diff --git a/src/System Application/App/File System/src/Lookup/FileAccountBrowser.Page.al b/src/System Application/App/File System/src/Lookup/FileAccountBrowser.Page.al
index b247200e1d..47b04c1fe1 100644
--- a/src/System Application/App/File System/src/Lookup/FileAccountBrowser.Page.al
+++ b/src/System Application/App/File System/src/Lookup/FileAccountBrowser.Page.al
@@ -39,11 +39,11 @@ page 9455 "File Account Browser"
trigger OnDrillDown()
begin
case true of
- (Rec.Name = '..'):
+ Rec.Name = '..':
BrowseFolder(Rec."Parent Directory");
- (Rec.Type = Rec.Type::Directory):
+ Rec.Type = Rec.Type::Directory:
BrowseFolder(Rec);
- (not IsInLookupMode):
+ not IsInLookupMode:
FileAccountBrowserMgt.DownloadFile(Rec);
end;
end;
@@ -56,7 +56,6 @@ page 9455 "File Account Browser"
group(SaveFileNameGroup)
{
- Caption = '', Locked = true;
ShowCaption = false;
Visible = ShowFileName;
diff --git a/src/System Application/App/File System/src/Lookup/FileAccountBrowserMgt.Codeunit.al b/src/System Application/App/File System/src/Lookup/FileAccountBrowserMgt.Codeunit.al
index abcfe1247d..78eb9f454a 100644
--- a/src/System Application/App/File System/src/Lookup/FileAccountBrowserMgt.Codeunit.al
+++ b/src/System Application/App/File System/src/Lookup/FileAccountBrowserMgt.Codeunit.al
@@ -104,9 +104,9 @@ codeunit 9458 "File Account Browser Mgt."
until FileAccountContentToAdd.Next() = 0;
FileAccountContent.Init();
- FileAccountContent.Name := '..';
- FileAccountContent.Type := FileAccountContent.Type::Directory;
- FileAccountContent."Parent Directory" := CopyStr(FileSystem.GetParentPath(CurrentPath), 1, MaxStrLen(FileAccountContent."Parent Directory"));
+ FileAccountContent.Validate(Name, '..');
+ FileAccountContent.Validate(Type, FileAccountContent.Type::Directory);
+ FileAccountContent.Validate("Parent Directory", CopyStr(FileSystem.GetParentPath(CurrentPath), 1, MaxStrLen(FileAccountContent."Parent Directory")));
FileAccountContent.Insert();
end;
diff --git a/src/System Application/App/File System/src/Lookup/FileAccountContent.Table.al b/src/System Application/App/File System/src/Lookup/FileAccountContent.Table.al
index 8f4bdd6091..6fb75aa393 100644
--- a/src/System Application/App/File System/src/Lookup/FileAccountContent.Table.al
+++ b/src/System Application/App/File System/src/Lookup/FileAccountContent.Table.al
@@ -10,6 +10,7 @@ table 9455 "File Account Content"
Caption = 'File Account Content';
DataClassification = SystemMetadata;
TableType = Temporary;
+ Extensible = false;
fields
{
diff --git a/src/System Application/App/File System/src/Scenario/FileAcountEntryType.Enum.al b/src/System Application/App/File System/src/Scenario/FileAccountEntryType.Enum.al
similarity index 93%
rename from src/System Application/App/File System/src/Scenario/FileAcountEntryType.Enum.al
rename to src/System Application/App/File System/src/Scenario/FileAccountEntryType.Enum.al
index c71f60eac9..66075c3dad 100644
--- a/src/System Application/App/File System/src/Scenario/FileAcountEntryType.Enum.al
+++ b/src/System Application/App/File System/src/Scenario/FileAccountEntryType.Enum.al
@@ -5,7 +5,7 @@
namespace System.FileSystem;
-enum 9453 "File Acount Entry Type"
+enum 9453 "File Account Entry Type"
{
Access = Internal;
Extensible = false;
diff --git a/src/System Application/App/File System/src/Scenario/FileAccountScenario.Table.al b/src/System Application/App/File System/src/Scenario/FileAccountScenario.Table.al
index 230b2190a3..df2b42746f 100644
--- a/src/System Application/App/File System/src/Scenario/FileAccountScenario.Table.al
+++ b/src/System Application/App/File System/src/Scenario/FileAccountScenario.Table.al
@@ -22,7 +22,7 @@ table 9453 "File Account Scenario"
field(3; "Account Id"; Guid) { }
field(4; "Display Name"; Text[2048]) { }
field(5; Default; Boolean) { }
- field(6; EntryType; Enum "File Acount Entry Type") { }
+ field(6; EntryType; Enum "File Account Entry Type") { }
field(7; Position; Integer) { }
}
diff --git a/src/System Application/App/File System/src/Scenario/FileScenarioImpl.Codeunit.al b/src/System Application/App/File System/src/Scenario/FileScenarioImpl.Codeunit.al
index 7300cc7e3b..b25983fce9 100644
--- a/src/System Application/App/File System/src/Scenario/FileScenarioImpl.Codeunit.al
+++ b/src/System Application/App/File System/src/Scenario/FileScenarioImpl.Codeunit.al
@@ -153,7 +153,7 @@ codeunit 9453 "File Scenario Impl."
FileAccountScenarios.SetCurrentKey("Display Name"); // sort scenarios by "Display Name"
end;
- local procedure AddEntry(var FileAccountScenario: Record "File Account Scenario"; EntryType: Enum "File Acount Entry Type"; Scenario: Integer; AccountId: Guid; FileSystemConnector: Enum "File System Connector"; DisplayName: Text[2048]; Default: Boolean; var Position: Integer)
+ local procedure AddEntry(var FileAccountScenario: Record "File Account Scenario"; EntryType: Enum "File Account Entry Type"; Scenario: Integer; AccountId: Guid; FileSystemConnector: Enum "File System Connector"; DisplayName: Text[2048]; Default: Boolean; var Position: Integer)
begin
// Add entry to the File Account Scenario while maintaining the position so that the tree represents the data correctly
FileAccountScenario.Init();
diff --git a/src/System Application/App/File System/src/Scenario/FileScenarioSetup.Page.al b/src/System Application/App/File System/src/Scenario/FileScenarioSetup.Page.al
index 8b0a9cc15a..39095e82cc 100644
--- a/src/System Application/App/File System/src/Scenario/FileScenarioSetup.Page.al
+++ b/src/System Application/App/File System/src/Scenario/FileScenarioSetup.Page.al
@@ -181,7 +181,7 @@ page 9452 "File Scenario Setup"
FileAccountId: Guid;
FileConnector: Enum "File System Connector";
Style, DefaultTxt : Text;
- TypeOfEntry: Enum "File Acount Entry Type";
+ TypeOfEntry: Enum "File Account Entry Type";
Indentation: Integer;
CanUserManageFileSetup: Boolean;
}
\ No newline at end of file