Skip to content

Commit

Permalink
Always check to see if the new IRS Forms feature is enabled. Initiali…
Browse files Browse the repository at this point in the history
…ze the original/old IRS 1099 Forms feature if required.
  • Loading branch information
jaymckinney committed Dec 9, 2024
1 parent 42a98a0 commit 35fc038
Showing 1 changed file with 19 additions and 7 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -3,9 +3,11 @@ namespace Microsoft.DataMigration.GP;
using System.Integration;
#if not CLEAN25
using System.Environment.Configuration;
using Microsoft.Finance.VAT.Reporting;
#endif
using Microsoft.Purchases.Vendor;


codeunit 42004 "GP Cloud Migration US"
{
var
Expand All @@ -31,6 +33,9 @@ codeunit 42004 "GP Cloud Migration US"
begin
if GPCompanyAdditionalSettings.GetMigrateVendor1099Enabled() then begin
EnsureSupportedReportingYear();
#if not CLEAN25
EnsureOriginalIRS1099FeatureInitializedIfNeeded();
#endif
SetupIRSFormsFeatureIfNeeded();
BindSubscription(GPPopulateVendor1099Data);
GPPopulateVendor1099Data.Run();
Expand Down Expand Up @@ -73,17 +78,10 @@ codeunit 42004 "GP Cloud Migration US"

internal procedure IsIRSFormsFeatureEnabled(): Boolean
var
#if not CLEAN25
FeatureManagementFacade: Codeunit "Feature Management Facade";
#endif
IsEnabled: Boolean;
begin
IsEnabled := true;

#if not CLEAN25
IsEnabled := FeatureManagementFacade.IsEnabled(IRSFormFeatureKeyIdTok);
#endif

exit(IsEnabled);
end;

Expand All @@ -101,4 +99,18 @@ codeunit 42004 "GP Cloud Migration US"

GPIRSFormData.CreateIRSFormsReportingPeriodIfNeeded(ReportingYear);
end;

#if not CLEAN25
local procedure EnsureOriginalIRS1099FeatureInitializedIfNeeded()
var
#pragma warning disable AL0432
IRS1099FormBox: Record "IRS 1099 Form-Box";
#pragma warning restore AL0432
begin
if IsIRSFormsFeatureEnabled() then
exit;

IRS1099FormBox.InitIRS1099FormBoxes();
end;
#endif
}

0 comments on commit 35fc038

Please sign in to comment.