Ez a cikk a Microsoft Dynamics NAV (es) nyelvi területi beállításra vonatkozik.
Jelenségek
Tegyük fel, hogy az európai uniós szolgáltatás jelölőnégyzete be van jelölve az áfabevallék-beállítás párbeszédpanelén a spanyol Microsoft Dynamics NAV. A 349-es deklarált fájl generált mennyisége helytelen.
Ez a probléma a következő termékekben fordul elő:
-
A Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) spanyol verziója
-
Az Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) spanyol verziója
Megoldás
Gyorsjavítási információk
A Microsoft mostantól elérhető egy támogatott gyorsjavítással. A probléma azonban csak a jelen cikkben ismertetett probléma megoldására szolgál. Csak az adott problémát tapasztaló rendszerekre alkalmazza. Ez a gyorsjavítás további teszteket kaphat. Ezért ha a probléma nem érinti súlyosan, azt javasoljuk, hogy várjon a következő Microsoft Dynamics NAV 2009 szervizcsomaggal vagy a gyorsjavítást tartalmazó Microsoft Dynamics NAV következő verziójával.
Megjegyzés: Speciális esetekben a támogatási hívásokért általában felmerülő díjakat töröljük, ha a Microsoft Dynamics technikai támogatási szakembere és kapcsolódó termékei azt határozzák meg, hogy egy adott frissítés megoldja a problémát. A szokásos támogatási költségek azokra a további támogatási kérdésekre és problémákra vonatkoznak, amelyek nem jogosultak a szóban forgó frissítésre.
Telepítési információk
A Microsoft csak illusztrációkhoz biztosít programozási példákat, kifejezett vagy hallgatólagos garancia nélkül. Ez nem kizárólagosan magában foglalja az adott célra való forgalomra vagy alkalmazhatóságra vonatkozó vélelmezett garanciát. Ez a cikk abból indul ki, hogy Ön ismeri a bemutatja a programnyelvet, valamint a létrehozási és hibakeresési eljárásokhoz használt eszközöket. A Microsoft terméktámogatási szakemberei elmagyarázzák egy adott eljárás működését, de nem módosítják ezeket a példákat, hogy további funkciókat vagy az Ön igényeinek megfelelő eljárásokat építsen ki.
Megjegyzés: A gyorsjavítás telepítése előtt győződjön meg arról, hogy a Microsoft Navision összes felhasználója kijelentkezett a rendszerből. Ebbe beletartoznak a Microsoft Navision Application Services (NAS) ügyfélfelhasználói is. A gyorsjavítás implementálja, hogy Ön legyen az egyetlen ügyfélfelhasználó, aki be van jelentkezve.
A gyorsjavítás megvalósításához fejlesztői licenccel kell rendelkezik.
Azt javasoljuk, hogy a Felhasználói fiókhoz a Windows Bejelentkezések vagy az Adatbázis-bejelentkezések ablakban a "SUPER" szerepkörazonosítót rendelje hozzá. Ha a felhasználói fiókhoz nem rendelhető hozzá a "SUPER" szerepkörazonosító, ellenőriznie kell, hogy a felhasználói fiók rendelkezik-e az alábbi engedélyekkel:
-
A Módosítani fogja az objektum módosítási engedélyét.
-
The Execute permission for the System Object ID 5210 object and for the System Object ID 9015 object.
Megjegyzés: Az adattárakhoz csak akkor kell jogokat kihozni, ha adatjavítást kell végeznie.
Kódváltozások
Megjegyzés: A kódjavításokat mindig ellenőrzött környezetben tesztelje, mielőtt a javításokat az éles számítógépekre alkalmazza.
A probléma a következő lépésekkel hárítható el:
-
A Make 349 deklaráció jelentése (88) 5. szakaszában lévő kód módosítása a következőképpen:
Meglévő 1-es kódBEGIN
REPEAT
//Delete the following line.
VATInvSales.RESET;
VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);1. cserekód
BEGIN
REPEAT
//Add the follwing lines.
LastTransactionNo := 0;
VATInvSales.RESET;
VATInvSales.SETCURRENTKEY("Transaction No.");
//End of the lines.
VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);Meglévő 2-es kód
IF "VAT Registration No." <> '' THEN BEGIN
IF AmountToIncludein349 <> 0 THEN BEGIN
//Delete the following lines.
OpTriang := 'X';
AmountOpTri := AmountOpTri + AmountToIncludein349
//End of the lines.
END ELSE BEGIN
OpTriang := 'X';Cserekód 2
IF "VAT Registration No." <> '' THEN BEGIN
IF AmountToIncludein349 <> 0 THEN BEGIN
//Add the following lines.
IF VATInvSales."Transaction No." <> LastTransactionNo THEN BEGIN
OpTriang := 'X';
AmountOpTri := AmountOpTri + AmountToIncludein349;
END;
//End of the lines.
END ELSE BEGIN
OpTriang := 'X';Meglévő 3-as kód
// OpTriang := 'X';
// AmountOpTri := AmountOpTri + VATInvSales.Base;
UNTIL VATInvSales.NEXT = 0;
END;Cserekód: 3
// OpTriang := 'X';
// AmountOpTri := AmountOpTri + VATInvSales.Base;
//Add the following line.
LastTransactionNo := VATInvSales."Transaction No.";
UNTIL VATInvSales.NEXT = 0;
END;Meglévő 4-es kód
UNTIL VATInvSales.NEXT = 0;
END;
//Delete the following line.
VATInvSales.RESET;
VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);4-es cserekód
UNTIL VATInvSales.NEXT = 0;
END;
//Add the following lines.
LastTransactionNo := 0;
VATInvSales.RESET;
VATInvSales.SETCURRENTKEY("Transaction No.");
//End of the lines.
VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);Meglévő 5-ös kód
((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Delete the following lines.
IF AmountToIncludein349 <> 0 THEN
NormalAmount := NormalAmount + AmountToIncludein349
ELSE
//End of the lines.
NormalAmount := NormalAmount + VATInvSales.Base;
END ELSE5-ös cserekód
((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Add the following lines.
IF AmountToIncludein349 <> 0 THEN BEGIN
IF VATInvSales."Transaction No." <> LastTransactionNo THEN
NormalAmount := NormalAmount + AmountToIncludein349;
END ELSE
//End of the lines.
NormalAmount := NormalAmount + VATInvSales.Base;
END ELSEMeglévő 6-os kód
END;
// NormalAmount := NormalAmount + VATInvSales.Base;
UNTIL VATInvSales.NEXT = 0;
END;Cserekód: 6
END;
// NormalAmount := NormalAmount + VATInvSales.Base;
//Add the following line.
LastTransactionNo := VATInvSales."Transaction No.";
UNTIL VATInvSales.NEXT = 0;
END;Meglévő 7-es kód
END;
//Delete the following line.
VATInvSales.RESET;
VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);Cserekód: 7
END;
//Add the following lines.
LastTransactionNo := 0;
VATInvSales.RESET;
VATInvSales.SETCURRENTKEY("Transaction No.");
//End of the lines.
VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);Meglévő 8-as kód
((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Delete the following lines.
IF AmountToIncludein349 <> 0 THEN
AmountEUService := AmountEUService + AmountToIncludein349
ELSE
//End of the lines.
AmountEUService := AmountEUService + VATInvSales.Base;
END ELSE8-as cserekód
((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Add the following lines.
IF AmountToIncludein349 <> 0 THEN BEGIN
IF VATInvSales."Transaction No." <> LastTransactionNo THEN
AmountEUService := AmountEUService + AmountToIncludein349;
END ELSE
//End of the lines.
AmountEUService := AmountEUService + VATInvSales.Base;
END ELSEMeglévő 9-es kód
END;
END;
UNTIL VATInvSales.NEXT = 0;9-es cserekód
END;
END;
//Add the following line.
LastTransactionNo := VATInvSales."Transaction No.";
UNTIL VATInvSales.NEXT = 0; -
A Make 349 deklaráció (88) 6. szakaszában lévő kód módosítása a következőképpen:
Meglévő 1-es kódBEGIN
REPEAT
//Delete the following line.
VATInvPurch.RESET;
VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);1. cserekód
BEGIN
REPEAT
//Add the following lines.
LastTransactionNo := 0;
VATInvPurch.RESET;
VATInvPurch.SETCURRENTKEY("Transaction No.");
//End of the lines.
VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);Meglévő 2-es kód
IF "VAT Registration No." <> '' THEN BEGIN
IF AmountToIncludein349 <> 0 THEN BEGIN
//Delete the following lines.
OpTriang := 'X';
AmountOpTri := AmountOpTri + AmountToIncludein349;
//End of the lines.
END ELSE BEGIN
OpTriang := 'X';Cserekód 2
IF "VAT Registration No." <> '' THEN BEGIN
IF AmountToIncludein349 <> 0 THEN BEGIN
//Add the following lines.
IF VATInvPurch."Transaction No." <> LastTransactionNo THEN BEGIN
OpTriang := 'X';
AmountOpTri := AmountOpTri + AmountToIncludein349;
END;
//End of the lines.
END ELSE BEGIN
OpTriang := 'X';Meglévő 3-as kód
// OpTriang := 'X';
// AmountOpTri := AmountOpTri + VATInvPurch.Base;
UNTIL VATInvPurch.NEXT = 0;
END;Cserekód: 3
// OpTriang := 'X';
// AmountOpTri := AmountOpTri + VATInvPurch.Base;
//Add the following line.
LastTransactionNo := VATInvPurch."Transaction No.";
UNTIL VATInvPurch.NEXT = 0;
END;Meglévő 4-es kód
UNTIL VATInvPurch.NEXT = 0;
END;
//Delete the following line.
VATInvPurch.RESET;
VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);4-es cserekód
UNTIL VATInvPurch.NEXT = 0;
END;
//Add the following lines.
LastTransactionNo := 0;
VATInvPurch.RESET;
VATInvPurch.SETCURRENTKEY("Transaction No.");
//End of the lines.
VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);Meglévő 5-ös kód
((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Delete the following lines.
IF AmountToIncludein349 <> 0 THEN
NormalAmount := NormalAmount + AmountToIncludein349
ELSE
//End of the lines.
NormalAmount := NormalAmount + VATInvPurch.Base;
END ELSE5-ös cserekód
((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Add the following lines.
IF AmountToIncludein349 <> 0 THEN BEGIN
IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
NormalAmount := NormalAmount + AmountToIncludein349;
END ELSE
//End of the lines.
NormalAmount := NormalAmount + VATInvPurch.Base;
END ELSEMeglévő 6-os kód
END;
// NormalAmount := NormalAmount + VATInvPurch.Base;
UNTIL VATInvPurch.NEXT = 0;
END;Cserekód: 6
END;
// NormalAmount := NormalAmount + VATInvPurch.Base;
//Add the following line.
LastTransactionNo := VATInvPurch."Transaction No.";
UNTIL VATInvPurch.NEXT = 0;
END;Meglévő 7-es kód
UNTIL VATInvPurch.NEXT = 0;
END;
//Delete the following line.
VATInvPurch.RESET;
VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);
VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);Cserekód: 7
UNTIL VATInvPurch.NEXT = 0;
END;
//Add the following lines.
LastTransactionNo := 0;
VATInvPurch.RESET;
VATInvPurch.SETCURRENTKEY("Transaction No.");
//End of the lines.
VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);
VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);Meglévő 8-as kód
THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Delete the following lines.
IF AmountToIncludein349 <> 0 THEN
AmountEUService := AmountEUService + AmountToIncludein349
ELSE
//End of the lines.
AmountEUService := AmountEUService + VATInvPurch.Base;
END ELSE8-as cserekód
THEN BEGIN
IF "VAT Registration No." <> '' THEN BEGIN
//Add the following lines.
IF AmountToIncludein349 <> 0 THEN BEGIN
IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
AmountEUService := AmountEUService + AmountToIncludein349;
END ELSE
//End of the lines.
AmountEUService := AmountEUService + VATInvPurch.Base;
END ELSEMeglévő 9-es kód
END;
END;
UNTIL VATInvPurch.NEXT = 0;9-es cserekód
END;
END;
//Add the following line.
LastTransactionNo := VATInvPurch."Transaction No.";
UNTIL VATInvPurch.NEXT = 0; -
Vegyen fel egy új globális változót a Make 349 deklaráció jelentésbe (88), majd adja meg a változót az alábbiak szerint:
-
Név:LastTransactionNo@1100072
-
Adattípus: Egész
-
Előfeltételek
A gyorsjavítás telepítéséhez az alábbi termékek egyikével kell telepítve lennie:
-
A Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) spanyol verziója
-
Az Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) spanyol verziója
A gyorsjavítás telepítéséhez telepítve kell lennie a Spanyol 349 jelentésnek.
További információért keresse fel a Microsoft következő webhelyét: Spanyol 349-jelentés emellett a gyorsjavítás telepítéséhez telepítenie kell az
ÁFA 2010 csomagot.
További információért keresse fel a Microsoft következő webhelyét: Microsoft Dynamics NAV
2010 áfatámogatása
Eltávolítási információk
Ez a gyorsjavítás nem távolítható el.
Állapot
A Microsoft megerősítette, hogy ez a probléma „A következőkre vonatkozik:” részben felsorolt Microsoft-termékekre vonatkozik.
Megjegyzés: Ez a "FAST PUBLISH" (FAST PUBLISH) cikk közvetlenül a Microsoft támogatási szervezetében készült. Az anyagok a közzétételük gyorsaságából következően tartalmazhatnak sajtóhibákat, illetve külön értesítés nélkül bármikor átdolgozáson eshetnek át. További megfontolandó szempontokért olvassa el a Használati feltételek rendelkezéseit.
