[28.x] Deprecate SFTP connector

src/Apps/W1/External File Storage - SFTP Connector/App/Entitlements/ExtSFTPConnector.Entitlement.al

@@ -5,9 +5,10 @@
 
 namespace System.ExternalFileStorage;
 
+#pragma warning disable AL0432, AS0105
 entitlement "Ext. SFTP Connector"
 {
-
     ObjectEntitlements = "Ext. SFTP - Edit";
     Type = Implicit;
-}
+}
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPEdit.PermissionSet.al

@@ -5,13 +5,18 @@
 
 namespace System.ExternalFileStorage;
 
+#pragma warning disable AL0432, AS0105
 permissionset 4621 "Ext. SFTP - Edit"
 {
     Access = Public;
     Assignable = false;
     Caption = 'SFTP - Edit';
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
     IncludedPermissionSets = "Ext. SFTP - Read";
 
     Permissions =
         tabledata "Ext. SFTP Account" = imd;
 }
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPObjects.PermissionSet.al

@@ -5,13 +5,18 @@
 
 namespace System.ExternalFileStorage;
 
+#pragma warning disable AL0432, AS0105
 permissionset 4622 "Ext. SFTP - Objects"
 {
     Access = Public;
     Assignable = false;
     Caption = 'SFTP - Objects';
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
     Permissions =
         table "Ext. SFTP Account" = X,
         page "Ext. SFTP Account Wizard" = X,
         page "Ext. SFTP Account" = X;
 }
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPRead.PermissionSet.al

@@ -5,13 +5,18 @@
 
 namespace System.ExternalFileStorage;
 
+#pragma warning disable AL0432, AS0105
 permissionset 4623 "Ext. SFTP - Read"
 {
     Access = Public;
     Assignable = false;
     Caption = 'SFTP - Read';
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
     IncludedPermissionSets = "Ext. SFTP - Objects";
 
     Permissions =
         tabledata "Ext. SFTP Account" = r;
 }
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageAdminExtSFTP.PermissionSetExt.al

@@ -5,7 +5,9 @@
 
 namespace System.ExternalFileStorage;
 
+#pragma warning disable AL0432, AS0105
 permissionsetextension 4621 "File Storage - Admin - Ext. SFTP" extends "File Storage - Admin"
 {
     IncludedPermissionSets = "Ext. SFTP - Edit";
 }
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageEditExtSFTP.PermissionSetExt.al

@@ -5,7 +5,9 @@
 
 namespace System.ExternalFileStorage;
 
+#pragma warning disable AL0432, AS0105
 permissionsetextension 4622 "File Storage - Edit - Ext. SFTP" extends "File Storage - Edit"
 {
     IncludedPermissionSets = "Ext. SFTP - Read";
 }
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Page.al

@@ -8,6 +8,7 @@ namespace System.ExternalFileStorage;
 /// <summary>
 /// Displays an account that was registered via the SFTP connector.
 /// </summary>
+#pragma warning disable AL0432, AS0105
 page 4621 "Ext. SFTP Account"
 {
     ApplicationArea = All;
@@ -19,6 +20,9 @@ page 4621 "Ext. SFTP Account"
     Permissions = tabledata "Ext. SFTP Account" = rimd;
     SourceTable = "Ext. SFTP Account";
     UsageCategory = None;
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     layout
     {
@@ -158,4 +162,5 @@ page 4621 "Ext. SFTP Account"
         else
             CertificateStatusText := CertificateUploadedLbl;
     end;
-}
+}
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Table.al

@@ -11,10 +11,14 @@ using System.Utilities;
 /// <summary>
 /// Holds the information for all file accounts that are registered via the SFTP connector
 /// </summary>
+#pragma warning disable AL0432, AS0105
 table 4621 "Ext. SFTP Account"
 {
     Caption = 'SFTP Account';
     DataClassification = CustomerContent;
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     fields
     {
@@ -236,4 +240,5 @@ table 4621 "Ext. SFTP Account"
         CertificateBase64 := Base64Convert.ToBase64(InStr);
         exit(CertificateBase64);
     end;
-}
+}
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccountWizard.Page.al

@@ -10,6 +10,7 @@ using System.Environment;
 /// <summary>
 /// Displays an account that is being registered via the SFTP connector.
 /// </summary>
+#pragma warning disable AL0432, AS0105
 page 4622 "Ext. SFTP Account Wizard"
 {
     ApplicationArea = All;
@@ -20,6 +21,9 @@ page 4622 "Ext. SFTP Account Wizard"
     Permissions = tabledata "Ext. SFTP Account" = rimd;
     SourceTable = "Ext. SFTP Account";
     SourceTableTemporary = true;
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     layout
     {
@@ -240,4 +244,5 @@ page 4622 "Ext. SFTP Account Wizard"
         else
             CertificateStatusText := CertificateUploadedLbl;
     end;
-}
+}
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAuthType.Enum.al

@@ -12,6 +12,9 @@ enum 4621 "Ext. SFTP Auth Type"
 {
     Extensible = false;
     Access = Public;
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     /// <summary>
     /// Authenticate using password.

src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnector.EnumExt.al

@@ -8,6 +8,7 @@ namespace System.ExternalFileStorage;
 /// <summary>
 /// Enum extension to register the SFTP connector.
 /// </summary>
+#pragma warning disable AL0432, AS0105
 enumextension 4621 "Ext. SFTP Connector" extends "Ext. File Storage Connector"
 {
     /// <summary>
@@ -17,5 +18,9 @@ enumextension 4621 "Ext. SFTP Connector" extends "Ext. File Storage Connector"
     {
         Caption = 'SFTP';
         Implementation = "External File Storage Connector" = "Ext. SFTP Connector Impl";
+        ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+        ObsoleteState = Pending;
+        ObsoleteTag = '29.0';
     }
-}
+}
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnectorImpl.Codeunit.al

@@ -10,11 +10,15 @@ using System.SFTPClient;
 using System.Text;
 using System.Utilities;
 
+#pragma warning disable AL0432, AS0105
 codeunit 4621 "Ext. SFTP Connector Impl" implements "External File Storage Connector"
 {
     Access = Internal;
     InherentEntitlements = X;
     InherentPermissions = X;
+    ObsoleteReason = 'The SFTP connector is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
     Permissions = tabledata "Ext. SFTP Account" = rimd;
 
     var
@@ -494,4 +498,5 @@ codeunit 4621 "Ext. SFTP Connector Impl" implements "External File Storage Conne
 
         Account.ModifyAll(Disabled, true);
     end;
-}
+}
+#pragma warning restore AL0432, AS0105

src/Apps/W1/External File Storage - SFTP Connector/Test/src/ExtSFTPConnectorTest.Codeunit.al

@@ -9,6 +9,7 @@ using System.Environment;
 using System.ExternalFileStorage;
 using System.TestLibraries.Utilities;
 
+#pragma warning disable AL0432, AS0105
 codeunit 144591 "Ext. SFTP Connector Test"
 {
     Subtype = Test;
@@ -159,4 +160,5 @@ codeunit 144591 "Ext. SFTP Connector Test"
         Any: Codeunit Any;
         Assert: Codeunit "Library Assert";
         FileAccountMock: Codeunit "Ext. SFTP Account Mock";
-}
+}
+#pragma warning restore AL0432, AS0105

src/System Application/App/Permissions/SystemApplicationAdmin.PermissionSet.al

@@ -16,6 +16,7 @@ using System.MCP;
 using System.Privacy;
 using System.SFTPClient;
 
+#pragma warning disable AL0432, AS0105
 permissionset 154 "System Application - Admin"
 {
     Access = Internal;
@@ -42,3 +43,4 @@ permissionset 154 "System Application - Admin"
                              "TROUBLESHOOT TOOLS",
                              "VSC Intgr. - Admin";
 }
+#pragma warning restore AL0432, AS0105

src/System Application/App/SFTP Client/src/DotnetSFTPClient.Codeunit.al

@@ -7,11 +7,15 @@ namespace System.SFTPClient;
 
 using System;
 
