Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 00:53

Запись реквизита справочника

Автор fsa, 09 янв 2017, 14:26

0 Пользователей и 1 гость просматривают эту тему.

fsa


НомГруппа = Справочники.НоменклатурныеГруппы.НайтиПоКоду("000000024");
Родитель  = Справочники.Номенклатура.НайтиПоКоду("00000020320");
Для Каждого СтрТЗ ИЗ ТаблицаДокумента Цикл
Номенклатура = Справочники.Номенклатура.НайтиПоКоду(СокрЛП(СтрТЗ.Код));
Если Не ЗначениеЗаполнено(Номенклатура) Тогда
Сообщить("Не найдена номенклатура с артикулом:" + СтрТЗ.Код + " наименование: " + СтрТЗ.Наименование);
Продолжить;
Иначе
Сообщить(СокрЛП(Номенклатура) + " Арт: " + Номенклатура.Артикул);
НоменклатураОбъект = Номенклатура.ПолучитьОбъект();
НоменклатураОбъект.НоменклатурнаяГруппа   = НомГруппа;
НоменклатураОбъект.Родитель   = Родитель;
НоменклатураОбъект.Записать();
КонецЕсли;
КонецЦикла;

Не перезаписывает Элемент спр Номенклатура. В чем может быть ошибка? Ничего не сообщает, просто не пишет и все.....

fsa

В конце не вставил ЗафиксироватьТранзакцию();

Вопрос снят!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск