Вы не можете добавить строку счета для покупки основного средства, если для учетной записи затрат на приобретение задана учетная запись общей книги, в которой нет "Gen. Группа публикации продукта", заполненное в североамериканской версии Microsoft Dynamics NAV 2009

Применяется к

Dynamics NAV 2009

Эта статья относится к Microsoft Dynamics NAV для следующих стран и языковых стандартов.

Английский (Канада) (en-ca)
Английский (США) (en-us)
Испанский (Мексика) (es-mx)
Французский (Канада) (fr-ca)

Проблема

Предположим, что вы назначаете учетную запись общей книги учетной записи затрат на приобретение в североамериканской версии Microsoft Dynamics NAV 2009. Для учетной записи general ledger поле General Posting Type (Общий тип записи) имеет значение пустое, а в учетной записи общего реестра в диалоговом окне Карточка учетной записи G/L не указано значение Группы публикации продукта. В этом случае при попытке добавить строку счета на покупку для покупки основного средства появляется следующее сообщение об ошибке:

Примечание

Gen. Группа публикации продукта должна иметь значение в поле G/L Account No. = общий номер учетной записи реестра. Оно не может быть пустым или нулевым.

Однако при отключении параметра "НДС в использовании" значение группы публикации продуктов поколения не требуется.
Эта проблема возникает в следующих продуктах:

Североамериканская версия Microsoft Dynamics NAV 2009 R2
Североамериканская версия Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1)

Решение

Сведения об исправлении

Поддерживаемое исправление теперь доступно в корпорации Майкрософт. Однако он предназначен только для устранения проблемы, описанной в этой статье. Применяйте его только к системам, в которых возникла эта конкретная проблема. Это исправление может пройти дополнительное тестирование. Поэтому, если вы не пострадали от этой проблемы, рекомендуется дождаться следующего пакета обновления Microsoft Dynamics NAV или следующей версии Microsoft Dynamics NAV, содержащей это исправление.

Примечание. В особых случаях плата, которая обычно взимается за звонки в службу поддержки, может быть отменена, если специалист по технической поддержке Microsoft Dynamics и связанных продуктов определит, что конкретное обновление поможет устранить вашу проблему. Обычные расходы на поддержку будут применяться к дополнительным вопросам и проблемам поддержки, которые не относятся к конкретному обновлению.

Сведения об установке

Корпорация Майкрософт предоставляет примеры программирования только для иллюстрации, без явных или подразумеваемых гарантий. Это включает подразумеваемые гарантии товарного состояния или пригодности для конкретной цели, но не ограничивается ими. В этой статье предполагается, что вы знакомы с демонстрируемым языком программирования и инструментами, используемыми для создания и отладки процедур. Инженеры службы поддержки Майкрософт могут помочь объяснить функциональность конкретной процедуры, но они не будут изменять эти примеры, чтобы предоставить дополнительные функциональные возможности или создать процедуры в соответствии с вашими конкретными требованиями.

Примечание. Перед установкой этого исправления убедитесь, что все пользователи клиента Microsoft Navision вышли из системы. Сюда входят пользователи клиентов Служб приложений Microsoft Navision (NAS). Вы должны быть единственным пользователем клиента, который вошел в систему при реализации этого исправления.

Чтобы реализовать это исправление, у вас должна быть лицензия разработчика.

Рекомендуется назначить учетной записи пользователя в окне Входа Windows или в окне Входа базы данных идентификатор роли SUPER. Если учетной записи пользователя не удается назначить идентификатор роли SUPER, необходимо убедиться, что учетная запись пользователя имеет следующие разрешения:

Разрешение Изменить для объекта, который вы будете изменять.
Разрешение Execute для объекта System Object ID 5210 и для объекта System Object ID 9015.

Примечание. Вы не должны иметь права на хранилища данных, если только вам не нужно выполнить восстановление данных.

Изменения кода

Примечание. Перед применением исправлений на рабочих компьютерах всегда тестируйте исправления кода в управляемой среде.
Чтобы устранить эту неполадку, выполните следующие действия:

Добавьте новую локальную переменную в функцию GetFAPostingGroup в таблице Sales Line (37), а затем укажите ее следующим образом:
- Имя: GLSetup@1004
- DataType: Record
- Подтип: настройка общего реестра (98)

Измените код в функции GetFAPostingGroup в таблице Sales Line (37) следующим образом:
Существующий код

...
FAPostingGr.GET(FADeprBook."FA Posting Group");
FAPostingGr.TESTFIELD("Acq. Cost Acc. on Disposal");
LocalGLAcc.GET(FAPostingGr."Acq. Cost Acc. on Disposal");
LocalGLAcc.CheckGLAcc;

// Delete the following line.
LocalGLAcc.TESTFIELD("Gen. Prod. Posting Group");

"Posting Group" := FADeprBook."FA Posting Group";
"Gen. Prod. Posting Group" := LocalGLAcc."Gen. Prod. Posting Group";
"Tax Group Code" := LocalGLAcc."Tax Group Code";
VALIDATE("VAT Prod. Posting Group",LocalGLAcc."VAT Prod. Posting Group");
...

Код замены

...
FAPostingGr.GET(FADeprBook."FA Posting Group");
FAPostingGr.TESTFIELD("Acq. Cost Acc. on Disposal");
LocalGLAcc.GET(FAPostingGr."Acq. Cost Acc. on Disposal");
LocalGLAcc.CheckGLAcc;

// Add the following lines.
GLSetup.GET;
IF GLSetup."VAT in Use" THEN
LocalGLAcc.TESTFIELD("Gen. Prod. Posting Group");
// End of the lines.

"Posting Group" := FADeprBook."FA Posting Group";
"Gen. Prod. Posting Group" := LocalGLAcc."Gen. Prod. Posting Group";
"Tax Group Code" := LocalGLAcc."Tax Group Code";
VALIDATE("VAT Prod. Posting Group",LocalGLAcc."VAT Prod. Posting Group");
...

Добавьте новую локальную переменную в функцию GetFAPostingGroup в таблице Purchase Line (39), а затем укажите переменную следующим образом:
- Имя: GLSetup@1002
- DataType: Record
- Подтип: настройка общего реестра (98)

Измените код функции GetFAPostingGroup в таблице Строка покупки (39) следующим образом:
Существующий код

...
END ELSE BEGIN
FAPostingGr.TESTFIELD("Maintenance Expense Account");
LocalGLAcc.GET(FAPostingGr."Maintenance Expense Account");
END;
LocalGLAcc.CheckGLAcc;

// Delete the following line.
LocalGLAcc.TESTFIELD("Gen. Prod. Posting Group");

"Posting Group" := FADeprBook."FA Posting Group";
"Gen. Prod. Posting Group" := LocalGLAcc."Gen. Prod. Posting Group";
"Tax Group Code" := LocalGLAcc."Tax Group Code";
VALIDATE("VAT Prod. Posting Group",LocalGLAcc."VAT Prod. Posting Group");
...

Код замены

...
END ELSE BEGIN
FAPostingGr.TESTFIELD("Maintenance Expense Account");
LocalGLAcc.GET(FAPostingGr."Maintenance Expense Account");
END;
LocalGLAcc.CheckGLAcc;

// Add the following lines.
GLSetup.GET;
IF GLSetup."VAT in Use" THEN
LocalGLAcc.TESTFIELD("Gen. Prod. Posting Group");
// End of the lines.

"Posting Group" := FADeprBook."FA Posting Group";
"Gen. Prod. Posting Group" := LocalGLAcc."Gen. Prod. Posting Group";
"Tax Group Code" := LocalGLAcc."Tax Group Code";
VALIDATE("VAT Prod. Posting Group",LocalGLAcc."VAT Prod. Posting Group");
...

Измените код в триггере OnRun в Sales-Post codeunit (80) следующим образом:
Существующий код

...
           ((SalesLine."Qty. to Invoice" <> 0) OR (SalesLine."Qty. to Ship" <> 0))
        THEN

// Delete the following line.
          IF SalesLine.Type = SalesLine.Type::"G/L Account" THEN

            IF (((SalesSetup."Discount Posting" = SalesSetup."Discount Posting"::"Invoice Discounts") AND
                 (SalesLine."Inv. Discount Amount" <> 0)) OR
...

Код замены

...
           ((SalesLine."Qty. to Invoice" <> 0) OR (SalesLine."Qty. to Ship" <> 0))
        THEN

// Add the following line.
          IF (SalesLine.Type IN [SalesLine.Type::"G/L Account",SalesLine.Type::"Fixed Asset"]) THEN

            IF (((SalesSetup."Discount Posting" = SalesSetup."Discount Posting"::"Invoice Discounts") AND
                 (SalesLine."Inv. Discount Amount" <> 0)) OR
...

Измените код в триггере OnRun в коде Purch.-Post (90) следующим образом:
Существующий код

...
        THEN

// Delete the following line.
          IF PurchLine.Type = PurchLine.Type::"G/L Account" THEN

            IF (((PurchSetup."Discount Posting" = PurchSetup."Discount Posting"::"Invoice Discounts") AND
                 (PurchLine."Inv. Discount Amount" <> 0)) OR
...

Код замены

...
        THEN

// Add the following line.
          IF (PurchLine.Type IN [PurchLine.Type::"G/L Account",PurchLine.Type::"Fixed Asset"]) THEN

            IF (((PurchSetup."Discount Posting" = PurchSetup."Discount Posting"::"Invoice Discounts") AND
                 (PurchLine."Inv. Discount Amount" <> 0)) OR
...

Необходимые условия

Для применения этого исправления необходимо установить один из следующих продуктов:

Североамериканская версия Microsoft Dynamics NAV 2009 R2
Североамериканская версия Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1)

Сведения об удалении

Удалить это исправление невозможно.

Состояние

Корпорация Майкрософт подтвердила, что это проблема продуктов Microsoft, перечисленных в разделе «Относится к».

Примечание. Это статья "FAST PUBLISH", созданная непосредственно в организации поддержки Майкрософт. Информация, содержащаяся в настоящем документе, предоставляется как есть в ответ на возникающие проблемы. В результате быстрой доступности материалы могут содержать опечатки и могут быть пересмотрены в любое время без уведомления. Дополнительные рекомендации см. в разделе Условия использования .

Проблема

Решение

Сведения об исправлении

Сведения об установке

Изменения кода

Необходимые условия

Сведения об удалении

Состояние

Полезны ли эти сведения?

Спасибо за ваш отзыв!