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..a222f414f1 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) @@ -466,7 +466,7 @@ page 9451 "File Account Wizard" AppSourceTok: Label 'AppSource'; ExtensionManagementTok: Label 'Extension Management'; FileCategoryLbl: Label 'File', Locked = true; - LearnMoreURLTxt: Label 'https://go.microsoft.com/fwlink/?linkid=2134520', Locked = true; //FIXME + LearnMoreURLTxt: Label 'https://go.microsoft.com/fwlink/?linkid=2134520', Locked = true; //TODO Replace with correct URL to new documentation LearnMoreTok: Label 'Learn more'; NoLimitTxt: Label 'No limit'; AccountCreationSuccessfullyCompletedDurationLbl: Label 'Successful creation of account completed. Duration: %1 milliseconds.', Comment = '%1 - Duration', Locked = true; 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