...
SalesInvLine.SETRANGE("Posting Date",FromDate,ToDate);
SalesInvLine.SETRANGE("VAT Calculation Type",SalesInvLine."VAT Calculation Type"::"No Taxable VAT");
SalesInvLine.SETFILTER("Gen. Prod. Posting Group",FilterString);
IF SalesInvLine.FINDSET THEN
REPEAT
// Delete the following lines.
IF VATPostingSetup.GET(SalesInvLine."VAT Bus. Posting Group",SalesInvLine."VAT Prod. Posting Group") THEN
IF VATPostingSetup."EU Service" THEN
NoTaxableAmountEUService := NoTaxableAmountEUService + SalesInvLine."Line Amount"
ELSE
IF SalesInvHeader.GET(SalesInvLine."Document No.") THEN
// End of the deleted lines.
IF SalesInvHeader."EU 3-Party Trade" THEN
NoTaxableAmountOpTri := NoTaxableAmountOpTri + SalesInvLine."Line Amount"
ELSE
NoTaxableNormalAmount := NoTaxableNormalAmount + SalesInvLine."Line Amount"
UNTIL SalesInvLine.NEXT = 0;
...
...
SalesInvLine.SETRANGE("Posting Date",FromDate,ToDate);
SalesInvLine.SETRANGE("VAT Calculation Type",SalesInvLine."VAT Calculation Type"::"No Taxable VAT");
SalesInvLine.SETFILTER("Gen. Prod. Posting Group",FilterString);
IF SalesInvLine.FINDSET THEN
REPEAT
// Add the following lines.
SalesInvHeader.GET(SalesInvLine."Document No.");
IF SalesInvHeader."Bill-to Country/Region Code" <> CompanyInfo."Country/Region Code" THEN
IF VATPostingSetup.GET(SalesInvLine."VAT Bus. Posting Group",SalesInvLine."VAT Prod. Posting Group") THEN
IF VATPostingSetup."EU Service" THEN
NoTaxableAmountEUService := NoTaxableAmountEUService + SalesInvLine."Line Amount"
ELSE
// End of the added lines.
IF SalesInvHeader."EU 3-Party Trade" THEN
NoTaxableAmountOpTri := NoTaxableAmountOpTri + SalesInvLine."Line Amount"
ELSE
NoTaxableNormalAmount := NoTaxableNormalAmount + SalesInvLine."Line Amount"
UNTIL SalesInvLine.NEXT = 0;
...