Bu makale Microsoft Dynamics NAV için İspanyolca (es) dil yerel ayar için geçerlidir.
Belirtiler
Microsoft Dynamics NAV 2547942 Düzeltmesi uygulanmış olduğunu varsayalım. Ancak, İspanyolca 349 KDV beyannamesi hala tutarlar yerel para birimi cinsinden yerine belgede kullanılan para birimi cinsinden verir. Dışa aktarılan tutar vergi yetkililerine rapor etmek için gereken kullanıcı yerel para birimi cinsinden yerine belgede kullanılan para birimi tutarı olarak bir müşteri veya satıcı kartına herhangi bir döviz cinsi olan, ancak para birimi de dahil olmak üzere bir belge deftere nakledildiğinde, 349 beyannamesi verilen tutarlar, yanlıştır.
Bu sorun aşağıdaki ürünlerde oluşur:
-
Microsoft Dynamics NAV 2013
-
Microsoft Dynamics NAV 2009 R2
-
Microsoft Dynamics NAV 2009 Service Pack 1
Çözüm
Düzeltme bilgileri
Artık Microsoft tarafından desteklenen bir düzeltme sağlanmaktadır. Ancak bunun yalnızca bu makalede anlatılan sorunu düzeltmesi amaçlanmıştır. Yalnızca bu özel sorunla karşılaşmış olan sistemlere uygulayın. Bu düzeltme ek sınama uygulanabilir. Bu nedenle, bu sorundan ciddi bir şekilde etkilenmiyorsanız, Microsoft Dynamics NAV 2013 sonraki hizmet paketini veya, bu düzeltmeyi içeren bir sonraki Microsoft Dynamics NAV sürümü için beklemek öneririz.
Not: Özel durumlarda, destek aramaları teknik destek uzmanı Microsoft Dynamics ve ilgili ürünlere yönelik iptal edilebilir çözeceğini giderleri belirleyen belirli bir güncelleştirmenin sorununuzu. Ek destek sorularına ve söz konusu güncelleştirme için geçerli olmayan sorunlara normal destek ücretleri uygulanır.
Yükleme bilgileri
Microsoft, programlama örneklerini yalnızca gösterim amacıyla zımni veya açık garanti olmadan sağlar. Bu, satılabilirlik veya belirli bir amaca uygunluk açısından zımni garantileri içerir ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama dilini, yordamları oluşturmak ve yordamlardan hata ayıklamak için kullanılan araçları bildiğinizi varsayar. Microsoft destek mühendisleri belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir. Ancak, işlevsellik sağlamak veya yordamlar, belirli gereksinimlerinizi karşılayacak şekilde geliştirmek amacıyla bu örnekleri değiştirmezler.
Not: Bu düzeltmeyi yüklemeden önce tüm Microsoft Navision istemcisi kullanıcılar sistem oturum doğrulayın. Bu, Microsoft Navision uygulama Hizmetleri (NAS) istemci kullanıcıları içerir. Bu düzeltmeyi uyguladığınızda yalnızca istemci kullanıcının oturum açmış olması gerekir.
Bu düzeltmeyi uygulamak için bir geliştirici lisansı olması gerekir.
Kullanıcı hesabının Windows oturumu açma penceresini veya veritabanı oturumu açma penceresi "Süper" rol kimliği atanması öneririz Kullanıcı hesabı "Süper" rol Kimliği atanamaz, kullanıcı hesabı aşağıdaki izinlere sahip olduğunu doğrulamanız gerekir:
-
Nesnenin, değiştirme değişiklik yapma izni.
-
Execute izni Sistem nesne kimliği 5210 nesnenin ve nesne kimliği 9015 sistem nesnesi için.
Not: Veri onarım gerçekleştirmek zorunda sürece veri depoları haklarına sahip olmanız gerekmez.
Kod değişiklikleri
Not: Her zaman, uygulamadan önce test kodu denetimli bir ortamda üretim bilgisayarlarınıza düzeltmeler giderir.
Bu sorunu gidermek için yapmak 349 beyannamesi raporunda (10710) kodunu değiştirin. Bunu yapmak için şu adımları izleyin:
-
GetPostedCountryLocCode işlevinde kodu aşağıdaki gibi değiştirin:
Varolan kodu 1... REPEAT
IF SalesInvLines."Location Code" <> '' THEN BEGIN
IF Location.GET(SalesInvLines."Location Code") THEN
EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
IF EUCountryLinesLocationCode THEN BEGIN
// Delete the following line.
AmountToIncludeIn349 := AmountToIncludeIn349 + SalesInvLines.Amount;
IF GetCountryfromLocation(SalesInvLines."Location Code") <> CountryCode THEN
LocationDifferentCountryCode := TRUE;
TempSalesInvLines := SalesInvLines;
TempSalesInvLines.INSERT;
END;
...Değiştirme kodu 1
... REPEAT
IF SalesInvLines."Location Code" <> '' THEN BEGIN
IF Location.GET(SalesInvLines."Location Code") THEN
EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
IF EUCountryLinesLocationCode THEN BEGIN
// Add the following lines.
AmountToIncludeIn349 +=
GetExportedAmountIn349(SalesInvHeader."Currency Code",
SalesInvHeader."Currency Factor",SalesInvLines."Line Amount");
// End of the lines.
IF GetCountryfromLocation(SalesInvLines."Location Code") <> CountryCode THEN
LocationDifferentCountryCode := TRUE;
TempSalesInvLines := SalesInvLines;
TempSalesInvLines.INSERT;
END;
...Varolan kodu 2
... TempSalesInvLines.INSERT;
END;
END ELSE
IF CompInforShipToCountryCode THEN BEGIN
EUCountryLinesLocationCode := TRUE;
// Delete the following line.
AmountToIncludeIn349 := AmountToIncludeIn349 + SalesInvLines.Amount;
TempSalesInvLines := SalesInvLines;
TempSalesInvLines.INSERT;
END;
UNTIL SalesInvLines.NEXT = 0;
END;
...Değiştirme kodu 2
... TempSalesInvLines.INSERT;
END;
END ELSE
IF CompInforShipToCountryCode THEN BEGIN
EUCountryLinesLocationCode := TRUE;
// Add the following lines.
AmountToIncludeIn349 +=
GetExportedAmountIn349(SalesInvHeader."Currency Code",
SalesInvHeader."Currency Factor",SalesInvLines."Line Amount");
// End of the lines.
TempSalesInvLines := SalesInvLines;
TempSalesInvLines.INSERT;
END;
UNTIL SalesInvLines.NEXT = 0;
END;
...Varolan kodu 3
... REPEAT
IF PurchInvLines."Location Code" <> '' THEN BEGIN
IF Location.GET(PurchInvLines."Location Code") THEN
EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
IF EUCountryLinesLocationCode THEN BEGIN
// Delete the following line.
AmountToIncludeIn349 := AmountToIncludeIn349 + PurchInvLines.Amount;
IF GetCountryfromLocation(PurchInvLines."Location Code") <> CountryCode THEN
LocationDifferentCountryCode := TRUE;
TempPurchInvLines := PurchInvLines;
TempPurchInvLines.INSERT;
END;
...Değiştirme kodu 3
... REPEAT
IF PurchInvLines."Location Code" <> '' THEN BEGIN
IF Location.GET(PurchInvLines."Location Code") THEN
EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
IF EUCountryLinesLocationCode THEN BEGIN
// Add the following lines.
AmountToIncludeIn349 +=
GetExportedAmountIn349(PurchInvHeader."Currency Code",
PurchInvHeader."Currency Factor",PurchInvLines."Line Amount");
// End of the lines.
IF GetCountryfromLocation(PurchInvLines."Location Code") <> CountryCode THEN
LocationDifferentCountryCode := TRUE;
TempPurchInvLines := PurchInvLines;
TempPurchInvLines.INSERT;
END;
...Varolan kodu 4
... TempPurchInvLines.INSERT;
END;
END ELSE
IF CompInforShipToCountryCode THEN BEGIN
EUCountryLinesLocationCode := TRUE;
// Delete the following line.
AmountToIncludeIn349 := AmountToIncludeIn349 + PurchInvLines.Amount;
TempPurchInvLines := PurchInvLines;
TempPurchInvLines.INSERT;
END;
UNTIL PurchInvLines.NEXT = 0;
END;
...Değiştirme kodu 4
... TempPurchInvLines.INSERT;
END;
END ELSE
IF CompInforShipToCountryCode THEN BEGIN
EUCountryLinesLocationCode := TRUE;
// Add the following lines.
AmountToIncludeIn349 +=
GetExportedAmountIn349(PurchInvHeader."Currency Code",
PurchInvHeader."Currency Factor",PurchInvLines."Line Amount");
// End of the lines.
TempPurchInvLines := PurchInvLines;
TempPurchInvLines.INSERT;
END;
UNTIL PurchInvLines.NEXT = 0;
END;
... -
GetExportedAmountIn349 işlevinde kodu aşağıdaki gibi değiştirin:
Varolan kodu... BEGIN
IF DeliveryOperationCode = DeliveryOperationCode::" " THEN
DeliveryOperationCode := DeliveryOperationCode::E;
END;
BEGIN
END.
}
RDLDATA
{
...Kod değiştirme
... BEGIN
IF DeliveryOperationCode = DeliveryOperationCode::" " THEN
DeliveryOperationCode := DeliveryOperationCode::E;
END;
// Add the following lines.
LOCAL PROCEDURE GetExportedAmountIn349@1100014(CurrencyCode@1100008 : Code[20];CurrencyFactor@1100009 : Decimal;LineAmount@1100010 : Decimal) : Decimal;
VAR
Currency@1100001 : Record 4;
BEGIN
IF CurrencyCode <> '' THEN BEGIN
Currency.GET(CurrencyCode);
EXIT(ROUND(LineAmount / CurrencyFactor,Currency."Amount Rounding Precision"))
END;
EXIT(LineAmount);
END;
// End of the lines.
BEGIN
END.
}
RDLDATA
{
...
Önkoşullar
Bu düzeltmeyi uygulamak için aşağıdaki ürünlerden birine sahip olmalıdır:
-
Microsoft Dynamics NAV 2013
-
Microsoft Dynamics NAV 2009 R2
-
Microsoft Dynamics NAV 2009 Service Pack 1
Kaldırma bilgileri
Bu düzeltmeyi kaldıramazsınız.
Durum
Microsoft bu sorunun "Aşağıdakilere Uygulanır" bölümünde listelenen Microsoft ürünlerinde bulunduğunu onaylamıştır.
Not: Bu, doğrudan Microsoft destek kuruluşu bünyesinde oluşturulan bir "HIZLI YAYIN" makalesidir. Burada yer alan bilgiler, oluşan sorunlara yanıt olarak olduğu gibi sağlanmıştır. Makale hızla kullanıma sunulduğu için materyallerde yazım hataları olabilir ve materyaller bildirilmeksizin herhangi bir zamanda revize edilebilir. Diğer konular için bkz. Kullanım koşulları.