diff --git a/src/System Application/App/Environment Information/src/EnvironmentInformation.Codeunit.al b/src/System Application/App/Environment Information/src/EnvironmentInformation.Codeunit.al
index c4d64044178..49991607637 100644
--- a/src/System Application/App/Environment Information/src/EnvironmentInformation.Codeunit.al
+++ b/src/System Application/App/Environment Information/src/EnvironmentInformation.Codeunit.al
@@ -155,30 +155,6 @@ codeunit 457 "Environment Information"
exit(EnvironmentInformationImpl.GetLinkedPowerPlatformEnvironmentId());
end;
- ///
- /// Gets the physical location of the application service the environment is hosted on (for example, "Canada Central"). This is only callable from Microsoft published apps.
- ///
- /// The application service location when running on SaaS infrastructure and the information is available; otherwise, an empty string.
- procedure GetApplicationServiceLocation(): Text
- var
- CallerModuleInfo: ModuleInfo;
- begin
- NavApp.GetCallerModuleInfo(CallerModuleInfo);
- exit(EnvironmentInformationImpl.GetApplicationServiceLocation(CallerModuleInfo));
- end;
-
- ///
- /// Checks whether the Azure geography of the application service the environment is hosted on is within the Microsoft EU Data Boundary (EUDB). This is only callable from Microsoft published apps.
- ///
- /// True when the environment is hosted within the EU Data Boundary. False means either that the environment is outside the EU Data Boundary or that the information is unavailable, including when not running on SaaS infrastructure.
- procedure IsApplicationServiceInEUDB(): Boolean
- var
- CallerModuleInfo: ModuleInfo;
- begin
- NavApp.GetCallerModuleInfo(CallerModuleInfo);
- exit(EnvironmentInformationImpl.IsApplicationServiceInEUDB(CallerModuleInfo));
- end;
-
///
/// Gets the value of the specified environment setting. This is only callable from Microsoft published apps.
///
diff --git a/src/System Application/App/Environment Information/src/EnvironmentInformationImpl.Codeunit.al b/src/System Application/App/Environment Information/src/EnvironmentInformationImpl.Codeunit.al
index a3904a169df..5631edee889 100644
--- a/src/System Application/App/Environment Information/src/EnvironmentInformationImpl.Codeunit.al
+++ b/src/System Application/App/Environment Information/src/EnvironmentInformationImpl.Codeunit.al
@@ -27,7 +27,6 @@ codeunit 3702 "Environment Information Impl."
IsSandboxInitialized: Boolean;
DefaultSandboxEnvironmentNameTxt: Label 'Sandbox', Locked = true;
DefaultProductionEnvironmentNameTxt: Label 'Production', Locked = true;
- MicrosoftPublisherOnlyErr: Label 'This procedure is only available for Microsoft published apps.';
procedure IsProduction(): Boolean
begin
@@ -178,26 +177,6 @@ codeunit 3702 "Environment Information Impl."
exit(NavTenantSettingsHelper.GetLinkedPowerPlatformEnvironmentId());
end;
- procedure GetApplicationServiceLocation(CallerModuleInfo: ModuleInfo): Text
- begin
- EnsureMicrosoftPublisher(CallerModuleInfo);
-
- if not IsSaaSInfrastructure() then
- exit('');
-
- exit(NavTenantSettingsHelper.GetAppServiceLocation());
- end;
-
- procedure IsApplicationServiceInEUDB(CallerModuleInfo: ModuleInfo): Boolean
- begin
- EnsureMicrosoftPublisher(CallerModuleInfo);
-
- if not IsSaaSInfrastructure() then
- exit(false);
-
- exit(NavTenantSettingsHelper.GetAppServiceInEUDB());
- end;
-
procedure GetEnvironmentSetting(SettingName: Text; ModuleInfo: ModuleInfo): Text
begin
if ModuleInfo.Publisher <> 'Microsoft' then
@@ -205,12 +184,6 @@ codeunit 3702 "Environment Information Impl."
exit(NavTenantSettingsHelper.GetEnvironmentApplicationSetting(SettingName));
end;
- local procedure EnsureMicrosoftPublisher(CallerModuleInfo: ModuleInfo)
- begin
- if CallerModuleInfo.Publisher <> 'Microsoft' then
- Error(MicrosoftPublisherOnlyErr);
- end;
-
[InternalEvent(false)]
procedure OnBeforeGetApplicationIdentifier(var AppId: Text)
begin
diff --git a/src/System Application/Partner Test/Environment Information/src/EnvironmentInfoTestPartner.Codeunit.al b/src/System Application/Partner Test/Environment Information/src/EnvironmentInfoTestPartner.Codeunit.al
deleted file mode 100644
index 29c91c2c2be..00000000000
--- a/src/System Application/Partner Test/Environment Information/src/EnvironmentInfoTestPartner.Codeunit.al
+++ /dev/null
@@ -1,47 +0,0 @@
-// ------------------------------------------------------------------------------------------------
-// Copyright (c) Microsoft Corporation. All rights reserved.
-// Licensed under the MIT License. See License.txt in the project root for license information.
-// ------------------------------------------------------------------------------------------------
-
-namespace Partner.Test.Environment;
-
-using System.Environment;
-using System.TestLibraries.Utilities;
-
-codeunit 139023 "Environment Info Test Partner"
-{
- Subtype = Test;
-
- var
- Assert: Codeunit "Library Assert";
- MicrosoftPublisherOnlyErr: Label 'This procedure is only available for Microsoft published apps.';
-
- [Test]
- procedure GetApplicationServiceLocationRequiresMicrosoftPublisher()
- var
- EnvironmentInformation: Codeunit "Environment Information";
- ApplicationServiceLocation: Text;
- begin
- // [SCENARIO] A partner app cannot read the application service location.
-
- // [WHEN] A partner-published app requests the application service location
- asserterror ApplicationServiceLocation := EnvironmentInformation.GetApplicationServiceLocation();
-
- // [THEN] Access is denied
- Assert.ExpectedError(MicrosoftPublisherOnlyErr);
- end;
-
- [Test]
- procedure IsApplicationServiceInEUDBRequiresMicrosoftPublisher()
- var
- EnvironmentInformation: Codeunit "Environment Information";
- begin
- // [SCENARIO] A partner app cannot read application service EUDB membership.
-
- // [WHEN] A partner-published app requests EUDB membership
- asserterror EnvironmentInformation.IsApplicationServiceInEUDB();
-
- // [THEN] Access is denied
- Assert.ExpectedError(MicrosoftPublisherOnlyErr);
- end;
-}
diff --git a/src/System Application/Test/Environment Information/src/EnvironmentInformationTest.Codeunit.al b/src/System Application/Test/Environment Information/src/EnvironmentInformationTest.Codeunit.al
index 75b336a5776..1fea6b450ed 100644
--- a/src/System Application/Test/Environment Information/src/EnvironmentInformationTest.Codeunit.al
+++ b/src/System Application/Test/Environment Information/src/EnvironmentInformationTest.Codeunit.al
@@ -85,34 +85,6 @@ codeunit 135091 "Environment Information Test"
Assert.IsFalse(EnvironmentInformation.IsSaaS(), 'Testability should have dictacted a non- SaaS environment');
end;
- [Test]
- [Scope('OnPrem')]
- procedure TestApplicationServiceLocationIsEmptyOutsideSaaSInfrastructure()
- begin
- // [SCENARIO] Application service location is unavailable outside SaaS infrastructure.
-
- // [GIVEN] SaaS testability is disabled
- EnvironmentInfoTestLibrary.SetTestabilitySoftwareAsAService(false);
-
- // [WHEN] The application service location is requested
- // [THEN] An empty location is returned
- Assert.AreEqual('', EnvironmentInformation.GetApplicationServiceLocation(), 'Application service location should be empty outside SaaS infrastructure.');
- end;
-
- [Test]
- [Scope('OnPrem')]
- procedure TestApplicationServiceEUDBIsFalseOutsideSaaSInfrastructure()
- begin
- // [SCENARIO] EUDB membership is unavailable outside SaaS infrastructure.
-
- // [GIVEN] SaaS testability is disabled
- EnvironmentInfoTestLibrary.SetTestabilitySoftwareAsAService(false);
-
- // [WHEN] EUDB membership is requested
- // [THEN] False is returned
- Assert.IsFalse(EnvironmentInformation.IsApplicationServiceInEUDB(), 'Application service EUDB membership should be false outside SaaS infrastructure.');
- end;
-
[Test]
[Scope('OnPrem')]
procedure TestIsEarlyPreviewVersionIsSet()