Тази статия се отнася за Microsoft Dynamics NAV за езиково-географската променлива на испански (es).
Симптоми
Да предположим, че сте приложили 2547942 за гореща поправка в Microsoft Dynamics NAV. Въпреки това испанската декларация за ДДС 349 все още изнася сумите във валутата, използвана в документа, вместо в местната валута. Ако клиент или търговец няма код на валутата на картата, но е публикуван документ, включващ валута, сумите, които се експортират в декларацията 349, са неправилни, тъй като експортираната сума е сумата във валутата, използвана в документа, а не в местната валута, която потребителят трябва да съобщи на данъчните органи.
Този проблем възниква в следните продукти:
- Microsoft Dynamics NAV 2013
- Microsoft Dynamics NAV 2009 R2
- Microsoft Dynamics NAV 2009 Service Pack 1
Решение
Информация за горещи поправки
Поддържа гореща поправка вече се предлага от Microsoft. Целта му е обаче само да коригира проблема, който е описан в тази статия. Прилагайте го само към системи, които срещат този конкретен проблем. Тази гореща корекция може да бъде подложена на допълнително тестване. Ето защо, ако не сте сериозно засегнати от този проблем, ви препоръчваме да изчакате следващия сервизен пакет за Microsoft Dynamics NAV 2013 или следващата версия на Microsoft Dynamics NAV, която съдържа тази гореща корекция.
Забележка: При специални случаи таксите, които обикновено се начисляват за свързани с поддръжката разговори, могат да бъдат отменени, ако специалист по техническа поддръжка за Microsoft Dynamics и свързаните продукти реши, че проблемът може да бъде решен със специфична актуализация. Стандартните такси за поддръжката ще важат за допълнителни въпроси, свързани с нея, както и за проблеми, които не спадат към съответната актуализация.
Информация за инсталиране
Microsoft предоставя примери за програмиране само за илюстрация, без гаранция, нито изрична, или подразбираща се. Това включва, но не се ограничава до, подразбиращите се гаранции за продаваемост или годност за определена цел. В тази статия се предполага, че сте запознати с езика за програмиране, който се демонстрира, и с инструментите, които се използват за създаване и за процедури за отстраняване на грешки. Инженерите по поддръжката на Microsoft могат да ви помогнат да обяснят функционалността на дадена процедура. Те обаче няма да променят тези примери, за да предоставят допълнителна функционалност или да конструират процедури, които да отговарят на вашите конкретни изисквания.
Забележка Преди да инсталирате тази гореща корекция, уверете се, че всички потребители на клиента на Microsoft Navision са излезли от системата. Това включва потребители на клиенти на Microsoft Navision Application Services (NAS). Когато внедрявате тази гореща корекция, трябва да сте единственият клиентски потребител е влязъл.
За да приложите тази гореща корекция, трябва да имате лиценз за разработчик.
Препоръчваме на потребителския акаунт в прозореца за влизане в Windows или в прозореца за влизане в база данни да бъде присвоен ИД на роля "SUPER". Ако на потребителския акаунт не може да бъде присвоен ИД на роля "SUPER", трябва да се уверите, че този потребителски акаунт има следните разрешения:
- Разрешението за промяна за обекта, който ще променяте.
- Разрешението за изпълнение за обекта 5210 на системен обект с ИД 5210 и за обекта 9015 на системен обект.
Забележка: Не е необходимо да имате права за хранилищата за данни, освен ако не трябва да извършите поправка на данни.
Промени в кода
Забележка: Винаги тествайте корекциите на кода в контролирана среда, преди да ги приложите към производствените си компютри.
За да отстраните този проблем, променете кода в отчета за деклариране "Make 349" (10710). За да направите това, изпълнете следните стъпки:
Променете кода във функцията GetPostedCountryLocCode по следния начин:
Съществуващ код 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; ...Код за замяна 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; ...Съществуващ код 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; ...Код за замяна 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; ...Съществуващ код 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; ...Код за замяна 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; ...Съществуващ код 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; ...Код за замяна 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 по следния начин:
Съществуващ код... BEGIN IF DeliveryOperationCode = DeliveryOperationCode::" " THEN DeliveryOperationCode := DeliveryOperationCode::E; END; BEGIN END. } RDLDATA { ...Код за подмяна
... 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 { ...
Предварителни изисквания
Трябва да имате инсталиран един от следните продукти, за да приложите тази гореща корекция:
- Microsoft Dynamics NAV 2013
- Microsoft Dynamics NAV 2009 R2
- Microsoft Dynamics NAV 2009 Service Pack 1
Информация за премахване
Не можете да премахнете тази гореща корекция.
Състояние
Microsoft потвърждава, че това е проблем в продуктите на Microsoft, които са изброени в раздела „Важи за“.
Забележка: Това е статия "FAST PUBLISH", създадена директно от организацията за поддръжка на Microsoft. Информацията, съдържаща се тук, е предоставена както е в отговор на възникващи проблеми. В резултат на бързината на предоставянето им, материалите могат да включват печатни грешки и могат да бъдат коригирани по всяко време без предизвестие. Вижте условията на използване за други съображения.