ВызовПриИзмененииЭлементаФормы из обработки

&НаКлиенте
Процедура ПерезаписатьКА(Команда)
	СписокСсылокКонтрагента = 	ПерезаписатьКАНаСервере();
	Для Каждого ТекКонтрагент из СписокСсылокКонтрагента Цикл  
		КлючьФОрмы= новый Структура;
		КлючьФОрмы.Вставить("Ключ",ТекКонтрагент.Значение);
		ФормаКонтрагента = ОткрытьФорму("Документ.РеализацияТоваровУслуг.Форма.ФормаДокумента",КлючьФОрмы);	
		ФормаКонтрагента.Активизировать();
		ПолучитьСтавкуНДС1 =  ПолучитьСтавкуНДС();
		
		Для Каждого ТекСтрокаТовры из ФормаКонтрагента.ЭтотОбъект.Объект.Товары цикл
			ИдентификаторСтроки  =ТекСтрокаТовры.ПолучитьИдентификатор();
			ФормаКонтрагента.Элементы.Товары.ТекущаяСтрока = ИдентификаторСтроки;
			ФормаКонтрагента.Элементы.Товары.ТекущийЭлемент =ФормаКонтрагента.Элементы.Товары.ПодчиненныеЭлементы.ТоварыСтавкаНДС;
			ФормаКонтрагента.Элементы.Товары.ИзменитьСтроку();
			ИнтерактивноЗаписатьВЭлементУправленияЛкс(ФормаКонтрагента.Элементы.Товары.ТекущийЭлемент, ПолучитьСтавкуНДС1, ЭтаФорма);	
			ФормаКонтрагента.Элементы.Товары.ЗакончитьРедактированиеСтроки(Ложь);   
			//ЭтаФорма.ВладелецФормы =ФормаКонтрагента.Элементы.Товары.ТекущийЭлемент ;
			//ЭтаФорма.ВладелецФормы =ФормаКонтрагента.Элементы.ТоварыСтавкаНДС;
			//ФормаКонтрагента.Элементы.Товары.ПодчиненныеЭлементы.ТоварыСтавкаНДС		
			////ЭтаФорма.ОповеститьОВыборе(ПолучитьСтавкуНДС1);
			//ЭтаФорма.ОповеститьОВыборе(12345);
			// ЭтаФорма.ЗакрыватьПриВыборе = Истина;
			//ФормаКонтрагента.Расш1_ТоварыСтавкаНДСПриИзмененииПеред(ТекСтрокаТовры.СтавкаНДС);	
		КонецЦикла;
		
		ПараметрыЗаписи = Новый Структура;
		ПараметрыЗаписи.Вставить("РежимЗаписи", РежимЗаписиДокумента.Запись);
		
		ФормаКонтрагента.Записать(ПараметрыЗаписи);
		Сообщить(ТекКонтрагент);
	КонецЦикла;
КонецПроцедуры
&НаКлиенте
Функция ИнтерактивноЗаписатьВЭлементУправленияЛкс(ЭлементУправления, Знач Значение, Знач ФормаИнициатор = Неопределено) Экспорт
	СтарыйВладелец = ФормаИнициатор.ВладелецФормы;
	СтарыйЗакрыватьПриВыборе = ФормаИнициатор.ЗакрыватьПриВыборе;
	ФормаИнициатор.ВладелецФормы = ЭлементУправления;
	ФормаИнициатор.ЗакрыватьПриВыборе = Ложь;
	НовоеЗначение = ЭлементУправления.ОграничениеТипа.ПривестиЗначение(Значение);
	Если НовоеЗначение <> Значение Или ЭлементУправления.ТолькоПросмотр Тогда
		Возврат Ложь;
	КонецЕсли; 
	ФормаИнициатор.ОповеститьОВыборе(Значение); 
	Если СтарыйЗакрыватьПриВыборе <> Неопределено Тогда
		ФормаИнициатор.ВладелецФормы = СтарыйВладелец;
		ФормаИнициатор.ЗакрыватьПриВыборе = СтарыйЗакрыватьПриВыборе;
	КонецЕсли;
	
КонецФункции 


&НаСервереБезКонтекста
Функция  ПерезаписатьКАНаСервере()
	Выборка = Справочники.Контрагенты.Выбрать();
	
	//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
	// Данный фрагмент построен конструктором.
	// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
	"ВЫБРАТЬ ПЕРВЫЕ 1
	|	РеализацияТоваровУслуг.Ссылка КАК Ссылка
	|ИЗ
	|	Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг"
	;
	РезультатЗапроса = Запрос.Выполнить().Выгрузить();
	СписокЗначейКонтрагентов = новый СписокЗначений;
	СписокЗначейКонтрагентов.ЗагрузитьЗначения(РезультатЗапроса.ВыгрузитьКолонку("Ссылка")); 
	//ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	//
	//Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
	//	// Вставить обработку выборки ВыборкаДетальныеЗаписи
	//КонецЦикла;
	//
	////}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
	
	Возврат СписокЗначейКонтрагентов
	
КонецФункции