Ребята всем доброго дня!у меня такая проблема!есть две таблицы одна заполняется из другой!вот такой процедурой
все хорошо,но есть маленькое,но "ЕдиницаИзмерения","Коэффициент" и "Спецификация" не заполнятся сразу!
Только если через измение номенклатуры вот этой процедурой
Подскажите пожалуйста,как сделать,что бы сразу после переноса данных в другую таблицу заполнялись все эти поля?
Конфа Управление производственным предприятием, редакция 1.3 (1.3.111.1)
PSПодразделение не нужно
Процедура ЗаполнитьСборкуПриходПродукции(Элемент)
Для каждого Стр из ТаблицаСборки Цикл
НоваяСтрока = ПродукцияСборки.Добавить();
НоваяСтрока.Номенклатура = Стр.ИсполняемыйПрибор;
НоваяСтрока.Количество = Стр.КоличествоНаВыходеСУчастка;
НоваяСтрока.Склад = Стр.Склад;
КонецЦикла;
Этаформа.ТекущийЭлемент = ЭлементыФормы.ПродукцияСборки;
КонецПроцедуры
Показатьвсе хорошо,но есть маленькое,но "ЕдиницаИзмерения","Коэффициент" и "Спецификация" не заполнятся сразу!
Только если через измение номенклатуры вот этой процедурой
Процедура ПродукцияСборкиНоменклатураПриИзменении(Элемент)
СтрокаТабличнойЧасти = ЭлементыФормы.ПродукцияСборки.ТекущиеДанные;
ОбработкаТабличныхЧастей.ПриИзмененииНоменклатурыТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
СтрокаТабличнойЧасти.Спецификация = УправлениеПроизводством.ОпределитьСпецификациюПоУмолчанию(СтрокаТабличнойЧасти.Номенклатура, СтрокаТабличнойЧасти.ХарактеристикаНоменклатуры, Дата, СтрокаТабличнойЧасти.Подразделение);
КонецПроцедуры ПоказатьПодскажите пожалуйста,как сделать,что бы сразу после переноса данных в другую таблицу заполнялись все эти поля?
Конфа Управление производственным предприятием, редакция 1.3 (1.3.111.1)
PSПодразделение не нужно
Прикрепленные файлы:
По теме из базы знаний
- Полезный код для программистов 1С (часть 2). Помощник заполнения.
- Обработка заполнения объекта, вызов клиентского метода. Подключение через расширение
- Использование подсистемы БСП "Заполнение объектов"
- Нюансы использования расширений применительно к процедурам, исполняющимся методом ВыполнитьВФоне (БСП)
- Заполнение объектов в модели MVC
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
что мешает добавить этот кусок кода после заполнения номенклатуры
ОбработкаТабличныхЧастей.ПриИзмененииНоменклатурыТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
СтрокаТабличнойЧасти.Спецификация = УправлениеПроизводством.ОпределитьСпецификациюПоУмолчанию(СтрокаТабличнойЧасти.Номенклатура, СтрокаТабличнойЧасти.ХарактеристикаНоменклатуры, Дата, СтрокаТабличнойЧасти.Подразделение);
(5)
Процедура ЗаполнитьСборкуПриходПродукции(Элемент)
Для каждого Стр из ТаблицаСборки Цикл
НоваяСтрока = ПродукцияСборки.Добавить();
НоваяСтрока.Номенклатура = Стр.ИсполняемыйПрибор;
ОбработкаТабличныхЧастей.ПриИзмененииНоменклатурыТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
СтрокаТабличнойЧасти.Спецификация = УправлениеПроизводством.ОпределитьСпецификациюПоУмолчанию(СтрокаТабличнойЧасти.Номенклатура, СтрокаТабличнойЧасти.ХарактеристикаНоменклатуры, Дата, СтрокаТабличнойЧасти.Подразделение);
НоваяСтрока.Количество = Стр.КоличествоНаВыходеСУчастка;
НоваяСтрока.Склад = Стр.Склад;
КонецЦикла;
Этаформа.ТекущийЭлемент = ЭлементыФормы.ПродукцияСборки;
КонецПроцедуры Показать
(10)
Процедура ЗаполнитьСборкуПриходПродукции(Элемент)
Для каждого Стр из ТаблицаСборки Цикл
НоваяСтрока = ПродукцияСборки.Добавить();
НоваяСтрока.Номенклатура = Стр.ИсполняемыйПрибор;
ОбработкаТабличныхЧастей.ПриИзмененииНоменклатурыТабЧасти(НоваяСтрока, ЭтотОбъект);
ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуТабЧасти(НоваяСтрока, ЭтотОбъект);
НоваяСтрока.Спецификация = УправлениеПроизводством.ОпределитьСпецификациюПоУмолчанию(НоваяСтрока.Номенклатура, НоваяСтрока.ХарактеристикаНоменклатуры, Дата, НоваяСтрока.Подразделение);
НоваяСтрока.Количество = Стр.КоличествоНаВыходеСУчастка;
НоваяСтрока.Склад = Стр.Склад;
КонецЦикла;
Этаформа.ТекущийЭлемент = ЭлементыФормы.ПродукцияСборки;
КонецПроцедуры Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот