…
THEN BEGIN
AccSchedManagement.SetCostTypeRowFilters(CostType,Rec,CurrForm.AccSchedMatrix.MatrixRec);
// CA0002.BEGIN
// AccSchedManagement.SetCostTypeColumnFilters(CostType,CurrForm.AccSchedMatrix.MatrixRec);
AccSchedManagement.SetCostTypeColumnFilters(CostType,Rec,CurrForm.AccSchedMatrix.MatrixRec);
// CA0002.END
WITH CurrForm.AccSchedMatrix.MatrixRec DO BEGIN
CASE "Ledger Entry Type" OF
…
…
THEN BEGIN
AccSchedManagement.SetCostTypeRowFilters(CostType,Rec,CurrForm.AccSchedMatrix.MatrixRec);
// CA0002.BEGIN
// AccSchedManagement.SetCostTypeColumnFilters(CostType,CurrForm.AccSchedMatrix.MatrixRec);
AccSchedManagement.SetCostTypeColumnFilters(CostType,Rec,CurrForm.AccSchedMatrix.MatrixRec);
// CA0002.END
CostType.FILTERGROUP(6);
CostType.SETFILTER(
"Cost Center Filter",
AccSchedManagement.GetDimTotalingFilter(1,CurrForm.AccSchedMatrix.MatrixRec."Dimension 1 Totaling"));
CostType.SETFILTER(
"Cost Object Filter",
AccSchedManagement.GetDimTotalingFilter(2,CurrForm.AccSchedMatrix.MatrixRec."Dimension 2 Totaling"));
CostType.FILTERGROUP(0);
WITH CurrForm.AccSchedMatrix.MatrixRec DO BEGIN
CASE "Ledger Entry Type" OF
…