Симптоми
"Не на регистри" е нула фактури валидно и експортира броя, включително тези фактури в испанска версия на Microsoft Dynamics NAV 2009. Фактури, е нула не се записва в 340 модел файл и не се включва в общо "не регистри" или. Следвайте стъпките в раздела промени код за решаване на проблема. Този проблем възниква в следните продукти:
-
Испанска версия на Microsoft Dynamics NAV 2009 R2
-
Испанска версия на Microsoft Dynamics NAV 2009 SP1
Решение
Информация за актуалната корекция
Вече се предлага от Microsoft предоставя поддържана актуална корекция. Обаче е предназначена само за коригиране на описания в тази статия. Прилагайте корекцията само към системи, изпитващи този конкретен проблем. Възможно е провеждането на допълнителни тестове на тази актуална корекция. Следователно ако не сте силно засегнати от този проблем, препоръчваме да изчакате следващия сервизен пакет за Microsoft Dynamics NAV 2009 или следващата версия на Microsoft Dynamics NAV, който ще съдържа тази корекция.
Забележка: При специални случаи таксите, които са за свързани с поддръжката обаждания могат да бъдат отменени, ако специалист по техническа поддръжка за Microsoft Dynamics и свързани с тях продукти определя, че конкретна актуализация може да разреши проблема. Обичайните такси за поддръжката ще важат за допълнителни въпроси и проблеми, които не спадат към съответната актуализация.
Информация за инсталирането
Microsoft предоставя примери само за илюстративни цели без гаранция за определени цели. Това включва, но не е ограничено до, подразбиращи се гаранции за продаваемост или годност за определена цел. Тази статия се предполага, че сте запознати с демонстрирания език за програмиране и инструментите, които се използват за създаване и процедури за отстраняване на грешки. Инженерите на поддръжката на Microsoft могат да помогнат обяснение на функциите на конкретна процедура. Въпреки това те няма да модифицират тези примери с цел осигуряване на допълнителна функционалност или създаване на процедури за удовлетворение на конкретните ви изисквания.
Забележка: Преди да инсталирате тази актуална корекция, уверете се, че всички потребители на клиента на Microsoft Dynamics NAV са излезли от системата. Това включва и услуги на Microsoft Dynamics NAV приложение сървър (NAS). Трябва да бъде само клиент потребител, който е влязъл при прилагане на тази актуална корекция.
За прилагане на тази актуална корекция, трябва да имате лиценз разработчик.
Препоръчително е потребителският акаунт в прозореца влизания в Windows или в прозореца на БД присвояването на "Супер" ИД на роля. Ако потребителският акаунт не може да бъде възложена ИД на роля на "Супер", трябва да проверите, че потребителският акаунт има следните права:
-
Разрешение за промяна на обекта, ще се променя.
-
Разрешението за изпълнение за системата обект номер 5210 обект и системата обект ID 9015
обект.
Забележка: Не трябва да имате права на съхранените данни, освен ако трябва да извършите възстановяване на данни.
Промени код
Забележка: Винаги тест код решава в управлявана среда преди да приложите корекциите производство компютри.
За да разрешите този проблем, изпълнете следните стъпки:
-
Да променяте CalcTotals функция в отчета се 340 декларация (10743) както следва:
Съществуващ код 1...VAR
VATEntry6@1100000 : Record 254;
VATEntry7@1100002 : Record 254;
BEGIN
VATEntryTemporary.DELETEALL;
VATEntry6.RESET;
...Замени код 1
...VAR
VATEntry6@1100000 : Record 254;
VATEntry7@1100002 : Record 254;
// Add the following line.
TempUnrealVATBuffer@1100001 : TEMPORARY Record 10704;
// End of the added line.
BEGIN
VATEntryTemporary.DELETEALL;
VATEntry6.RESET;
...Съществуващ код 2
...VATEntry7.SETRANGE(VATEntry7.Type,VATEntryTemporary.Type);
IF VATEntry7.FINDFIRST THEN
VATBuffer.DELETEALL;
REPEAT
VATBuffer."VAT %" := VATEntry7."VAT %";
VATBuffer."EC %" := VATEntry7."EC %";
...Замени код 2
...VATEntry7.SETRANGE(VATEntry7.Type,VATEntryTemporary.Type);
IF VATEntry7.FINDFIRST THEN
VATBuffer.DELETEALL;
// Add the following line.
TempUnrealVATBuffer.DELETEALL;
// End of the added line.
REPEAT
VATBuffer."VAT %" := VATEntry7."VAT %";
VATBuffer."EC %" := VATEntry7."EC %";
...Съществуващ код 3
... IF VATEntry7.Type = VATEntry7.Type::Sale THEN BEGIN
VATEntry7.Base := -VATEntry7.Base;
VATEntry7.Amount := -VATEntry7.Amount;
// Delete the following lines.
END;
IF VATBuffer.FIND THEN BEGIN
VATBuffer.Base := VATBuffer.Base + VATEntry7.Base;
VATBuffer.Amount := VATBuffer.Amount + VATEntry7.Amount;
IF (VATEntry7.Type = VATEntry7.Type::Sale) AND (VATEntry7."EC %" <> 0) THEN
VATBuffer."EC Amount" := VATBuffer."EC Amount" + ROUND(VATEntry7.Base * VATEntry7."EC %" / 100);
VATBuffer.MODIFY;
END ELSE BEGIN
VATBuffer.Base := VATEntry7.Base;
VATBuffer.Amount := VATEntry7.Amount;
VATBuffer."EC Amount" := 0;
IF (VATEntry7.Type = VATEntry7.Type::Sale) AND (VATEntry7."EC %" <> 0) THEN
VATBuffer."EC Amount" := ROUND(VATEntry7.Base * VATEntry7."EC %" / 100);
VATBuffer.INSERT;
END;
// End of the deleted lines.
UNTIL VATEntry7.NEXT = 0;
IF VATBuffer.FINDFIRST THEN
NoofRecords := NoofRecords + VATBuffer.COUNT;
...Замени код 3
...IF VATEntry7.Type = VATEntry7.Type::Sale THEN BEGIN
VATEntry7.Base := -VATEntry7.Base;
VATEntry7.Amount := -VATEntry7.Amount;
// Add the following lines.
VATEntry7."Unrealized Base" := -VATEntry7."Unrealized Base";
VATEntry7."Unrealized Amount" := -VATEntry7."Unrealized Amount";
END;
IF VATBuffer.FIND THEN BEGIN
UpdateVATBuffer(VATBuffer,VATEntry7);
VATBuffer.MODIFY;
END ELSE BEGIN
VATBuffer.INIT;
UpdateVATBuffer(VATBuffer,VATEntry7);
VATBuffer.INSERT;
END;
TempUnrealVATBuffer := VATBuffer;
IF TempUnrealVATBuffer.FIND THEN BEGIN
UpdateUnrealVATBuffer(TempUnrealVATBuffer,VATEntry7);
TempUnrealVATBuffer.MODIFY;
END ELSE BEGIN
TempUnrealVATBuffer.INIT;
UpdateUnrealVATBuffer(TempUnrealVATBuffer,VATEntry7);
TempUnrealVATBuffer.INSERT;
END;
IF IsEmptyVATBuffer(VATBuffer) AND IsEmptyVATBuffer(TempUnrealVATBuffer) THEN BEGIN
VATBuffer.DELETE;
TempUnrealVATBuffer.DELETE;
END;
// End of the added lines.
UNTIL VATEntry7.NEXT = 0;
IF VATBuffer.FINDFIRST THEN
NoofRecords := NoofRecords + VATBuffer.COUNT;
... -
Да променяте IsEmptyVATBuffer функция в отчета се 340 декларация (10743) както следва:
Съществуващ код...UNTIL VATEntryTemporary.NEXT = 0;
END;
PROCEDURE GetSalesShipmentDate@1100022(DocumentNo@1100000 : Code[20]) : Date;
VAR
SalesShipmentHeader@1100001 : Record 110;
...Замени код
...UNTIL VATEntryTemporary.NEXT = 0;
END;
// Add the following lines.
LOCAL PROCEDURE IsEmptyVATBuffer@1100065(TempVATBuffer@1100000 : Record 10704) : Boolean;
BEGIN
WITH TempVATBuffer DO
EXIT((Base = 0) AND (Amount = 0) AND ("EC Amount" = 0));
END;
LOCAL PROCEDURE UpdateVATBuffer@1100061(VAR TempVATBuffer@1100000 : Record 10704;AddedVATEntry@1100001 : Record 254);
BEGIN
WITH TempVATBuffer DO BEGIN
Base += AddedVATEntry.Base;
Amount += AddedVATEntry.Amount;
IF (AddedVATEntry.Type = AddedVATEntry.Type::Sale) AND (AddedVATEntry."EC %" <> 0) THEN
"EC Amount" += ROUND(AddedVATEntry.Base * AddedVATEntry."EC %" / 100);
END;
END;
LOCAL PROCEDURE UpdateUnrealVATBuffer@1100063(VAR TempVATBuffer@1100000 : Record 10704;AddedVATEntry@1100001 : Record 254);
BEGIN
WITH TempVATBuffer DO BEGIN
Base += AddedVATEntry."Unrealized Base";
Amount += AddedVATEntry."Unrealized Amount";
IF (AddedVATEntry.Type = AddedVATEntry.Type::Sale) AND (AddedVATEntry."EC %" <> 0) THEN
"EC Amount" += ROUND(AddedVATEntry."Unrealized Base" * AddedVATEntry."EC %" / 100);
END;
END;
// End of the added lines.
PROCEDURE GetSalesShipmentDate@1100022(DocumentNo@1100000 : Code[20]) : Date;
VAR
SalesShipmentHeader@1100001 : Record 110;
...
Необходими условия:
Трябва да имате един от следните продукти, за да приложите тази спешна корекция:
-
Испанска версия на Microsoft Dynamics NAV 2009 R2
-
Испанска версия на Microsoft Dynamics NAV 2009 SP1
Информация за премахване
Не можете да премахнете тази актуална корекция.
Статус
Microsoft потвърждава, че това е проблем в продуктите на Microsoft, изброени в раздела "Отнася се за".
Забележка: Това е статия "Бърза публикация", създадени директно от организацията за поддръжка на Microsoft. Информацията тук се предоставя "както-е" в отговор на появили се проблеми. В резултат на скоростта на предоставянето му материалите могат да съдържат печатни грешки и могат да бъдат коригирани по всяко време без предизвестие. Вижте Условияза други съображения.