Skip to content

Hide irrelevant VAT fields in North American setup cards and templates #13177

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Closed
Jatin Kumar (Explorer986) wants to merge 3 commits into from
Closed

Hide irrelevant VAT fields in North American setup cards and templates #13177

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
b4da8a8
Hide irrelevant VAT fields in North American setup cards and templates
Explorer986 Oct 22, 2026
11a33fd
Hide resource VAT posting group when VAT is off
Explorer986 Oct 22, 2026
1af2ed0
Create each template right before its check instead of committing
Explorer986 Oct 26, 2026
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
6 changes: 6 additions & 0 deletions src/Layers/NA/BaseApp/Finance/GeneralLedger/Account/GLAccountCard.Page.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -215,11 +215,13 @@ page 17 "G/L Account Card"
{
ApplicationArea = Basic, Suite;
Importance = Promoted;
Visible = VATInUse;
}
field("VAT Prod. Posting Group"; Rec."VAT Prod. Posting Group")
{
ApplicationArea = Basic, Suite;
Importance = Promoted;
Visible = VATInUse;
}
field("Tax Group Code"; Rec."Tax Group Code")
{
Expand Down Expand Up @@ -734,6 +736,7 @@ page 17 "G/L Account Card"

var
ExtendedPriceEnabled: Boolean;
VATInUse: Boolean;
SubCategoryDescription: Text[80];

local procedure UpdateAccountSubcategoryDescription()
Expand All @@ -744,8 +747,11 @@ page 17 "G/L Account Card"

local procedure SetControlVisibility()
var
GLSetup: Record "General Ledger Setup";
PriceCalculationMgt: Codeunit "Price Calculation Mgt.";
begin
GLSetup.Get();
VATInUse := GLSetup."VAT in Use";
ExtendedPriceEnabled := PriceCalculationMgt.IsExtendedPriceCalculationEnabled();
end;
}
9 changes: 8 additions & 1 deletion src/Layers/NA/BaseApp/Inventory/Item/ItemTemplCard.Page.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,7 @@
namespace Microsoft.Inventory.Item;

using Microsoft.Finance.Dimension;
using Microsoft.Finance.GeneralLedger.Setup;
using Microsoft.Inventory.Planning;
using Microsoft.Inventory.Setup;

Expand Down Expand Up @@ -209,6 +210,7 @@ page 1384 "Item Templ. Card"
ApplicationArea = Basic, Suite;
Importance = Additional;
ShowMandatory = true;
Visible = VATInUse;
}
field("Tax Group Code"; Rec."Tax Group Code")
{
Expand Down Expand Up @@ -253,7 +255,7 @@ page 1384 "Item Templ. Card"
}
field("Price Includes VAT"; Rec."Price Includes VAT")
{
ApplicationArea = Basic, Suite;
ApplicationArea = VAT;
Importance = Additional;
}
field("Price/Profit Calculation"; Rec."Price/Profit Calculation")
Expand Down Expand Up @@ -593,13 +595,18 @@ page 1384 "Item Templ. Card"
end;

trigger OnOpenPage()
var
GLSetup: Record "General Ledger Setup";
begin
GLSetup.Get();
VATInUse := GLSetup."VAT in Use";
EnablePlanningControls();
EnableShowVariantMandatory();
end;

var
ShowVariantMandatoryDefaultYes: Boolean;
VATInUse: Boolean;

protected var
TimeBucketEnable: Boolean;
Expand Down
6 changes: 6 additions & 0 deletions src/Layers/NA/BaseApp/Projects/Resources/Resource/ResourceCard.Page.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,7 @@
namespace Microsoft.Projects.Resources.Resource;

