Sümptomid
Pärast seda, kui installite Microsoft Dynamics nav-i 2009 Itaalia versioon KB2694168 , luuakse valesid kirjeid kui rakendate kreeditarve müügiarve ja realiseerimata käibemaksu kaasatud. Järgige juhiseid koodi muudatusi selle probleemi lahendamiseks jaotisse. See probleem ilmneb järgmiste toodetega:
-
Itaalia versioonis Microsoft Dynamics nav-i 2009 R2
-
Itaalia versioonis Microsoft Dynamics nav-i 2009 SP1
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 GetUnRealizedVATPart funktsiooni tabelis KM kanne (254) järgmiselt:
Kood...ELSE BEGIN
IF (DocType = DocType::"Credit Memo") THEN BEGIN IF (-TotalPayments + ("Remaining Unrealized Amount" + "Remaining Unrealized Base")) <= 0 THEN EXIT(1) END ELSE BEGIN // Delete the following lines. IF (-TotalPayments + ("Remaining Unrealized Amount" + "Remaining Unrealized Base")) < 0 THEN EXIT(CalcVatPart(GetCurrencyCode(), 1.0, TotalPayments, ("Remaining Unrealized Amount" + "Remaining Unrealized Base"))) // End of the deleted lines. ELSE EXIT(1) END; END; END; ...Eemaldamise teave
...ELSE BEGIN
IF (DocType = DocType::"Credit Memo") THEN BEGIN IF (-TotalPayments + ("Remaining Unrealized Amount" + "Remaining Unrealized Base")) <= 0 THEN EXIT(1) END ELSE BEGIN // Add the following lines. IF (-TotalPayments - ABS("Remaining Unrealized Amount" + "Remaining Unrealized Base")) < 0 THEN EXIT(CalcVatPart(GetCurrencyCode(), 1.0, ABS(TotalPayments), ABS("Remaining Unrealized Amount" + "Remaining Unrealized Base"))) // End of the added lines. ELSE EXIT(1) END; END; END; ... -
Muuta koodi InsertVAT funktsiooni koodiplokk (12) järgmiselt:
Kood...IF UnrealizedVAT THEN BEGIN
VATPostingSetup.TESTFIELD("Sales VAT Unreal. Account"); InitGLEntry( VATPostingSetup."Sales VAT Unreal. Account", GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE); // VSTF298177.begin IF GLEntry."Document Type" = GLEntry."Document Type"::"Credit Memo" THEN UnrealizedVATPosted := TRUE; // VSTF298177.end END ELSE BEGIN VATPostingSetup.TESTFIELD("Sales VAT Account"); InitGLEntry( VATPostingSetup."Sales VAT Account", GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE); ...Eemaldamise teave
...IF UnrealizedVAT THEN BEGIN
VATPostingSetup.TESTFIELD("Sales VAT Unreal. Account"); InitGLEntry( VATPostingSetup."Sales VAT Unreal. Account", GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE); // Delete the following lines. // VSTF298177.begin IF GLEntry."Document Type" = GLEntry."Document Type"::"Credit Memo" THEN UnrealizedVATPosted := TRUE; // VSTF298177.end // End of the deleted lines. END ELSE BEGIN VATPostingSetup.TESTFIELD("Sales VAT Account"); InitGLEntry( VATPostingSetup."Sales VAT Account", GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE); ... -
Muuta koodi CustUnrealizedVAT funktsiooni koodiplokk (12) järgmiselt:
Kood 1...ROUND(
VATEntry2."Add.-Curr. Rem. Unreal. Base" * VATPart, AddCurrency."Amount Rounding Precision"); END; // Delete the following lines. TotalPayments := TotalPayments - (VATEntry2."Remaining Unrealized Amount" + VATEntry2."Remaining Unrealized Base"); IF VATAmount <> 0 THEN BEGIN // IT0028 // VSTF298177.begin IF NOT UnrealizedVATPosted THEN BEGIN // End of the deleted lines. InitGLEntry(SalesVATUnrealAccount,-VATAmount,0,FALSE,TRUE); GLEntry."Additional-Currency Amount" := -VATAmountAddCurr; GLEntry."Bal. Account No." := SalesVATAccount; SummarizeVAT( GLSetup."Summarize G/L Entries",GLEntry,TempGLEntryVAT,InsertedTempGLEntryVAT); ...Kood 1
...ROUND(
VATEntry2."Add.-Curr. Rem. Unreal. Base" * VATPart, AddCurrency."Amount Rounding Precision"); END; // Add the following lines. IF TotalPayments + ABS(VATEntry2."Remaining Unrealized Amount" + VATEntry2."Remaining Unrealized Base") < 0 THEN TotalPayments := TotalPayments - (VATEntry2."Remaining Unrealized Amount" + VATEntry2."Remaining Unrealized Base"); IF VATAmount <> 0 THEN BEGIN // IT0028 // End of the added lines. InitGLEntry(SalesVATUnrealAccount,-VATAmount,0,FALSE,TRUE); GLEntry."Additional-Currency Amount" := -VATAmountAddCurr; GLEntry."Bal. Account No." := SalesVATAccount; SummarizeVAT( GLSetup."Summarize G/L Entries",GLEntry,TempGLEntryVAT,InsertedTempGLEntryVAT); ...Kood 2
...InitGLEntry(SalesVATUnrealAccount,-VATAmount,0,FALSE,TRUE);
GLEntry."Additional-Currency Amount" := -VATAmountAddCurr; GLEntry."Bal. Account No." := SalesVATAccount; SummarizeVAT( GLSetup."Summarize G/L Entries",GLEntry,TempGLEntryVAT,InsertedTempGLEntryVAT); END; // VSTF298177.end InitGLEntry(SalesVATAccount,VATAmount,0,FALSE,TRUE); GLEntry."Additional-Currency Amount" := VATAmountAddCurr; GLEntry."Bal. Account No." := SalesVATUnrealAccount; GLEntry."Gen. Posting Type" := VATEntry2.Type; ...Asendamine kood 2
...InitGLEntry(SalesVATUnrealAccount,-VATAmount,0,FALSE,TRUE);
GLEntry."Additional-Currency Amount" := -VATAmountAddCurr; GLEntry."Bal. Account No." := SalesVATAccount; SummarizeVAT( GLSetup."Summarize G/L Entries",GLEntry,TempGLEntryVAT,InsertedTempGLEntryVAT); // Delete the following lines. END; // VSTF298177.end // End of the deleted lines. InitGLEntry(SalesVATAccount,VATAmount,0,FALSE,TRUE); GLEntry."Additional-Currency Amount" := VATAmountAddCurr; GLEntry."Bal. Account No." := SalesVATUnrealAccount; GLEntry."Gen. Posting Type" := VATEntry2.Type; ...
Eeltingimused
Teil peab olema üks selle kiirparanduse installinud järgmisi tooteid:
-
Itaalia versioonis Microsoft Dynamics nav-i 2009 R2
-
Itaalia versioonis Microsoft Dynamics nav-i 2009 SP1
Lisaks peab teil olema KB2694168 installitud.
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. Vt Kasutustingimusedmuid kaalutlusi.