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