Käesolev artikkel kehtib Microsoft Dynamics NAV Ungari (hu) keel asukoha.
Sümptomid
Endale rakendada käigultparanduse 2664466 Ungari versioonis Microsoft Dynamics nav-i 2009 R2. Sisestatud arve arve statistika arvutamisel ümardatakse summa käibemaks (VAT) valesti.
Käigultparanduste 2664466 kohta lisateabe saamiseks klõpsake Microsofti teabebaasi (Knowledge Base) artikli kuvamiseks järgmist artiklinumbrit:
2664466 käibemaksu summa on vale, kui postitate arve valuuta Ungari versioonis Microsoft Dynamics NAV 5.0 Service Pack 1
Lahendus
Kiirparanduse teave
Lasknud välja toetatava käigultparanduse on nüüd Microsoftilt saadaval. Kuid see on ette nähtud ainult selles artiklis kirjeldatud probleemi kõrvaldamiseks. Rakendage seda ainult süsteemides, kus ilmneb see konkreetne probleem. Seda käigultparandust võidakse täiendavalt testida. Seega, kui probleem teie tööd tõsiselt ei kahjusta, soovitame oodata järgmist hoolduspaketti Microsoft Dynamics nav-i 2009 või järgmise Microsoft Dynamics nav-i versiooni, mis sisaldab seda kiirparandust.
Märkus. Erijuhtudel kulud, mis tekivad teatud palub tühistada saab kui tehniline toetus Professional Microsoft Dynamics ja nendega seotud toodete leiab, et mõni konkreetne värskendus lahendab teie probleemi. Tavaline tugiteenuste kohaldatakse täiendavat tugiteenust vajavatele küsimustele ning probleemidele, mis pole lahendatavad konkreetse värskenduse installimisega.
Installiteave
Microsoft pakub programmeerimisnäiteid ainult artikli illustreerimiseks ilma igasuguse otsese või kaudse garantiita. See hõlmab, kuid ei piirdu kaudseid garantiisid turustatavuse või kindlaks otstarbeks sobivusega. See artikkel eeldab, et olete demonstreeritava programmeerimiskeelega programmeerimise keel ning luua protseduuride ja silumiseks kasutatavate tööriistadega tuttav. Microsofti tugitehnikud võivad aidata mõne konkreetse protseduuri talitlust selgitada. Siiski ei muuda nad neid näiteid lisafunktsioonide pakkumiseks ega Koosta vastavaid protseduure teie konkreetsetele nõuetele.
Märkus. Enne selle kiirparanduse installimist veenduge, et kõik Microsoft Dynamics nav-i kliendi kasutajat sisse loginud süsteem välja. See hõlmab Microsoft Dynamics nav-i rakenduste Server (NAS) teenuseid. Peaks olema ainult kliendi kasutaja on sisse logitud, kui otsustate seda käigultparandust.
Selle kiirparanduse rakendamiseks peab teil olema arendaja litsentsi.
Soovitame Windowsi sisselogimise aken või aken andmebaasi logimine kasutajakonto määrata "SUPER" rolli ID. Kui "SUPER" rolli ID-d ei saa määratud kasutajakonto, peate veenduma, et kasutaja konto on järgmised õigused:
-
Sa muutuvad objekti Muuda õigusi.
-
Käivita luba süsteemi objekti ID 5210 objekti ja süsteemi objekti ID 9015
objekti.
Märkus. Teil pole õigust andmeid talletab enne, kui olete andmete parandamiseks.
Koodi muudatusi
Märkus. Alati test koodi lahendab kontrollitavas keskkonnas enne rakendamist tootmine arvutite parandused.
Selle probleemi lahendamiseks toimige järgmiselt.
-
Muuta koodi väljad tabeli müügi rida (37) järgmiselt:
Kood 1...
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Kood 1
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Kood 2
...
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Asendamine kood 2
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuta koodi UpdateVATAmounts funktsiooni tabeli müügi rida (37) järgmiselt:
Kood...
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Eemaldamise teave
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuta koodi UpdateVATOnLines funktsiooni tabeli müügi rida (37) järgmiselt:
Kood..."VAT Base Amount" := NewVATBaseAmount;
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Eemaldamise teave
..."VAT Base Amount" := NewVATBaseAmount;
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
CalcVATAmountLines funktsiooni tabeli müügi rida (37) koodi muutmiseks järgmiselt:
Kood...
// Delete the following line.CalcVATToReport(SalesHeader,"VAT Base","VAT Amount" - "VAT Difference",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Eemaldamise teave
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base","Amount Including VAT" - "VAT Difference",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuda koodi CalcVATToReportfunktsiooni tabeli müügi rida (37) järgmiselt:
Kood 1...
// Delete the following line.
PROCEDURE CalcVATToReport@1360001(SalesHeader@1360000 : Record 36;VATBaseAmount@1360001 : Decimal;VATAmount@1360002 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal);
// End of the deleted line.
BEGIN
...Kood 1
...
// Add the following lines.
PROCEDURE CalcVATToReport@1360001(SalesHeader@1360000 : Record 36;VATBaseAmount@1360001 : Decimal;AmtInclVAT@1360005 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal);
VAR
AmountLCY@1360006 : Decimal;
AmtInclVATLCY@1360007 : Decimal;
// End of the added lines.
BEGIN
...Kood 2
...ROUND(VATBaseAmount / SalesHeader."VAT Currency Factor");
// Delete the following lines.
VATAmountToReport :=
ROUND(VATAmount / SalesHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := VATAmount;
// End of the deleted lines.
END;
...Asendamine kood 2
...ROUND(VATBaseAmount / SalesHeader."VAT Currency Factor");
// Add the following lines.
AmountLCY :=
ROUND(VATBaseAmount / SalesHeader."VAT Currency Factor");
AmtInclVATLCY :=
ROUND(AmtInclVAT / SalesHeader."VAT Currency Factor");
VATAmountToReport :=
AmtInclVATLCY - AmountLCY;
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := AmtInclVAT - VATBaseAmount;
// End of the added lines.
END;
... -
Välju tabelis ostutellimuse rea (39) koodi muutmiseks järgmiselt:
Kood 1...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Kood 1
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Kood 2
...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Asendamine kood 2
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Muuda koodi ostutellimuse rea tabeli (39) funktsioonis UpdateVATAmounts järgmiselt:
Kood...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Eemaldamise teave
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Muuda koodi ostutellimuse rea tabeli (39) funktsioonis UpdateVATOnLines järgmiselt:
Kood...END;
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Eemaldamise teave
...END;
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
CalcVATAmountLines ostutellimuse rea tabelis (39) koodi muutmiseks järgmiselt:
Kood...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base","VAT Amount" - "VAT Difference",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Eemaldamise teave
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base","Amount Including VAT" - "VAT Difference",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Muuda koodi ostutellimuse rea tabeli (39) funktsioonis CalcVATToReport järgmiselt:
Kood 1...
// Delete the following lines.
PROCEDURE CalcVATToReport@1360000(PurchHeader@1360000 : Record 38;VATBaseAmount@1360001 : Decimal;VATAmount@1360002 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal;NonDeductableVATPct@1360005 : Decimal);
VAR
NonDeductableVATAmount@1360006 : Decimal;
BEGIN
NonDeductableVATAmount := VATAmount * NonDeductableVATPct / 100;
// End of the deleted lines.
IF PurchHeader."Currency Code" <> '' THEN BEGIN
...Kood 1
...
// Add the following lines.
PROCEDURE CalcVATToReport@1360000(PurchHeader@1360000 : Record 38;VATBaseAmount@1360001 : Decimal;AmtInclVAT@1360007 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal;NonDeductableVATPct@1360005 : Decimal);
VAR
NonDeductableVATAmount@1360006 : Decimal;
AmountLCY@1360008 : Decimal;
AmtInclVATLCY@1360009 : Decimal;
BEGIN
NonDeductableVATAmount := (AmtInclVAT - VATBaseAmount) * NonDeductableVATPct / 100;
// End of the added lines.
IF PurchHeader."Currency Code" <> '' THEN BEGIN
...Kood 2
...ROUND((VATBaseAmount + NonDeductableVATAmount) / PurchHeader."VAT Currency Factor");
// Delete the following lines.
VATAmountToReport :=
ROUND((VATAmount - NonDeductableVATAmount) / PurchHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount + ROUND(NonDeductableVATAmount);
VATAmountToReport := VATAmount - ROUND(NonDeductableVATAmount);
// End of the deleted lines.
END
...Asendamine kood 2
...ROUND((VATBaseAmount + NonDeductableVATAmount) / PurchHeader."VAT Currency Factor");
// Add the following lines.
AmountLCY :=
ROUND(VATBaseAmount / PurchHeader."VAT Currency Factor");
AmtInclVATLCY :=
ROUND(AmtInclVAT / PurchHeader."VAT Currency Factor");
VATAmountToReport :=
AmtInclVATLCY - AmountLCY - ROUND(NonDeductableVATAmount / PurchHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount + ROUND(NonDeductableVATAmount);
VATAmountToReport := AmtInclVAT - VATBaseAmount - ROUND(NonDeductableVATAmount);
// End of the added lines.
END
... -
Muuda koodi rida tabelis (5902) väljad järgmiselt:
Kood 1...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Kood 1
...
// Add the following line.CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Kood 2
...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Asendamine kood 2
...
// Add the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuda koodi rida tabeli (5902) funktsioonis UpdateVATAmounts järgmiselt:
Kood...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Eemaldamise teave
...
// Add the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuda koodi rida tabeli (5902) funktsioonis CalcVATAmountLines järgmiselt:
Kood...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base","VAT Amount" - "VAT Difference",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Eemaldamise teave
...
// Add the following line.CalcVATToReport(ServHeader,"VAT Base","Amount Including VAT" - "VAT Difference",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuda koodi rida tabeli (5902) funktsioonis UpdateVATOnLines järgmiselt:
Kood..."VAT Base Amount" := NewVATBaseAmount;
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Eemaldamise teave
..."VAT Base Amount" := NewVATBaseAmount;
// Add the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Muuda koodi rida tabeli (5902) funktsioonis CalcVATToReport järgmiselt:
Kood 1...
// Delete the following line.
PROCEDURE CalcVATToReport@1360000(ServHeader@1360004 : Record 5900;VATBaseAmount@1360003 : Decimal;VATAmount@1360002 : Decimal;VAR VATBaseAmountToReport@1360001 : Decimal;VAR VATAmountToReport@1360000 : Decimal);
// End of the deleted line.
BEGIN
...Kood 1
...
// Add the following lines.
PROCEDURE CalcVATToReport@1360000(ServHeader@1360004 : Record 5900;VATBaseAmount@1360003 : Decimal;AmtInclVAT@1360007 : Decimal;VAR VATBaseAmountToReport@1360001 : Decimal;VAR VATAmountToReport@1360000 : Decimal);
VAR
AmountLCY@1360005 : Decimal;
AmtInclVATLCY@1360006 : Decimal;
// End of the added lines.
BEGIN
...Kood 2
...ROUND(VATBaseAmount / ServHeader."VAT Currency Factor");
// Delete the following lines.
VATAmountToReport :=
ROUND(VATAmount / ServHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := VATAmount;
// End of the deleted lines.
END;
...Asendamine kood 2
...ROUND(VATBaseAmount / ServHeader."VAT Currency Factor");
// Add the following lines.
AmountLCY :=
ROUND(VATBaseAmount / ServHeader."VAT Currency Factor");
AmtInclVATLCY :=
ROUND(AmtInclVAT / ServHeader."VAT Currency Factor");
VATAmountToReport :=
AmtInclVATLCY - AmountLCY;
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := AmtInclVAT - VATBaseAmount;
// End of the added lines.
END;
... -
Muuta koodi DivideAmount funktsiooni müügi-posti koodiplokk (80) järgmiselt:
Kood 1...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';SalesLineQty@1001 : Decimal);
// Delete the following lines.
VAR
TotalVATBaseAmtLCY@1360001 : Decimal;
TotalVATAmountLCY@1360000 : Decimal;
// End of the deleted lines.
BEGIN
...Kood 1
...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';SalesLineQty@1001 : Decimal);
BEGIN
...Kood 2
...END;
// Delete the following lines.
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" + "VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Amount to Report" + "Amount Including VAT" - "VAT Base Amount" - "VAT Difference";
CalcVATToReport(SalesHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
// End of the deleted lines.
...Asendamine kood 2
...END;
// Add the following line.
CalcRoundedVATToReport(SalesLine,SalesHeader);
// End of the added line.
... -
Looge funktsiooni müügi-posti koodiplokk (80) järgmiselt:
LOCAL PROCEDURE CalcRoundedVATToReport@1360026(VAR SalesLine@1360002 : Record 37;SalesHeader@1360003 : Record 36);VAR
TotalVATBaseAmtLCY@1360005 : Decimal;
TotalVATAmountLCY@1360004 : Decimal;
BEGIN
WITH SalesLine DO BEGIN
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" +=
"VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" +=
"Amount Including VAT";
CalcVATToReport(SalesHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
END;
END; -
Muuta koodi DivideAmount funktsiooni Purch.-Post koodiplokk (90) järgmiselt:
Kood 1...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';PurchLineQty@1001 : Decimal);
// Delete the following lines.
VAR
TotalVATBaseAmtLCY@1360001 : Decimal;
TotalVATAmountLCY@1360000 : Decimal;
// End of the deleted lines.
BEGIN
...Kood 1
...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';PurchLineQty@1001 : Decimal);
BEGIN
...Kood 2
...END;
// Delete the following lines.
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" + "VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Amount to Report" + "Amount Including VAT" - "VAT Base Amount" - "VAT Difference";
PurchLine.CalcVATToReport(PurchHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY,"VAT % (Non Deductible)");
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
// End of the deleted lines.
...Asendamine kood 2
...END;
// Add the following line.
CalcRoundedVATToReport(PurchLine,PurchHeader);
// End of the added line.
... -
Funktsiooni luua selle ost.-Post koodiplokk (90) järgmiselt:
LOCAL PROCEDURE CalcRoundedVATToReport@1360026(VAR PurchLine@1360002 : Record 39;PurchHeader@1360003 : Record 38);VAR
TotalVATBaseAmtLCY@1360005 : Decimal;
TotalVATAmountLCY@1360004 : Decimal;
BEGIN
WITH PurchLine DO BEGIN
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" +=
"VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" +=
"Amount Including VAT";
CalcVATToReport(PurchHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY,"VAT % (Non Deductible)");
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
END;
END; -
Muuda koodi DivideAmount funktsioon Serv summa Hooldushalduse koodiplokk (5986) järgmiselt:
Kood 1...ChargeableQty@1006 : Decimal;
// Delete the following lines.
TotalVATBaseAmtLCY@1360001 : Decimal;
TotalVATAmountLCY@1360000 : Decimal;
// End of the deleted lines.
BEGIN
...Kood 1
...ChargeableQty@1006 : Decimal;
BEGIN
...Kood 2
...END;
// Delete the following lines.
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" + "VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Amount to Report" + "Amount Including VAT" - "VAT Base Amount" - "VAT Difference";
CalcVATToReport(ServiceHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
// End of the deleted lines.
...Asendamine kood 2
...END;
// Add the following line.
CalcRoundedVATToReport(ServiceLine,TempVATAmountLineRemainder,ServHeader);
// End of the added line.
... -
Looge funktsiooni ning Serv summa Hooldushalduse koodiplokk (5986) järgmiselt:
LOCAL PROCEDURE CalcRoundedVATToReport@1360001(VAR ServiceLine@1360002 : Record 5902;VAR TempVATAmountLineRemainder@1360004 : Record 290;ServHeader@1360003 : Record 5900);VAR
TotalVATBaseAmtLCY@1360006 : Decimal;
TotalVATAmountLCY@1360005 : Decimal;
BEGIN
WITH ServiceLine DO BEGIN
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" +=
"VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" +=
"Amount Including VAT";
CalcVATToReport(ServHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
END;
END;
Eeltingimused
Ungari versioonis Microsoft Dynamics nav-i 2009 R2 selle kiirparanduse rakendamiseks peab teil olema.
Eemaldamise teave
See käigultparandus ei saa eemaldada.
Olek
Microsoft on kinnitanud, et see probleem esineb jaotises "Kehtib järgmiste toodete kohta" loetletud Microsofti toodetel.
Märkus. See on "Kiire avaldamise" artikli loonud otse Microsofti tugiteenuse pakkujalt. Siintoodud teave on esitatud lähtudes-olemasoleval kujul vastusena ilmnenud probleemidele. Kiire avaldamise materjalides esineda trükivigu ja võidakse muuta ette teatamata. Vaadake Kasutustingimusedmuid kaalutlusi.
