Вызвать обработку строки табличной части при создании документа из другой обработки
По теме из базы знаний
- Концепция автоматизации многопрофильного Холдинга в системе АУБ на платформе 1С
- Разработка и сценарное тестирование с Vanessa-ADD. Концепция, теория и сквозной пример создания сценария
- Загрузка чеков ФНС в документы 1С:БП, 1С:УНФ, 1С:ERP, 1С:КА и 1С:УТ
- Пример создания документа с движениями в ERP 2.5.7
- Табличная часть как поле ввода
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ДатаЗаказ = Формат(ВыборкаДетальныеЗаписи.Дата, "ДЛФ=Д");
Если ДатаЗаказ = ДатаМоби тогда
ЗЗ = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();
//Сообщить(ЗЗ);
Выборка = ЭтотОбъект.Товары;
для каждого Строка из Выборка Цикл
Выборка2 = ЗЗ.товары;
Ег=0;
Для каждого строка2 из выборка2 Цикл
НДС = Строка2.СтавкаНДС;
Если Строка2.Номенклатура = Строка.Номенклатура тогда
Строка2.Замена = строка.Замена;
Строка2.СтавкаНДС = Строка.СтавкаНДС;
строка2.Коэффициент = строка.Коэффициент;
//Строка2.Цена = строка.Цена;
//Строка2.ЕдиницаИзмерения = строка2.Номенклатура.БазоваяЕдиницаИзмерения;
//Сообщить(Строка(Строка2.Номенклатура) + " " + строка(Строка2.Замена));
ЗЗ.КоличествоЗамены = зз.Товары.Итог("Замена");
ЗЗ.записать(РежимЗаписиДокумента.Запись);
ЗЗ.записать(РежимЗаписиДокумента.Проведение);
Ег = 1;
НДС = Строка2.СтавкаНДС;
КонецЕсли;
КонецЦикла;
ПоказатьЦена НДС и тд в форме документа таб части автоматом подставляются при изменении номенклатуры.
Вот процедура в форме докуммента
Процедура ТоварыНоменклатураПриИзменении(Элемент)
СтрокаТабличнойЧасти = ЭлементыФормы.Товары.ТекущиеДанные;
// Выполнить общие действия для всех документов при изменении номенклатуры.
ОбработкаТабличныхЧастей.ПриИзмененииНоменклатурыТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
ПриИзмененииНоменклатурыТоваров(СтрокаТабличнойЧасти);
// Рассчитываем реквизиты табличной части.
ОбработкаТабличныхЧастей.РассчитатьСуммуТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
УчетСерийныхНомеров.ПроверитьСерийныеНомера(СтрокаТабличнойЧасти, ЭтотОбъект);
// Ввод состава набора
УправлениеЗапасами.ДобавитьСоставНабора(СтрокаТабличнойЧасти, ЭтотОбъект);
КонецПроцедуры // ТоварыНоменклатураПриИзменении()
ПоказатьМне нужно добавить строки в таб часть документа, но кроме номенклатуры у меня ничего нет. Нужно автоматом подтянуть цену из цен договора контрагента, что и делает эта процедура на форме докуммента, но как ее вызвать?
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот