Быстро публикуемые статьи содержат сведения непосредственно из организации поддержки Майкрософт. Информация, содержащаяся в этом документе, создается в ответ на новые или уникальные темы или предназначена для дополнения других сведений базы знаний.
Microsoft Business Solutions-Navision 4.0 и Microsoft Navision 4.0 теперь являются частью Microsoft Dynamics NAV 4.0. Все ссылки на Microsoft Business Solutions-Navision или Microsoft Navision 4.0 относятся к Microsoft Dynamics NAV.
Эта статья относится к Microsoft Dynamics NAV для всех регионов.
Проблема
Рассмотрим следующий сценарий.
- В диалоговом окне Строки отслеживания элементов создаются две строки отслеживания элементов с серийными номерами, указанными для элемента SNALL.
- Серийный номер в строке изменится на тот же, что и серийный номер в другой строке.
- Диалоговое окно Строки отслеживания элементов закрывается, не выходя из поля Серийный номер .
В этом сценарии Microsoft Dynamics NAV принимает дубликат серийного номера, а количество для серийного номера изменяется на два. Таким образом, для записи реестра элементов создается несколько значений.
Эта проблема возникает в следующих продуктах:
- Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1)
- Microsoft Dynamics NAV 5.0 с пакетом обновления 1 (SP1)
- Microsoft Dynamics NAV 4.0 с пакетом обновления 3 (SP3)
Решение
Сведения об исправлении
Поддерживаемое исправление теперь доступно в корпорации Майкрософт. Однако он предназначен только для устранения проблемы, описанной в этой статье. Применяйте его только к системам, в которых возникла эта конкретная проблема. Это исправление может пройти дополнительное тестирование. Поэтому, если вы не пострадали от этой проблемы, рекомендуется дождаться следующего пакета обновления 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.
Примечание. Вы не должны иметь права на хранилища данных, если только вам не нужно выполнить восстановление данных.
Изменения кода
Примечание. Перед применением исправлений на рабочих компьютерах всегда тестируйте исправления кода в управляемой среде.
Чтобы устранить эту проблему в Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1), измените код в триггере OnModifyRecord в форме "Строки отслеживания элементов" (6510) и на странице "Строки отслеживания элементов" (6510) следующим образом:
Существующий код
...
// Delete the following line.
IF NOT TestTempSpecificationExists THEN
MODIFY;
IF (xRec."Lot No." <> "Lot No.") OR (xRec."Serial No." <> "Serial No.") THEN BEGIN
xTempTrackingSpec := xRec;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
xTempTrackingSpec,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,2);
END;
IF TempItemTrackLineModify.GET("Entry No.") THEN
TempItemTrackLineModify.DELETE;
IF TempItemTrackLineInsert.GET("Entry No.") THEN BEGIN
TempItemTrackLineInsert.TRANSFERFIELDS(Rec);
TempItemTrackLineInsert.MODIFY;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineInsert,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END ELSE BEGIN
TempItemTrackLineModify.TRANSFERFIELDS(Rec);
TempItemTrackLineModify.INSERT;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineModify,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END;
CalculateSums;
...
Код замены
...
// Add the following line.
IF NOT TestTempSpecificationExists THEN BEGIN
MODIFY;
IF (xRec."Lot No." <> "Lot No.") OR (xRec."Serial No." <> "Serial No.") THEN BEGIN
xTempTrackingSpec := xRec;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
xTempTrackingSpec,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,2);
END;
IF TempItemTrackLineModify.GET("Entry No.") THEN
TempItemTrackLineModify.DELETE;
IF TempItemTrackLineInsert.GET("Entry No.") THEN BEGIN
TempItemTrackLineInsert.TRANSFERFIELDS(Rec);
TempItemTrackLineInsert.MODIFY;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineInsert,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END ELSE BEGIN
TempItemTrackLineModify.TRANSFERFIELDS(Rec);
TempItemTrackLineModify.INSERT;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineModify,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END;
// Add the following line.
END;
// Tab over two space to the left for the following line.
CalculateSums;
...
Чтобы устранить эту проблему в Microsoft Dynamics NAV 5.0 с пакетом обновления 1 (SP1), измените код в триггере OnModifyRecord в форме "Строки отслеживания элементов" (6510) следующим образом:
Существующий код
...
// Delete the following line.
IF NOT TestTempSpecificationExists THEN
MODIFY;
IF (xRec."Lot No." <> "Lot No.") OR (xRec."Serial No." <> "Serial No.") THEN BEGIN
xTempTrackingSpec := xRec;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
xTempTrackingSpec,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,2);
END;
IF TempItemTrackLineModify.GET("Entry No.") THEN
TempItemTrackLineModify.DELETE;
IF TempItemTrackLineInsert.GET("Entry No.") THEN BEGIN
TempItemTrackLineInsert.TRANSFERFIELDS(Rec);
TempItemTrackLineInsert.MODIFY;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineInsert,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END ELSE BEGIN
TempItemTrackLineModify.TRANSFERFIELDS(Rec);
TempItemTrackLineModify.INSERT;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineModify,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END;
CalculateSums;
...
Код замены
...
// Add the following line.
IF NOT TestTempSpecificationExists THEN BEGIN
MODIFY;
IF (xRec."Lot No." <> "Lot No.") OR (xRec."Serial No." <> "Serial No.") THEN BEGIN
xTempTrackingSpec := xRec;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
xTempTrackingSpec,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,2);
END;
IF TempItemTrackLineModify.GET("Entry No.") THEN
TempItemTrackLineModify.DELETE;
IF TempItemTrackLineInsert.GET("Entry No.") THEN BEGIN
TempItemTrackLineInsert.TRANSFERFIELDS(Rec);
TempItemTrackLineInsert.MODIFY;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineInsert,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END ELSE BEGIN
TempItemTrackLineModify.TRANSFERFIELDS(Rec);
TempItemTrackLineModify.INSERT;
ItemTrackingDataCollection.UpdateLotSNDataSetWithChange(
TempItemTrackLineModify,CurrentSignFactor * SourceQuantityArray[1] < 0,CurrentSignFactor,1);
END;
// Add the following line.
END;
// Tab over two space to the left for the following line.
CalculateSums;
...
Чтобы устранить эту проблему в Microsoft Dynamics NAV 4.0 с пакетом обновления 3 (SP3), измените код в триггере OnModifyRecord в форме "Строки отслеживания элементов" (6510) следующим образом:
Существующий код
...
// Delete the following line.
IF NOT TestTempSpecificationExists THEN
TempTrackingSpec.MODIFY;
IF TempItemTrackLineModify.GET(TempTrackingSpec."Entry No.") THEN
TempItemTrackLineModify.DELETE;
IF TempItemTrackLineInsert.GET(TempTrackingSpec."Entry No.") THEN BEGIN
TempItemTrackLineInsert.TRANSFERFIELDS(TempTrackingSpec);
TempItemTrackLineInsert.MODIFY;
END ELSE BEGIN
TempItemTrackLineModify.TRANSFERFIELDS(TempTrackingSpec);
TempItemTrackLineModify.INSERT;
END;
CalculateSums;
...
Код замены
...
// Add the following line.
IF NOT TestTempSpecificationExists THEN BEGIN
TempTrackingSpec.MODIFY;
// Tab over two spaces for the following lines.
IF TempItemTrackLineModify.GET(TempTrackingSpec."Entry No.") THEN
TempItemTrackLineModify.DELETE;
IF TempItemTrackLineInsert.GET(TempTrackingSpec."Entry No.") THEN BEGIN
TempItemTrackLineInsert.TRANSFERFIELDS(TempTrackingSpec);
TempItemTrackLineInsert.MODIFY;
END ELSE BEGIN
TempItemTrackLineModify.TRANSFERFIELDS(TempTrackingSpec);
TempItemTrackLineModify.INSERT;
END;
// End of the lines.
// Add the following line.
END;
CalculateSums;
...
Необходимые условия
Для применения этого исправления необходимо установить один из следующих продуктов:
- Microsoft Dynamics NAV 2009 с пакетом обновления 1 (SP1)
- Microsoft Dynamics NAV 5.0 с пакетом обновления 1 (SP1)
- Microsoft Dynamics NAV 4.0 с пакетом обновления 3 (SP3)
Сведения об удалении
Удалить это исправление невозможно.
Состояние
Корпорация Майкрософт подтвердила, что это проблема продуктов Microsoft, перечисленных в разделе «Относится к».
КОРПОРАЦИЯ МАЙКРОСОФТ И (ИЛИ) ЕЕ ПОСТАВЩИКИ НЕ ДЕЛАЮТ НИКАКИХ ЗАЯВЛЕНИЙ ИЛИ ГАРАНТИЙ ОТНОСИТЕЛЬНО ПРИГОДНОСТИ, НАДЕЖНОСТИ ИЛИ ТОЧНОСТИ ИНФОРМАЦИИ, СОДЕРЖАЩЕЙСЯ В ДОКУМЕНТАХ И СВЯЗАННЫХ ГРАФИКАХ, ОПУБЛИКОВАННЫХ НА ЭТОМ ВЕБ-САЙТЕ ("МАТЕРИАЛЫ") ДЛЯ КАКИХ-ЛИБО ЦЕЛЕЙ.
МАТЕРИАЛЫ МОГУТ СОДЕРЖАТЬ ТЕХНИЧЕСКИЕ НЕТОЧНОСТИ ИЛИ ТИПОГРАФИЧЕСКИЕ ОШИБКИ И МОГУТ БЫТЬ ПЕРЕСМОТРЕНЫ В ЛЮБОЕ ВРЕМЯ БЕЗ УВЕДОМЛЕНИЯ. В МАКСИМАЛЬНОЙ СТЕПЕНИ, РАЗРЕШЕННОЙ ПРИМЕНИМЫМ ЗАКОНОДАТЕЛЬСТВОМ, КОРПОРАЦИЯ МАЙКРОСОФТ И (ИЛИ) ЕЕ ПОСТАВЩИКИ ОТКАЗЫВАЕТСЯ ОТ ОТВЕТСТВЕННОСТИ И ИСКЛЮЧАЮТ ВСЕ ЗАЯВЛЕНИЯ, ГАРАНТИИ И УСЛОВИЯ, БУДЬ ТО ЯВНЫЕ, ПОДРАЗУМЕВАЕМЫЕ ИЛИ УСТАНОВЛЕННЫЕ ЗАКОНОМ, ВКЛЮЧАЯ, ПОМИМО ПРОЧЕГО, ПРЕДСТАВЛЕНИЯ, ГАРАНТИИ ИЛИ УСЛОВИЯ ПРАВОВОГО ТИТУЛА, НЕНАРУШЕНИЯ ПРАВ, УДОВЛЕТВОРИТЕЛЬНОЕ СОСТОЯНИЕ ИЛИ КАЧЕСТВО, ТОВАРНОЕ КАЧЕСТВО И ПРИГОДНОСТЬ ДЛЯ ОПРЕДЕЛЕННОЙ ЦЕЛИ В ОТНОШЕНИИ МАТЕРИАЛОВ.