Вот такая ситуация )) Делаю в самописной конфигурации аналог кнопки Изменить документа Установка цен номенклатуры тыповых конфигураций (УТ,УТП,БУХ).
По аналогу сделала обработочку, туда засунула табличную часть (у меня все немножко проще ем в типовой, т.е. и в установке цен и в обработке есть ТЧ товары с колонками Номенклатура, Цена, с типами цен не играюсь).
При открытии ТЧ в обработке заполняется (сделала реквизит в которых пихаю ссылку на Док. Установка цен.), все меняется и... вопрос в следующем : как мне данные из ТЧ обработки запихнуть обратно в документ?
Таким макаром
&НаКлиенте
Процедура ПередЗакрытием(Отказ, СтандартнаяОбработка)
ПередЗакрытиемСервер();
КонецПроцедуры
&НаСервере
Процедура ПередЗакрытиемСервер()
ДокЦен = ДанныеФормыВЗначение(Объект.ДокументЦен, Тип("ДокументОбъект.УстановкаЦенИСкидок"));
Для каждого СтрокаТабличнойЧасти Из Объект.Товары Цикл
СтруктураОтбора = Новый Структура();
СтруктураОтбора.Вставить("Номенклатура", СтрокаТабличнойЧасти.Номенклатура);
СтруктураОтбора.Вставить("СтараяЦена", СтрокаТабличнойЧасти.СтараяЦена);
РезультатПоиска = ДокЦен.Товары.НайтиСтроки(СтруктураОтбора);
Если РезультатПоиска.Количество() = 0 Тогда
СтрокаТабличнойЧастиДок = ДокЦен.Товары.Добавить();
Иначе
СтрокаТабличнойЧастиДок = РезультатПоиска[0];
КонецЕсли;
СтрокаТабличнойЧастиДок.Номенклатура = СтрокаТабличнойЧасти.Номенклатура;
СтрокаТабличнойЧастиДок.СтараяЦена = СтрокаТабличнойЧасти.СтараяЦена;
СтрокаТабличнойЧастиДок.Значение = СтрокаТабличнойЧасти.Значение;
КонецЦикла;
ЗначениеВДанныеФормы(ДокЦен,Объект.ДокументЦен);
КонецПроцедурырезультат нулевой, ТЧ документа остается такая же.
Спасибо за внимание
Платформа 8.2.15.284 )
