[Event Request] Report 12 "VAT Statement" - OnAfterVATEntrySetFilters

[TriangleSPV]

Describe the request

Current code:

local procedure CalcLineFromVATEntry1C(VATStatementLine: Record "VAT Statement Line")
begin
    VATEntry.Reset();
    SetVATEntryKeyAndRangesForVATDate(VATStatementLine);

    VATEntry.SetRange(Type, VATStatementLine."Gen. Posting Type");
    SetVATDate("VAT Statement Line");

    case Selection of
        Selection::Open:
            VATEntry.SetRange(Closed, false);
        Selection::Closed:
            VATEntry.SetRange(Closed, true);
        else
            VATEntry.SetRange(Closed);
    end;
    if VATEntry.FindFirst() then;
    case VATStatementLine."Amount Type" of
        VATStatementLine."Amount Type"::Amount:

Requested:

local procedure CalcLineFromVATEntry1C(VATStatementLine: Record "VAT Statement Line")
begin
    VATEntry.Reset();
    SetVATEntryKeyAndRangesForVATDate(VATStatementLine);

    VATEntry.SetRange(Type, VATStatementLine."Gen. Posting Type");
    SetVATDate("VAT Statement Line");

    case Selection of
        Selection::Open:
            VATEntry.SetRange(Closed, false);
        Selection::Closed:
            VATEntry.SetRange(Closed, true);
        else
            VATEntry.SetRange(Closed);
    end;

    OnAfterVATEntrySetFilters(VATStatementLine, VATEntry);  //NEW CODE

    if VATEntry.FindFirst() then;
    case VATStatementLine."Amount Type" of
        VATStatementLine."Amount Type"::Amount:

//NEW LINES
[IntegrationEvent(false, false)]
local procedure OnAfterVATEntrySetFilters(VATStatementLine: Record "VAT Statement Line"; var VATEntry: Record "VAT Entry")
begin
end;
//NEW LINES

Additional context

We need an event to modify filters in VATEntries when calculating VAT Statement lines with Type = "VAT Entry Totaling", as it works for Type "EC Entry Totaling" in event OnCalcLineTotalOnVATEntryTotalingOnAfterVATEntrySetFilters.
Internal work item: AB#558866