This article applies to Microsoft Dynamics NAV for the following countries and language locales.
- Belgium (French) (fr-be)
- Belgium (Dutch) (nl-be)
Notice: This website is an unofficial Microsoft Knowledge Base (hereinafter KB) archive and is intended to provide a reliable access to deleted content from Microsoft KB. All KB articles are owned by Microsoft Corporation. Read full disclaimer for more details.
View products that this article applies to.
...
VATEntry.INSERT;
GLEntryVatEntrylink.InsertLink(GLEntryTmp,VATEntry);
NextVATEntryNo := NextVATEntryNo + 1;
END;
// VAT for G/L entry/entries
// Delete the following line.
IF (GLEntryVATAmount <> 0) OR
((SrcCurrGLEntryVATAmt <> 0) AND (SrcCurrCode = GLSetup."Additional Reporting Currency"))
THEN BEGIN
CASE "Gen. Posting Type" OF
"Gen. Posting Type"::Purchase:
CASE VATPostingSetup."VAT Calculation Type" OF
VATPostingSetup."VAT Calculation Type"::"Normal VAT",
VATPostingSetup."VAT Calculation Type"::"Full VAT":
...
...
VATEntry.INSERT;
GLEntryVatEntrylink.InsertLink(GLEntryTmp,VATEntry);
NextVATEntryNo := NextVATEntryNo + 1;
END;
// VAT for G/L entry/entries
// Add the following lines.
IF ((GLEntryVATAmount <> 0) OR (VATAmtWithoutNonDeduct <> 0)) OR
((SrcCurrGLEntryVATAmt <> 0) AND (SrcCurrCode = GLSetup."Additional Reporting Currency"))
THEN BEGIN
CASE "Gen. Posting Type" OF
"Gen. Posting Type"::Purchase:
CASE VATPostingSetup."VAT Calculation Type" OF
VATPostingSetup."VAT Calculation Type"::"Normal VAT",
VATPostingSetup."VAT Calculation Type"::"Full VAT":
...
Keywords: kberrmsg, kbmbscodefix, kbnoloc, kbsurveynew, kbmbsquickpub, kbmbsmigrate, kb, kbqfe, kbmbspartner