+#pragma warning disable AL0432, AS0105
 codeunit 9760 "Dotnet SFTP Client" implements "ISFTP Client"
 {
     Access = Internal;
     InherentEntitlements = X;
     InherentPermissions = X;
+    ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     var
         [WithEvents]
@@ -259,4 +263,5 @@ codeunit 9760 "Dotnet SFTP Client" implements "ISFTP Client"
     begin
         FingerprintsMD5 := Fingerprints;
     end;
-}
+}
+#pragma warning restore AL0432, AS0105

src/System Application/App/SFTP Client/src/DotnetSFTPFile.Codeunit.al

@@ -7,11 +7,15 @@ namespace System.SFTPClient;
 
 using System;
 
+#pragma warning disable AL0432, AS0105
 codeunit 9761 "Dotnet SFTP File" implements "ISFTP File"
 {
     Access = Internal;
     InherentEntitlements = X;
     InherentPermissions = X;
+    ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     var
         RenciSFTPFile: DotNet RenciISftpFile;
@@ -58,4 +62,5 @@ codeunit 9761 "Dotnet SFTP File" implements "ISFTP File"
     begin
         RenciSFTPFile := NewFile;
     end;
-}
+}
+#pragma warning restore AL0432, AS0105

src/System Application/App/SFTP Client/src/ISFTPClient.Interface.al

@@ -7,9 +7,14 @@ namespace System.SFTPClient;
 
 using System;
 
+#pragma warning disable AL0432, AS0105
 interface "ISFTP Client"
 {
     Access = Internal;
+    ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
+
     procedure SftpClient(Host: Text; Port: Integer; UserName: Text; Password: SecretText): Boolean
     procedure SftpClient(Host: Text; Port: Integer; UserName: Text; PrivateKey: InStream): Boolean
     procedure SftpClient(HostName: Text; Port: Integer; Username: Text; PrivateKey: InStream; Passphrase: SecretText): Boolean
@@ -27,4 +32,5 @@ interface "ISFTP Client"
     procedure CreateDirectory(Path: Text): Boolean
     procedure SetSHA256Fingerprints(FingerPrints: List of [Text])
     procedure SetMD5Fingerprints(FingerPrints: List of [Text])
-}
+}
+#pragma warning restore AL0432, AS0105

src/System Application/App/SFTP Client/src/ISFTPFile.Interface.al

@@ -8,10 +8,14 @@ namespace System.SFTPClient;
 interface "ISFTP File"
 {
     Access = Public;
+    ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
+
     procedure MoveTo(Destination: Text): Boolean
     procedure Name(): Text
     procedure FullName(): Text
     procedure IsDirectory(): Boolean
     procedure Length(): BigInteger
     procedure LastWriteTime(): DateTime
-}
+}

src/System Application/App/SFTP Client/src/PermissionSets/SFTPAdmin.PermissionSet.al

@@ -4,12 +4,17 @@
 // ------------------------------------------------------------------------------------------------
 namespace System.SFTPClient;
 
+#pragma warning disable AL0432, AS0105
 permissionset 9762 "SFTP - Admin"
 {
     Access = Public;
     Assignable = true;
     Caption = 'SFTP - Admin';
+    ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     Permissions =
         page "SFTP Folder Content" = X;
-}
+}
+#pragma warning restore AL0432, AS0105

src/System Application/App/SFTP Client/src/SFTPClient.Codeunit.al

@@ -5,11 +5,15 @@
 
 namespace System.SFTPClient;
 
+#pragma warning disable AL0432, AS0105
 codeunit 9762 "SFTP Client"
 {
     Access = Public;
     InherentEntitlements = X;
     InherentPermissions = X;
+    ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.';
+    ObsoleteState = Pending;
+    ObsoleteTag = '29.0';
 
     /// <summary>
     /// Adds a SHA256 fingerprint to the list of accepted host key fingerprints.
@@ -202,4 +206,5 @@ codeunit 9762 "SFTP Client"
 
     var
         SFTPClientImplementation: Codeunit "SFTP Client Implementation";
-}
+}
+#pragma warning restore AL0432, AS0105