Rýchlo publikované články poskytujú informácie priamo z organizácie podpory spoločnosti Microsoft. Informácie obsiahnuté v tomto dokumente sú vytvorené ako odpoveď na vznikajúce alebo jedinečné témy alebo sú určené na doplnenie iných informácií vedomostnej databázy.
Tento článok sa vzťahuje na systém Microsoft Dynamics NAV pre nasledujúce krajiny a miestne jazykové nastavenia.
- Belgicko (francúzština) (fr-be)
- Belgicko (holandčina) (nl-be)
Príznaky
V belgickej verzii systému Microsoft Dynamics NAV sa pri zaúčtovaní faktúry od zahraničného dodávateľa, pričom je potrebné zaúčtovať neodpočítateľnú daň z pridanej hodnoty (DPH), neodpočítateľná DPH nevypočíta a nezaúčtuje za zaúčtovanú faktúru. Tento problém sa vyskytuje, ak je typ výpočtu DPH nastavený na možnosť Prenesenie daňovej povinnosti DPH.
Tento problém sa vyskytuje v nasledujúcich produktoch:
- Belgická verzia systému Microsoft Dynamics NAV 2009 s balíkom Service Pack 1 (SP1)
- Belgická verzia systému Microsoft Dynamics NAV 5.0 s balíkom SP1
Riešenie
Informácie o rýchlych opravách
Spoločnosť Microsoft teraz poskytuje podporovanú rýchlu opravu. Jeho účelom je však len vyriešiť problém, ktorý je popísaný v tomto článku. Použite ju len v systémoch, v ktorých sa vyskytol tento konkrétny problém. Táto rýchla oprava môže byť ešte otestovaná. Ak teda nie ste týmto problémom vážne zasiahnutí, odporúčame počkať na ďalší balík Service Pack pre Microsoft Dynamics NAV alebo ďalšiu verziu, ktorá obsahuje túto rýchlu opravu.
Poznámka: V osobitných prípadoch môžu byť poplatky, ktoré sú zvyčajne účtované za hovory s oddelením technickej podpory, zrušené, ak pracovník technickej podpory pre systém Microsoft Dynamics a súvisiace produkty rozhodne, že konkrétna aktualizácia vyrieši váš problém. Zvyčajné náklady na podporu sa budú vzťahovať na ďalšie otázky a problémy podpory, na ktoré sa nevzťahuje konkrétna príslušná aktualizácia.
Informácie o inštalácii
Spoločnosť Microsoft poskytuje príklady programovania len pre ilustráciu bez výslovnej alebo implicitnej záruky. To sa týka (okrem iného) aj implicitných záruk obchodovateľnosti alebo vhodnosti na konkrétny účel. Článok predpokladá, že poznáte predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci technickej podpory spoločnosti Microsoft vám môžu pomôcť vysvetliť funkčnosť konkrétneho postupu, tieto príklady však nebudú upravovať, aby poskytovali ďalšie funkcie alebo zostavili procedúry podľa vašich špecifických požiadaviek.
Poznámka Pred inštaláciou tejto rýchlej opravy overte, či sú všetci používatelia klienta Microsoft Navision odhlásení zo systému. Týka sa to používateľov klientských služieb Microsoft Navision Application Services (NAS). V čase implementácie tejto rýchlej opravy by ste mali byť jediným klientskym používateľom, ktorý je prihlásený.
Ak chcete implementovať túto rýchlu opravu, musíte mať vývojársku licenciu.
Odporúčame priradiť používateľskému kontu v okne Prihlásenie do Windowsu alebo v okne Prihlásenia do databázy ID roly SUPER. Ak používateľskému kontu nie je možné priradiť ID roly SUPER, musíte overiť, či má používateľské konto nasledujúce povolenia:
- Povolenie Upraviť pre objekt, ktorý budete meniť.
- Povolenie na spustenie pre objekt systémového objektu ID 5210 a pre objekt systémového objektu ID 9015.
Poznámka: Ak nepotrebujete vykonať opravu údajov, nemusíte mať práva na ukladacie priestory údajov.
Zmeny kódu
Poznámka: Opravy kódu pred použitím opráv v produkčných počítačoch vždy testujte v kontrolovanom prostredí.
Ak chcete nainštalovať túto rýchlu opravu, zmeňte kód v jednotke kódového čísla Purch.-Post (90).
Postupujte takto:
V ponuke Zobraziť kliknite na položku C/AL Globals a potom pridajte nasledovné premenné na karte Premenné :
Prvá premenná:- Názov: TotalNonDeductVATForRChargeVAT
- DataType: Decimal
Druhá premenná:
- Názov: TotalNonDeductVATFCYForRCVAT
- DataType: Decimal
Tretia premenná:
- Názov: PurchLineForReverseChargeVAT
- DataType: Record
- Podtyp: Nákupný riadok
- V ponuke Zobraziť kliknite na položku Vlastnosti a potom nastavte vlastnosť Dočasné na hodnotu Áno.
Zmeňte kód v spúšťači OnRun takto:
Existujúci kód... TempVATAmountLineRemainder.DELETEALL; PurchLine.CalcVATAmountLines(1,PurchHeader,CombinedPurchLineTemp,TempVATAmountLine); IF PurchLine.FINDSET THEN REPEAT JobPurchLine := PurchLine; ...Náhradný kód
.... TempVATAmountLineRemainder.DELETEALL; PurchLine.CalcVATAmountLines(1,PurchHeader,CombinedPurchLineTemp,TempVATAmountLine); PurchLineForReverseChargeVAT.RESET; // Add this line. PurchLineForReverseChargeVAT.DELETEALL; // Add this line. IF PurchLine.FINDSET THEN REPEAT JobPurchLine := PurchLine; ....Existujúci kód 1
... END ELSE PurchLine.TESTFIELD(Amount,0); RoundAmount(PurchLine."Qty. to Invoice"); IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN BEGIN ReverseAmount(PurchLine); ReverseAmount(PurchLineACY); END; RemQtyToBeInvoiced := PurchLine."Qty. to Invoice"; ...Náhradný kód 1
... END ELSE PurchLine.TESTFIELD(Amount,0); PurchLineForReverseChargeVAT := PurchLine; // Add this line. RoundAmount(PurchLine."Qty. to Invoice"); IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN BEGIN ReverseAmount(PurchLine); ReverseAmount(PurchLineACY); ReverseAmount(PurchLineForReverseChargeVAT); // Add this line. END; PurchLineForReverseChargeVAT.INSERT; // Add this line. RemQtyToBeInvoiced := PurchLine."Qty. to Invoice"; ...Existujúci kód 2
... CASE InvPostingBuffer[1]."VAT Calculation Type" OF InvPostingBuffer[1]."VAT Calculation Type"::"Reverse Charge VAT": // Delete the following lines. BEGIN VATPostingSetup.GET( InvPostingBuffer[1]."VAT Bus. Posting Group",InvPostingBuffer[1]."VAT Prod. Posting Group"); InvPostingBuffer[1]."VAT Amount" := ROUND( (InvPostingBuffer[1].Amount - InvPostingBuffer[1]."Line Discount Amount" - InvPostingBuffer[1]."Inv. Discount Amount") * VATPostingSetup."VAT %" / 100); InvPostingBuffer[1]."VAT Amount (ACY)" := ROUND( (InvPostingBuffer[1]."Amount (ACY)" - InvPostingBuffer[1]."Line Discount Amt. (ACY)" - InvPostingBuffer[1]."Inv. Discount Amt. (ACY)") * VATPostingSetup."VAT %" / 100,Currency."Amount Rounding Precision"); END; // The end of the lines. InvPostingBuffer[1]."VAT Calculation Type"::"Sales Tax": ....Náhradný kód 2
... CASE InvPostingBuffer[1]."VAT Calculation Type" OF InvPostingBuffer[1]."VAT Calculation Type"::"Reverse Charge VAT": CalcAmtVATForReversechargeVAT; // Add this line. InvPostingBuffer[1]."VAT Calculation Type"::"Sales Tax": ...Existujúci kód 3
.... GenJnlLine."Currency Code" := "Currency Code"; // Delete the following lines. GenJnlLine.Amount := -TotalPurchLine."Amount Including VAT"; GenJnlLine."Source Currency Code" := "Currency Code"; GenJnlLine."Source Currency Amount" := -TotalPurchLine."Amount Including VAT"; GenJnlLine."Amount (LCY)" := -TotalPurchLineLCY."Amount Including VAT"; // The end of the lines. IF PurchHeader."Currency Code" = '' THEN GenJnlLine."Currency Factor" := 1 ...Náhradný kód 3
.... GenJnlLine."Currency Code" := "Currency Code"; // Add the following lines. GenJnlLine.Amount := -(TotalPurchLine."Amount Including VAT" + TotalNonDeductVATFCYForRCVAT); GenJnlLine."Source Currency Code" := "Currency Code"; GenJnlLine."Source Currency Amount" := -(TotalPurchLine."Amount Including VAT" + TotalNonDeductVATFCYForRCVAT); GenJnlLine."Amount (LCY)" := -(TotalPurchLineLCY."Amount Including VAT" + TotalNonDeductVATForRChargeVAT); // The end of the new lines. IF PurchHeader."Currency Code" = '' THEN GenJnlLine."Currency Factor" := 1 ...Pridanie novej funkcie CalcAmtVATForReversechargeVAT. Postupujte takto:
V ponuke Zobraziť kliknite na položku C/AL Globals a na kartu Funkcie pridajte nasledovným spôsobom:
- Názov: CalcAmtVATForReversechargeVAT
Kliknite na položku Miestne a na kartu Premenné pridajte nasledovné:
Prvá premenná:- Názov: InvPostingVATAmountFCY
- DataType: Decimal
Druhá premenná:
- Názov: NonDeductVATForReversChargeVAT
- DataType: Decimal
Tretia premenná:
- Názov: NonDeductVATACYForRevsChargVA
- DataType: Decimal
Štvrtá premenná:
- Názov: NonDeductVATFCYForRevsChargVAT
- DataType: Decimal
Pridajte nasledujúce riadky kódu pre spúšťač CalcAmtVATForReversechargeVAT nasledovným spôsobom:
VATPostingSetup.GET( InvPostingBuffer[1]."VAT Bus. Posting Group",InvPostingBuffer[1]."VAT Prod. Posting Group"); PurchLineForReverseChargeVAT.RESET; PurchLineForReverseChargeVAT.SETRANGE("Line No.",InvPostingBuffer[1]."Line No."); PurchLineForReverseChargeVAT.FINDFIRST; NonDeductVATForReversChargeVAT := ROUND( (InvPostingBuffer[1].Amount - InvPostingBuffer[1]."Line Discount Amount" - InvPostingBuffer[1]."Inv. Discount Amount") * VATPostingSetup."VAT %" / 100 * PurchLineForReverseChargeVAT."Non Deductible VAT %" / 100); NonDeductVATACYForRevsChargVAT := ROUND( (InvPostingBuffer[1]."Amount (ACY)" - InvPostingBuffer[1]."Line Discount Amt. (ACY)" - InvPostingBuffer[1]."Inv. Discount Amt. (ACY)") * VATPostingSetup."VAT %" / 100 * PurchLineForReverseChargeVAT."Non Deductible VAT %" / 100, Currency."Amount Rounding Precision"); NonDeductVATFCYForRevsChargVAT := ROUND( (PurchLineForReverseChargeVAT.Amount - InvPostingBuffer[1]."Line Discount Amount" - InvPostingBuffer[1]."Inv. Discount Amount") * VATPostingSetup."VAT %" / 100 * PurchLineForReverseChargeVAT."Non Deductible VAT %" / 100, Currency."Amount Rounding Precision"); InvPostingBuffer[1]."VAT Amount" := ROUND( (InvPostingBuffer[1].Amount - InvPostingBuffer[1]."Line Discount Amount" - InvPostingBuffer[1]."Inv. Discount Amount") * VATPostingSetup."VAT %" / 100) - NonDeductVATForReversChargeVAT; InvPostingBuffer[1]."VAT Amount (ACY)" := ROUND( (InvPostingBuffer[1]."Amount (ACY)" - InvPostingBuffer[1]."Line Discount Amt. (ACY)" - InvPostingBuffer[1]."Inv. Discount Amt. (ACY)") * VATPostingSetup."VAT %" / 100, Currency."Amount Rounding Precision") - NonDeductVATACYForRevsChargVAT; InvPostingVATAmountFCY := ROUND( (PurchLineForReverseChargeVAT.Amount - PurchLineForReverseChargeVAT."Line Discount Amount" - PurchLineForReverseChargeVAT."Inv. Discount Amount") * VATPostingSetup."VAT %" / 100, Currency."Amount Rounding Precision") - NonDeductVATFCYForRevsChargVAT; InvPostingBuffer[1].Amount := InvPostingBuffer[1].Amount + NonDeductVATForReversChargeVAT; InvPostingBuffer[1]."Amount (ACY)" := InvPostingBuffer[1]."Amount (ACY)" + NonDeductVATACYForRevsChargVAT; InvPostingBuffer[1]."VAT Base Amount" := InvPostingBuffer[1]."VAT Base Amount" + NonDeductVATForReversChargeVAT; TotalNonDeductVATForRChargeVAT := TotalNonDeductVATForRChargeVAT + NonDeductVATForReversChargeVAT; TotalNonDeductVATFCYForRCVAT := TotalNonDeductVATFCYForRCVAT + NonDeductVATFCYForRevsChargVAT;
Predpoklady
Ak chcete použiť túto rýchlu opravu, musíte mať nainštalovaný niektorý z nasledujúcich produktov:
- Belgická verzia systému Microsoft Dynamics NAV 2009 s balíkom SP1
- Belgická verzia systému Microsoft Dynamics NAV 5.0 s balíkom SP1
Informácie o odstránení
Túto rýchlu opravu nemožno odstrániť.
Stav
Spoločnosť Microsoft potvrdila, že ide o problém v produktoch spoločnosti Microsoft, ktoré sú uvedené v časti Vzťahuje sa na.
SPOLOČNOSŤ MICROSOFT A/ALEBO JEJ DODÁVATELIA NEPOSKYTUJÚ ŽIADNE VYHLÁSENIA ANI ZÁRUKY TÝKAJÚCE SA VHODNOSTI, SPOĽAHLIVOSTI ALEBO PRESNOSTI INFORMÁCIÍ OBSIAHNUTÝCH V DOKUMENTOCH A SÚVISIACICH GRAFIKÁCH PUBLIKOVANÝCH NA TEJTO WEBOVEJ LOKALITE (ĎALEJ LEN "MATERIÁLY") NA AKÝKOĽVEK ÚČEL.
MATERIÁLY MÔŽU OBSAHOVAŤ TECHNICKÉ NEPRESNOSTI ALEBO TYPOGRAFICKÉ CHYBY A MÔŽU BYŤ KEDYKOĽVEK REVIDOVANÉ BEZ PREDCHÁDZAJÚCEHO UPOZORNENIA. V MAXIMÁLNOM ROZSAHU POVOLENOM PRÍSLUŠNÝMI ZÁKONMI SPOLOČNOSŤ MICROSOFT A/ALEBO JEJ DODÁVATELIA ODMIETAJÚ ZODPOVEDNOSŤ A VYLUČUJÚ VŠETKY VYHLÁSENIA, ZÁRUKY A PODMIENKY, ČI UŽ VÝSLOVNÉ, IMPLICITNÉ ALEBO ZÁKONNÉ, VRÁTANE, NIE VŠAK VÝHRADNE, VYHLÁSENÍ, GARANCIÍ ALEBO PODMIENOK VLASTNÍCTVA, NEPORUŠENIA CUDZÍCH PRÁV, USPOKOJIVÉHO STAVU ALEBO KVALITY, OBCHODOVATEĽNOSTI A VHODNOSTI NA KONKRÉTNY ÚČEL V SÚVISLOSTI S MATERIÁLMI.