Швидке опубліковані статті надати вам інформацію безпосередньо з, в межах організації технічної підтримки корпорації Майкрософт. Інформація, яка міститься в цьому документі створено у відповідь на нові або унікальні теми або призначено для доповнення інших відомостей у базі знань.
Ця стаття відноситься до Microsoft Dynamics NAV, 2009 всі країни і всі мови.
Причини
Якщо залишку на постачальника негативно Microsoft Dynamics NAV 2009 із пакетом оновлень 1, звіт «Запропонувати постачальника платежі» (393) пропонує негативний баланс як оплати.
Вирішення
Відомості про виправлення
Корпорація Майкрософт випустила підтримуване виправлення доступна. Однак, застосовувати лише для вирішення проблеми, описаної в цій статті. Він придатний лише для систем, які зазнають цієї конкретної проблеми. Те, що це виправлення може потребувати додаткового тестування. Таким чином, якщо ви не завдає значної, рекомендовано почекати до виходу чергового пакета оновлень Microsoft Dynamics NAV, 2009 або наступної версії Microsoft Dynamics NAV, що містить це виправлення.
Примітка. В окремих випадках оплату звернення до служби підтримки може бути скасовано якщо технічної підтримки професійного для Microsoft Dynamics і пов'язані продукти визначає телефонів служби. Плата стягується на додаткові питання і проблеми, які не пов'язані з оновленням.
Відомості про інсталяцію
Корпорація Майкрософт надає приклади програмного коду тільки для ілюстрації, без гарантій – прямих або інших. Це включає, але не обмежується, будь-яких гарантій придатності до продажу та придатності для певної мети. У цій статті припускається, що ви знайомі з мову програмування що демонструє та засоби, які використовуються для створення та налагодження процедури. Співробітники служби підтримки корпорації Майкрософт можуть пояснити функціональні особливості кожної конкретної процедури, але вони не будуть змінювати приклади для реалізації додаткових можливостей або створювати процедури на вимогу окремих користувачів.
Примітка. Перш ніж інсталювати це виправлення, переконайтеся, що усі користувачі Microsoft Navision-клієнт відключився системи. Пакет оновлень містить Microsoft Navision застосунок служби (NAS) клієнта користувачів. Ви повинні тільки клієнт користувача, який увійшов до системи, під час виконання цього виправлення.
Щоб застосувати це виправлення, потрібно мати ліцензію для розробників.
Корпорація Майкрософт рекомендує, що обліковий запис користувача Windows входи вікна або у вікні бази даних входи призначити "Супер" роль ID. Якщо обліковий запис користувача не призначено роль ID "Супер", необхідно переконатися, що обліковий запис користувача, має такі дозволи:
-
Змінити дозвіл об'єкт, який буде змінити.
-
Права для виконання системи об'єкт з Ідентифікатором 5210 об'єкт а також системи об'єкт з Ідентифікатором 9015 об'єкта.
Примітка. Маєте відповідних прав до сховища даних, якщо у вас є для виконання даних відновлення не потрібно.
Зміни коду
Примітка. Завжди тест код вирішення в середовищі контрольовані перед інсталяцією розглянутого виправлення виробництва комп'ютерів.
Щоб вирішити цю проблему, виконайте такі дії.
-
Змінити код у виробника - OnPostDataItem тригер звіт «Запропонувати постачальника платежі» (393) наступним чином:
Наявний код... IF FIND('-') THEN
REPEAT
Window.UPDATE(1,"No.");
PayableVendLedgEntry.SETRANGE("Vendor No.","No.");
GetVendLedgEntries(TRUE,TRUE);
GetVendLedgEntries(FALSE,TRUE);
CheckAmounts(TRUE);
UNTIL (NEXT = 0) OR StopPayments;
END;
ClearNegative;
JnlLineDim.LOCKTABLE;
...Заміна код
... IF FIND('-') THEN
REPEAT
Window.UPDATE(1,"No.");
PayableVendLedgEntry.SETRANGE("Vendor No.","No.");
GetVendLedgEntries(TRUE,TRUE);
GetVendLedgEntries(FALSE,TRUE);
CheckAmounts(TRUE);
ClearNegative;
UNTIL (NEXT = 0) OR StopPayments;
END ELSE
IF FIND('-') THEN
REPEAT
ClearNegative;
UNTIL NEXT = 0;
JnlLineDim.LOCKTABLE;
... -
Змінити код GetVendLedgEntries процедури звіт «Запропонувати постачальника платежі» (393) наступним чином:
Наявний код... VendLedgEntry.RESET;
VendLedgEntry.SETCURRENTKEY("Vendor No.",Open,Positive,"Due Date");
VendLedgEntry.SETRANGE("Vendor No.",Vendor."No.");
VendLedgEntry.SETRANGE(Open,TRUE);
VendLedgEntry.SETRANGE(Positive,Positive);
IF Future THEN BEGIN
...Заміна код
... VendLedgEntry.RESET;
VendLedgEntry.SETCURRENTKEY("Vendor No.",Open,Positive,"Due Date");
VendLedgEntry.SETRANGE("Vendor No.",Vendor."No.");
VendLedgEntry.SETRANGE(Open,TRUE);
VendLedgEntry.SETRANGE(Positive,Positive);
VendLedgEntry.SETRANGE("Applies-to ID",'');
IF Future THEN BEGIN
... -
Змінити код MakeGenJnlLines процедури звіт «Запропонувати постачальника платежі» (393) наступним чином:
Наявний код... Window.UPDATE(1,VendLedgEntry."Vendor No.");
TempPaymentBuffer.INSERT;
END;
VendLedgEntry.TESTFIELD("Applies-to ID",'');
VendLedgEntry."Applies-to ID" := TempPaymentBuffer."Document No.";
END ELSE BEGIN
...Заміна код
... Window.UPDATE(1,VendLedgEntry."Vendor No.");
TempPaymentBuffer.INSERT;
END;
VendLedgEntry."Applies-to ID" := TempPaymentBuffer."Document No.";
END ELSE BEGIN
... -
Змінити код ClearNegative процедури звіт «Запропонувати постачальника платежі» (393) наступним чином:
Наявний код... WHILE PayableVendLedgEntry.NEXT <> 0 DO BEGIN
TempCurrency.Code := PayableVendLedgEntry."Currency Code";
CurrencyBalance := 0;
PayableVendLedgEntry2 := PayableVendLedgEntry;
IF TempCurrency.INSERT THEN BEGIN
PayableVendLedgEntry.SETRANGE("Currency Code",PayableVendLedgEntry."Currency Code");
REPEAT
CurrencyBalance := CurrencyBalance + PayableVendLedgEntry."Amount (LCY)"
UNTIL PayableVendLedgEntry.NEXT = 0;
IF CurrencyBalance < 0 THEN
PayableVendLedgEntry.DELETEALL;
END;
PayableVendLedgEntry.SETRANGE("Currency Code");
PayableVendLedgEntry := PayableVendLedgEntry2;
END;
...Заміна код
... WHILE PayableVendLedgEntry.NEXT <> 0 DO BEGIN
TempCurrency.Code := PayableVendLedgEntry."Currency Code";
CurrencyBalance := 0;
IF TempCurrency.INSERT THEN BEGIN
PayableVendLedgEntry2 := PayableVendLedgEntry;
PayableVendLedgEntry.SETRANGE("Currency Code",PayableVendLedgEntry."Currency Code");
REPEAT
CurrencyBalance := CurrencyBalance + PayableVendLedgEntry."Amount (LCY)"
UNTIL PayableVendLedgEntry.NEXT = 0;
IF CurrencyBalance < 0 THEN
PayableVendLedgEntry.DELETEALL;
PayableVendLedgEntry.SETRANGE("Currency Code");
PayableVendLedgEntry := PayableVendLedgEntry2;
END;
END;
...
Попередні вимоги
Потрібно мати Microsoft Dynamics NAV 2009 року з пакетом оновлень 1 для застосування цього виправлення.
Відомості про видалення
Це виправлення не можна видалити.
Стан
Корпорація Майкрософт підтвердила існування цієї неполадки у продуктах Майкрософт, перелічених у розділі "Застосовується до".
КОРПОРАЦІЯ МАЙКРОСОФТ ТА/АБО ЇЇ ПОСТАЧАЛЬНИКИ НЕ РОБЛЯТЬ ЗАЯВ АБО ГАРАНТІЙ ЩОДО ПРИДАТНОСТІ, НАДІЙНІСТЬ АБО ТОЧНІСТЬ ІНФОРМАЦІЇ, ЩО МІСТЯТЬСЯ В ДОКУМЕНТАХ ТА ПОВ'ЯЗАНІ З НЕЮ ЗОБРАЖЕННЯ, ОПУБЛІКОВАНІ НА ЦЬОМУ ВЕБ-САЙТІ ("МАТЕРІАЛИ") БУДЬ-ЯКОЮ МЕТОЮ.
МАТЕРІАЛИ ТЕХНІЧНІ НЕТОЧНОСТІ АБО ДРУКАРСЬКІ ПОМИЛКИ І МОЖЕ БУТИ ЗМІНЕНО В БУДЬ-ЯКИЙ ЧАС БЕЗ ПОВІДОМЛЕННЯ. МАКСИМАЛЬНОЮ МІРОЮ, ДОЗВОЛЕНОЮ ВІДПОВІДНИМ ЗАКОНОДАВСТВОМ КОРПОРАЦІЯ МАЙКРОСОФТ ТА/АБО ЇЇ ПОСТАЧАЛЬНИКИ ВІДМОВЛЯЮТЬСЯ ВІД ТА ВИКЛЮЧЕННЯ ЗАЯВИ, ГАРАНТІЇ ТА УМОВИ, ЧИ Є ПРЯМИХ, НЕЯВНИХ АБО ПЕРЕДБАЧЕНИХ ЗАКОНОДАВСТВОМ, ВКЛЮЧАЮЧИ, АЛЕ НЕ ОБМЕЖУЄТЬСЯ ЗАЯВИ, ГАРАНТІЇ АБО УМОВИ ЗАГОЛОВКА, НЕ ІНТЕЛЕКТУАЛЬНУ ВЛАСНІСТЬ, ЗАДОВІЛЬНОГО СТАНУ АБО ЯКОСТІ, ПРИДАТНОСТІ ДО ПРОДАЖУ ТА ПРИДАТНОСТІ ДЛЯ ПЕВНОЇ МЕТИ, ЯКІ СТОСУЮТЬСЯ МАТЕРІАЛІВ.