using Microsoft.Finance.Dimension;
using Microsoft.Finance.GeneralLedger.Setup;
using Microsoft.Foundation.Address;
using Microsoft.Foundation.Attachment;
using Microsoft.Foundation.Comment;
Expand Down Expand Up @@ -145,6 +146,7 @@ page 76 "Resource Card"
{
ApplicationArea = Basic, Suite;
Importance = Promoted;
Visible = VATInUse;
}
field("Default Deferral Template Code"; Rec."Default Deferral Template Code")
{
Expand Down Expand Up @@ -739,8 +741,11 @@ page 76 "Resource Card"

trigger OnOpenPage()
var
GLSetup: Record "General Ledger Setup";
IntegrationTableMapping: Record "Integration Table Mapping";
begin
GLSetup.Get();
VATInUse := GLSetup."VAT in Use";
CRMIntegrationEnabled := CRMIntegrationManagement.IsCRMIntegrationEnabled();
if IntegrationTableMapping.Get('RESOURCE-PRODUCT') then
BlockedFilterApplied := IntegrationTableMapping.GetTableFilter().Contains('Field38=1(0)');
Expand All @@ -759,6 +764,7 @@ page 76 "Resource Card"
ExtendedPriceEnabled: Boolean;
NoFieldVisible: Boolean;
IsCountyVisible: Boolean;
VATInUse: Boolean;

local procedure SetNoFieldVisible()
var
Expand Down
9 changes: 8 additions & 1 deletion src/Layers/NA/BaseApp/Purchases/Vendor/VendorTemplCard.Page.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,7 @@
namespace Microsoft.Purchases.Vendor;

using Microsoft.Finance.Dimension;
using Microsoft.Finance.GeneralLedger.Setup;
using Microsoft.Foundation.Address;

page 1386 "Vendor Templ. Card"
Expand Down Expand Up @@ -216,7 +217,7 @@ page 1386 "Vendor Templ. Card"
}
field("Prices Including VAT"; Rec."Prices Including VAT")
{
ApplicationArea = Basic, Suite;
ApplicationArea = VAT;
Importance = Additional;
}
field("Price Calculation Method"; Rec."Price Calculation Method")
Expand All @@ -238,6 +239,7 @@ page 1386 "Vendor Templ. Card"
{
ApplicationArea = Basic, Suite;
Importance = Additional;
Visible = VATInUse;
}
field("Vendor Posting Group"; Rec."Vendor Posting Group")
{
Expand Down Expand Up @@ -443,11 +445,16 @@ page 1386 "Vendor Templ. Card"
}

trigger OnOpenPage()
var
GLSetup: Record "General Ledger Setup";
begin
GLSetup.Get();
VATInUse := GLSetup."VAT in Use";
IsCountyVisible := FormatAddress.UseCounty(Rec."Country/Region Code");
end;

var
FormatAddress: Codeunit "Format Address";
IsCountyVisible: Boolean;
VATInUse: Boolean;
}
6 changes: 6 additions & 0 deletions src/Layers/NA/BaseApp/Sales/Customer/CustomerTemplCard.Page.al
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -5,6 +5,7 @@
namespace Microsoft.Sales.Customer;

using Microsoft.Finance.Dimension;
using Microsoft.Finance.GeneralLedger.Setup;
using Microsoft.Foundation.Address;
using Microsoft.Pricing.Calculation;
using Microsoft.Sales.Setup;
Expand Down Expand Up @@ -268,6 +269,7 @@ page 1382 "Customer Templ. Card"
{
ApplicationArea = Basic, Suite;
Importance = Additional;
Visible = VATInUse;
}
field("Customer Posting Group"; Rec."Customer Posting Group")
{
Expand Down Expand Up @@ -518,8 +520,11 @@ page 1382 "Customer Templ. Card"

trigger OnOpenPage()
var
GLSetup: Record "General Ledger Setup";
PriceCalculationMgt: Codeunit "Price Calculation Mgt.";
begin
GLSetup.Get();
VATInUse := GLSetup."VAT in Use";
IsCountyVisible := FormatAddress.UseCounty(Rec."Country/Region Code");
SalesReceivablesSetup.Get();
IsAllowMultiplePostingGroupsVisible := SalesReceivablesSetup."Allow Multiple Posting Groups";
Expand All @@ -532,4 +537,5 @@ page 1382 "Customer Templ. Card"
ExtendedPriceEnabled: Boolean;
IsAllowMultiplePostingGroupsVisible: Boolean;
IsCountyVisible: Boolean;
VATInUse: Boolean;
}
Loading
Loading