diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/Entitlements/ExtSFTPConnector.Entitlement.al b/src/Apps/W1/External File Storage - SFTP Connector/App/Entitlements/ExtSFTPConnector.Entitlement.al index 0c213b4471..318c3a9aa4 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/Entitlements/ExtSFTPConnector.Entitlement.al +++ b/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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPEdit.PermissionSet.al b/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPEdit.PermissionSet.al index b9b754a5dd..e1f9a5420a 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPEdit.PermissionSet.al +++ b/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 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPObjects.PermissionSet.al b/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPObjects.PermissionSet.al index e9c9046ff3..9792e6bca1 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPObjects.PermissionSet.al +++ b/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 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPRead.PermissionSet.al b/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPRead.PermissionSet.al index 86482d2513..2ccd5a2f87 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/ExtSFTPRead.PermissionSet.al +++ b/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 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageAdminExtSFTP.PermissionSetExt.al b/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageAdminExtSFTP.PermissionSetExt.al index ea2008d1cf..d6efea7084 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageAdminExtSFTP.PermissionSetExt.al +++ b/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 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageEditExtSFTP.PermissionSetExt.al b/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageEditExtSFTP.PermissionSetExt.al index d0be734af5..e28e1ac7c2 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/permissions/FileStorageEditExtSFTP.PermissionSetExt.al +++ b/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 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Page.al b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Page.al index 494c526fa5..9711148424 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Page.al +++ b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Page.al @@ -8,6 +8,7 @@ namespace System.ExternalFileStorage; /// /// Displays an account that was registered via the SFTP connector. /// +#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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Table.al b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Table.al index 49744be512..50e8be0e85 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Table.al +++ b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccount.Table.al @@ -11,10 +11,14 @@ using System.Utilities; /// /// Holds the information for all file accounts that are registered via the SFTP connector /// +#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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccountWizard.Page.al b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccountWizard.Page.al index 74696cdb3e..0b6ba4781d 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccountWizard.Page.al +++ b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAccountWizard.Page.al @@ -10,6 +10,7 @@ using System.Environment; /// /// Displays an account that is being registered via the SFTP connector. /// +#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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAuthType.Enum.al b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAuthType.Enum.al index 0c2aff7247..e6e0c56386 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPAuthType.Enum.al +++ b/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'; /// /// Authenticate using password. diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnector.EnumExt.al b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnector.EnumExt.al index 3a2a7fa8a7..ea56e61594 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnector.EnumExt.al +++ b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnector.EnumExt.al @@ -8,6 +8,7 @@ namespace System.ExternalFileStorage; /// /// Enum extension to register the SFTP connector. /// +#pragma warning disable AL0432, AS0105 enumextension 4621 "Ext. SFTP Connector" extends "Ext. File Storage Connector" { /// @@ -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'; } -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnectorImpl.Codeunit.al b/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnectorImpl.Codeunit.al index 473feb955b..c64d080b24 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/App/src/ExtSFTPConnectorImpl.Codeunit.al +++ b/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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/Apps/W1/External File Storage - SFTP Connector/Test/src/ExtSFTPConnectorTest.Codeunit.al b/src/Apps/W1/External File Storage - SFTP Connector/Test/src/ExtSFTPConnectorTest.Codeunit.al index 7241327e0f..76eb0665be 100644 --- a/src/Apps/W1/External File Storage - SFTP Connector/Test/src/ExtSFTPConnectorTest.Codeunit.al +++ b/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"; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/Permissions/SystemApplicationAdmin.PermissionSet.al b/src/System Application/App/Permissions/SystemApplicationAdmin.PermissionSet.al index 32e8a6c7dc..63cbd6d335 100644 --- a/src/System Application/App/Permissions/SystemApplicationAdmin.PermissionSet.al +++ b/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 diff --git a/src/System Application/App/SFTP Client/src/DotnetSFTPClient.Codeunit.al b/src/System Application/App/SFTP Client/src/DotnetSFTPClient.Codeunit.al index 254ceb516f..380b90a272 100644 --- a/src/System Application/App/SFTP Client/src/DotnetSFTPClient.Codeunit.al +++ b/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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/DotnetSFTPFile.Codeunit.al b/src/System Application/App/SFTP Client/src/DotnetSFTPFile.Codeunit.al index 083f076754..ba39ad03bd 100644 --- a/src/System Application/App/SFTP Client/src/DotnetSFTPFile.Codeunit.al +++ b/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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/ISFTPClient.Interface.al b/src/System Application/App/SFTP Client/src/ISFTPClient.Interface.al index 8de4e7f3fc..7a349623d0 100644 --- a/src/System Application/App/SFTP Client/src/ISFTPClient.Interface.al +++ b/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]) -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/ISFTPFile.Interface.al b/src/System Application/App/SFTP Client/src/ISFTPFile.Interface.al index 85e1c6076a..944423fc40 100644 --- a/src/System Application/App/SFTP Client/src/ISFTPFile.Interface.al +++ b/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 -} \ No newline at end of file +} diff --git a/src/System Application/App/SFTP Client/src/PermissionSets/SFTPAdmin.PermissionSet.al b/src/System Application/App/SFTP Client/src/PermissionSets/SFTPAdmin.PermissionSet.al index 71fb582164..9347bc6857 100644 --- a/src/System Application/App/SFTP Client/src/PermissionSets/SFTPAdmin.PermissionSet.al +++ b/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; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/SFTPClient.Codeunit.al b/src/System Application/App/SFTP Client/src/SFTPClient.Codeunit.al index 463f372737..b887095a22 100644 --- a/src/System Application/App/SFTP Client/src/SFTPClient.Codeunit.al +++ b/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'; /// /// 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"; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/SFTPClientImplementation.Codeunit.al b/src/System Application/App/SFTP Client/src/SFTPClientImplementation.Codeunit.al index 38f77fa493..c960277f19 100644 --- a/src/System Application/App/SFTP Client/src/SFTPClientImplementation.Codeunit.al +++ b/src/System Application/App/SFTP Client/src/SFTPClientImplementation.Codeunit.al @@ -8,11 +8,15 @@ namespace System.SFTPClient; using System; using System.Utilities; +#pragma warning disable AL0432, AS0105 codeunit 9763 "SFTP Client Implementation" { 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'; procedure Initialize(Host: Text; Port: Integer; UserName: Text; Password: SecretText): Codeunit "SFTP Operation Response" begin @@ -209,4 +213,5 @@ codeunit 9763 "SFTP Client Implementation" HostkeyFingerprintsSHA256: List of [Text]; HostkeyFingerprintsMD5: List of [Text]; ISFTPClientSet: Boolean; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/SFTPExceptionType.Enum.al b/src/System Application/App/SFTP Client/src/SFTPExceptionType.Enum.al index 1ffc3b63e1..a8b55b8a5b 100644 --- a/src/System Application/App/SFTP Client/src/SFTPExceptionType.Enum.al +++ b/src/System Application/App/SFTP Client/src/SFTPExceptionType.Enum.al @@ -9,6 +9,9 @@ enum 9760 "SFTP Exception Type" { Extensible = false; Access = Public; + ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.'; + ObsoleteState = Pending; + ObsoleteTag = '29.0'; value(0; None) { @@ -42,4 +45,4 @@ enum 9760 "SFTP Exception Type" { Caption = 'Untrusted Server Exception'; } -} \ No newline at end of file +} diff --git a/src/System Application/App/SFTP Client/src/SFTPFolderContent.Page.al b/src/System Application/App/SFTP Client/src/SFTPFolderContent.Page.al index d18cbde862..b77cbd8dbf 100644 --- a/src/System Application/App/SFTP Client/src/SFTPFolderContent.Page.al +++ b/src/System Application/App/SFTP Client/src/SFTPFolderContent.Page.al @@ -5,6 +5,7 @@ namespace System.SFTPClient; +#pragma warning disable AL0432, AS0105 page 9761 "SFTP Folder Content" { Caption = 'SFTP Folder Content'; @@ -16,6 +17,9 @@ page 9761 "SFTP Folder Content" DeleteAllowed = false; Editable = false; Extensible = false; + ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.'; + ObsoleteState = Pending; + ObsoleteTag = '29.0'; layout { @@ -52,4 +56,5 @@ page 9761 "SFTP Folder Content" } } } -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/SFTP Client/src/SFTPFolderContent.Table.al b/src/System Application/App/SFTP Client/src/SFTPFolderContent.Table.al index ecb670e559..b5fc4fb806 100644 --- a/src/System Application/App/SFTP Client/src/SFTPFolderContent.Table.al +++ b/src/System Application/App/SFTP Client/src/SFTPFolderContent.Table.al @@ -14,6 +14,9 @@ table 9760 "SFTP Folder Content" Extensible = false; Caption = 'SFTP Folder Content'; TableType = Temporary; + ObsoleteReason = 'The SFTP module is deprecated because platform hardening will prevent support for SFTP connections.'; + ObsoleteState = Pending; + ObsoleteTag = '29.0'; fields { @@ -58,4 +61,4 @@ table 9760 "SFTP Folder Content" Clustered = true; } } -} \ No newline at end of file +} diff --git a/src/System Application/App/SFTP Client/src/SFTPOperationResponse.Codeunit.al b/src/System Application/App/SFTP Client/src/SFTPOperationResponse.Codeunit.al index d84e840839..ff5939dcc9 100644 --- a/src/System Application/App/SFTP Client/src/SFTPOperationResponse.Codeunit.al +++ b/src/System Application/App/SFTP Client/src/SFTPOperationResponse.Codeunit.al @@ -7,11 +7,15 @@ namespace System.SFTPClient; using System.Utilities; +#pragma warning disable AL0432, AS0105 codeunit 9764 "SFTP Operation Response" { 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'; internal procedure GetResponseStream(var ResultInstream: InStream) begin @@ -69,4 +73,5 @@ codeunit 9764 "SFTP Operation Response" IsErrorVar: Boolean; ErrorType: Enum "SFTP Exception Type"; ErrorMsg: Text; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/App/app.json b/src/System Application/App/app.json index 8f6f258e03..1500da0caf 100644 --- a/src/System Application/App/app.json +++ b/src/System Application/App/app.json @@ -65,4 +65,4 @@ "Resources/Files" ], "contextSensitiveHelpUrl": "https://learn.microsoft.com/dynamics365/business-central/" -} \ No newline at end of file +} diff --git a/src/System Application/Test/SFTP Client/src/MockSFTPClient.Codeunit.al b/src/System Application/Test/SFTP Client/src/MockSFTPClient.Codeunit.al index 407f93dbfd..4cd0779c4d 100644 --- a/src/System Application/Test/SFTP Client/src/MockSFTPClient.Codeunit.al +++ b/src/System Application/Test/SFTP Client/src/MockSFTPClient.Codeunit.al @@ -8,6 +8,7 @@ namespace System.Test.SFTPClient; using System; using System.SFTPClient; +#pragma warning disable AL0432, AS0105 codeunit 139075 "Mock SFTP Client" implements "ISFTP Client" { Access = Internal; @@ -292,4 +293,5 @@ codeunit 139075 "Mock SFTP Client" implements "ISFTP Client" FilesExist.Add(Path, true); exit(true); end; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/Test/SFTP Client/src/MockSFTPFile.Codeunit.al b/src/System Application/Test/SFTP Client/src/MockSFTPFile.Codeunit.al index 892e0e8771..d2e36e33ac 100644 --- a/src/System Application/Test/SFTP Client/src/MockSFTPFile.Codeunit.al +++ b/src/System Application/Test/SFTP Client/src/MockSFTPFile.Codeunit.al @@ -7,6 +7,7 @@ namespace System.Test.SFTPClient; using System.SFTPClient; +#pragma warning disable AL0432, AS0105 codeunit 139076 "Mock SFTP File" implements "ISFTP File" { Access = Internal; @@ -60,4 +61,5 @@ codeunit 139076 "Mock SFTP File" implements "ISFTP File" begin exit(LastWriteTimeVar); end; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105 diff --git a/src/System Application/Test/SFTP Client/src/SFTPClientTest.Codeunit.al b/src/System Application/Test/SFTP Client/src/SFTPClientTest.Codeunit.al index cda2602439..5cb0079646 100644 --- a/src/System Application/Test/SFTP Client/src/SFTPClientTest.Codeunit.al +++ b/src/System Application/Test/SFTP Client/src/SFTPClientTest.Codeunit.al @@ -9,6 +9,7 @@ using System.SFTPClient; using System.TestLibraries.Utilities; using System.Utilities; +#pragma warning disable AL0432, AS0105 codeunit 139077 "SFTP Client Test" { Subtype = Test; @@ -409,4 +410,5 @@ codeunit 139077 "SFTP Client Test" Assert.AreEqual(ExpectedErrorMessage, Response.GetError(), 'Incorrect error message'); Assert.AreEqual(Enum::"SFTP Exception Type"::"Untrusted Server Exception", Response.GetErrorType(), 'Incorrect error type'); end; -} \ No newline at end of file +} +#pragma warning restore AL0432, AS0105