Ця стаття стосується microsoft Dynamics NAV для італійської мови (it) мови.
Ознаки
Під вільний час запуску закриття рахунку клієнта звіт без підтвердження за застосунок прапорець, установлений для закриття рахунку в італійській версії Microsoft Dynamics NAV, система застосовує рахунок-фактуру за допомогою рахунку. Однак у записі програми замість дати публікації рахунку використовується дата роботи.
Примітка. Коли ви застосовуєте рахунок-фактуру, не запускаючи звіт або запускати звіт, у якому встановлено прапорець Підтвердити для кожного застосунку , система використовує рахунку, розміщення дати належним чином.
Ця проблема виникає в таких продуктах:
- Італійська версія Microsoft Dynamics NAV 2009 із пакетом оновлень 1 (SP1)
- Італійська версія Microsoft Dynamics NAV 2009
- Італійська версія Microsoft Dynamics NAV 5.0 із пакетом оновлень 1 (SP1)
Спосіб усунення проблеми
Відомості про виправлення
Від корпорації Майкрософт доступне виправлення, що підтримується. Однак вона призначена лише для виправлення проблеми, описаної в цій статті. Застосуйте її лише до систем, у яких виникла ця проблема. Це виправлення може отримати додаткове тестування. Таким чином, якщо ви не серйозно постраждали від цієї проблеми, радимо дочекатися наступного пакета оновлень Microsoft Dynamics NAV або наступної версії Microsoft Dynamics NAV, яка містить це виправлення.
Примітка У особливих випадках стягнення плати, які зазвичай понесені для викликів підтримки, може бути скасовано, якщо спеціаліст служби технічної підтримки Microsoft Dynamics і пов'язані продукти визначать, що конкретне оновлення вирішить вашу проблему. Звичайні витрати на підтримку застосовуватимуться до додаткових запитань і питань підтримки, які не відповідають вимогам для конкретного оновлення, про яке йде мова.
Відомості про інсталяцію
Корпорація Майкрософт надає приклади програмування лише для ілюстрації без жодних гарантій, явних або неявних. Це стосується зокрема неявних гарантій щодо придатності до продажу чи придатності для певної мети. У цій статті припускається, що ви знайомі з мовою програмування, яка демонструється, і з інструментами, які використовуються для створення і налагодження процедур. Спеціалісти служби підтримки Microsoft можуть допомогти пояснити функціональність певної процедури, але вони не змінюватимуть ці приклади, щоб надавати додаткові функції або конструювати процедури відповідно до ваших конкретних вимог.
Примітка. Перш ніж інсталювати це виправлення, переконайтеся, що всі користувачі клієнта Microsoft Navision, вийти із системи. Це стосується користувачів клієнтських служб Microsoft Navision (NAS). Ви повинні бути єдиним клієнтом користувача, який ввійшов, коли ви впроваджуєте це виправлення.
Щоб реалізувати це виправлення, потрібно мати ліцензію розробника.
Радимо призначити обліковому запису користувача у вікні "Вхід у Windows" або у вікні "Вхід до бази даних" ідентифікатор ролі "SUPER". Якщо обліковому запису користувача не вдалося призначити ідентифікатор ролі SUPER, переконайтеся, що обліковий запис має такі дозволи:
- Дозвіл на змінення об'єкта, який буде змінюватися.
- Дозвіл Execute для об'єкта System Object ID 5210 і для об'єкта System Object ID 9015.
Примітка. Ви не повинні мати права на зберігання даних, якщо не потрібно відновлювати дані.
Зміни коду
Примітка. Завжди перевіряйте виправлення коду в контрольованому середовищі, перш ніж застосовувати виправлення до робочих комп'ютерів.
Щоб вирішити цю проблему, змініть код у тригер OnRun в CustEntry-Apply Додано записи codeunit (226) наступним чином:
Наявний код
WITH Rec DO BEGIN
IF STRPOS("Applies-to ID",'CHSNZCNF') = 0 THEN
BEGIN
IF NOT CONFIRM(Text1130000,FALSE,"Document Type","Document No.") THEN
EXIT;
IF STRPOS("Applies-to ID",'CHCNCNF') = 0 THEN
PostApplication.SetValues("Document No.","Posting Date")
ELSE
PostApplication.SetValues("Document No.",WORKDATE);
IF NOT PaymentToleracenMgt.PmtTolCust(Rec) THEN
EXIT;
GET("Entry No.");
//Delete the following lines.
ApplicationDate := 0D;
EntriesToApply.SETCURRENTKEY("Customer No.","Applies-to ID");
EntriesToApply.SETRANGE("Customer No.","Customer No.");
EntriesToApply.SETRANGE("Applies-to ID","Applies-to ID");
EntriesToApply.FIND('-');
REPEAT
IF EntriesToApply."Posting Date" > ApplicationDate THEN
ApplicationDate := EntriesToApply."Posting Date";
UNTIL EntriesToApply.NEXT = 0;
//End of the lines.
PostApplication.SetValues("Document No.",ApplicationDate);
PostApplication.LOOKUPMODE(TRUE);
IF ACTION::LookupOK = PostApplication.RUNMODAL THEN BEGIN
GenJnlLine.INIT;
PostApplication.GetValues(GenJnlLine."Document No.",GenJnlLine."Posting Date");
IF GenJnlLine."Posting Date" < ApplicationDate THEN
ERROR(
Text003,
GenJnlLine.FIELDCAPTION("Posting Date"),FIELDCAPTION("Posting Date"),TABLECAPTION);
END ELSE
EXIT;
END ELSE BEGIN
GenJnlLine.INIT;
//Delete the following line.
GenJnlLine."Posting Date" := WORKDATE;
GenJnlLine."Document No." := "Document No.";
END;
Window.OPEN(Text001);
...
Код заміни
WITH Rec DO BEGIN
//Add the following lines.
ApplicationDate := 0D;
EntriesToApply.SETCURRENTKEY("Customer No.","Applies-to ID");
EntriesToApply.SETRANGE("Customer No.","Customer No.");
EntriesToApply.SETRANGE("Applies-to ID","Applies-to ID");
IF EntriesToApply.FINDSET THEN
REPEAT
IF EntriesToApply."Posting Date" > ApplicationDate THEN
ApplicationDate := EntriesToApply."Posting Date";
UNTIL EntriesToApply.NEXT = 0;
//End of the lines.
IF STRPOS("Applies-to ID",'CHSNZCNF') = 0 THEN
BEGIN
IF NOT CONFIRM(Text1130000,FALSE,"Document Type","Document No.") THEN
EXIT;
IF STRPOS("Applies-to ID",'CHCNCNF') = 0 THEN
PostApplication.SetValues("Document No.","Posting Date")
ELSE
PostApplication.SetValues("Document No.",WORKDATE);
IF NOT PaymentToleracenMgt.PmtTolCust(Rec) THEN
EXIT;
GET("Entry No.");
PostApplication.SetValues("Document No.",ApplicationDate);
PostApplication.LOOKUPMODE(TRUE);
IF ACTION::LookupOK = PostApplication.RUNMODAL THEN BEGIN
GenJnlLine.INIT;
PostApplication.GetValues(GenJnlLine."Document No.",GenJnlLine."Posting Date");
IF GenJnlLine."Posting Date" < ApplicationDate THEN
ERROR(
Text003,
GenJnlLine.FIELDCAPTION("Posting Date"),FIELDCAPTION("Posting Date"),TABLECAPTION);
END ELSE
EXIT;
END ELSE BEGIN
GenJnlLine.INIT;
//Add the following line.
GenJnlLine."Posting Date" := ApplicationDate;
GenJnlLine."Document No." := "Document No.";
END;
Window.OPEN(Text001);
...
Попередні вимоги
Щоб застосувати це виправлення, потрібно мати один із таких продуктів:
- Італійська версія Microsoft Dynamics NAV 2009 із пакетом оновлень 1 (SP1)
- Італійська версія Microsoft Dynamics NAV 2009
- Італійська версія Microsoft Dynamics NAV 5.0 із пакетом оновлень 1 (SP1)
Відомості про видалення
Не можна видалити це виправлення.
Стан
Корпорація Microsoft підтвердила, що це одна з проблем з продуктами Microsoft, перелічених у розділі "Застосовується до".
Примітка. Це стаття "FAST PUBLISH", створена безпосередньо з організації підтримки Корпорації Майкрософт. Інформація, що міститься в цьому документі, надається як у відповідь на нові проблеми. В результаті швидкості її використання матеріали можуть включати друкарські помилки і можуть бути переглянуті в будь-який час без попередження. Інші зауваження див. в розділі Умови використання .