Під час змінення реєстру головної книги у версії Microsoft Dynamics NAV, 2009 італійською зворотна лише перший запис ПДВ

Відомості про виправлення

Корпорація Майкрософт випустила підтримуване виправлення доступна. Однак, застосовувати лише для вирішення проблеми, описаної в цій статті. Він придатний лише для систем, які зазнають цієї конкретної проблеми. Те, що це виправлення може потребувати додаткового тестування. Таким чином, якщо ви не завдає значної, рекомендовано почекати до виходу чергового пакета оновлень Microsoft Dynamics NAV, 2009 або наступної версії Microsoft Dynamics NAV, що містить це виправлення.

Примітка. В окремих випадках оплату звернення до служби підтримки може бути скасовано якщо технічної підтримки професійного для Microsoft Dynamics і пов'язані продукти визначає телефонів служби. Плата стягується на додаткові питання і проблеми, які не пов'язані з оновленням.

Відомості про інсталяцію

Корпорація Майкрософт надає приклади програмного коду тільки для ілюстрації, без гарантій – прямих або інших. Це включає, але не обмежується, будь-яких гарантій придатності до продажу та придатності для певної мети. У цій статті припускається, що ви знайомі з, що демонструє мову програмування та інструменти, які використовуються для створення та налагодження процедури. Співробітники служби підтримки корпорації Майкрософт можуть пояснити функціональні особливості кожної конкретної процедури. Проте вони не будуть змінювати приклади для реалізації додаткових можливостей або створювати процедури на вимогу окремих користувачів.

Примітка. Перш ніж інсталювати це виправлення, переконайтеся, що всіх користувачів Microsoft Dynamics NAV-клієнт відключився системи. Це стосується, служби Microsoft Dynamics NAV Application Server (NAS). Ви повинні тільки клієнт користувача, який увійшов до системи, під час виконання цього виправлення.

Щоб застосувати це виправлення, потрібно мати ліцензію для розробників.

Корпорація Майкрософт рекомендує, що обліковий запис користувача Windows, вхід вікна або у вікні бази даних вхід призначити "Супер" роль ID. Якщо обліковий запис користувача не призначено роль ID "Супер", необхідно переконатися, що обліковий запис користувача, має такі дозволи:

• Змінити дозвіл об'єкт, який буде змінити.

• Права для виконання системи об'єкт з Ідентифікатором 5210 об'єкт і, код 9015 системи-об'єкт
  
  об'єкт.

Примітка. Маєте відповідних прав у сховища даних, якщо не потрібно виконати дані відновлення не потрібно.

Зміни коду

Примітка. Завжди тест код вирішення в середовищі контрольовані перед інсталяцією розглянутого виправлення виробництва комп'ютерів.

Щоб вирішити цю проблему, змін у функції зворотного в полі генералом Jnl.-повідомлення рядка codeunit (12), як описано нижче:

...TableID@1019 : ARRAY [10] OF Integer;
      AccNo@1018 : ARRAY [10] OF Code[20];
      PrevTransactionNo@1130000 : Integer;

// Delete the following line.
     ReverseVATonEntry@1130001 : Boolean;

    BEGIN
      SourceCodeSetup.GET;
      IF ReversalEntry2."Reversal Type" = ReversalEntry2."Reversal Type"::Register THEN
...

...TableID@1019 : ARRAY [10] OF Integer;
      AccNo@1018 : ARRAY [10] OF Code[20];
      PrevTransactionNo@1130000 : Integer;
    BEGIN
      SourceCodeSetup.GET;
      IF ReversalEntry2."Reversal Type" = ReversalEntry2."Reversal Type"::Register THEN
...

...//IF FIND('+') THEN
          IF FIND('+') THEN BEGIN
            PrevTransactionNo := "Transaction No.";

// Delete the following line.
           ReverseVATonEntry := TRUE;

          // IT0027.end
            REPEAT
              IF "Reversed by Entry No." <> 0 THEN
...

...//IF FIND('+') THEN
          IF FIND('+') THEN BEGIN
            PrevTransactionNo := "Transaction No.";
          // IT0027.end
            REPEAT
              IF "Reversed by Entry No." <> 0 THEN
...

...GLEntry."Entry No." := NextEntryNo;
              // IT0027.begin
              IF PrevTransactionNo <> "Transaction No." THEN BEGIN

// Delete the following lines.
               PrevTransactionNo := "Transaction No.";
               NextTransactionNo := NextTransactionNo + 1;
               ReverseVATonEntry := TRUE;
// End of the deleted lines.

              END;
              // IT0027.end
              GLEntry."Transaction No." := NextTransactionNo;
...

...GLEntry."Entry No." := NextEntryNo;
              // IT0027.begin
              IF PrevTransactionNo <> "Transaction No." THEN BEGIN

// Add the following lines.
               IF ReversalEntry2."Reversal Type" = ReversalEntry2."Reversal Type"::Register THEN BEGIN
                 VATEntry.SETRANGE("Transaction No.", PrevTransactionNo);
                 ReverseVAT(VATEntry);
               END;
               PrevTransactionNo := "Transaction No.";
               NextTransactionNo := NextTransactionNo + 1;
// End of the added lines.

              END;
              // IT0027.end
              GLEntry."Transaction No." := NextTransactionNo;
...

...// IT0027.end
      UNTIL TempRevertTransactionNo.NEXT = 0;
      //VSTF291522 begin

// Delete the following lines.
     IF ReverseVATonEntry AND (ReversalEntry2."Reversal Type" = ReversalEntry2."Reversal Type"::Register) THEN BEGIN
       VATEntry.SETRANGE("Transaction No.", PrevTransactionNo);
       ReverseVAT(VATEntry);
       ReverseVATonEntry := FALSE;
// End of the deleted lines.

      END;
      //VSTF291522 end
      IF FALedgEntry.FINDSET THEN
...

...// IT0027.end
      UNTIL TempRevertTransactionNo.NEXT = 0;
      //VSTF291522 begin

// Add the following lines.
     IF ReversalEntry2."Reversal Type" = ReversalEntry2."Reversal Type"::Register THEN BEGIN
       VATEntry.SETRANGE("Transaction No.", PrevTransactionNo);
       ReverseVAT(VATEntry);
// End of the added lines.

      END;
      //VSTF291522 end
      IF FALedgEntry.FINDSET THEN
...

Попередні вимоги

Ви повинні мати одну з таких продуктів, щоб застосувати це виправлення:

• Італійська версія Microsoft Dynamics NAV 2009-R2

• Італійська версія Microsoft Dynamics NAV 2009 пакетом оновлень 1

Відомості про видалення

Це виправлення не можна видалити.