GoncharovNN
11/12/2019 - 6:14 AM

Открыть форму и заполнить ее но не записывать #Формы

Открыть форму и заполнить ее но не записывать #Формы

&НаКлиенте
Процедура ОсновныеДействияФормыВыполнить(Команда)
	Если переключатель=1 или Переключатель=2 Тогда
		ВыполнитьНаСервере();
	ИначеЕсли  Переключатель=3 тогда
		Форма = ПолучитьФорму("Документ.ВозвратМатериаловИзЭксплуатации.Форма.ФормаДокумента");
		ДанныеФормы = Форма.Объект;
		Данные=Объект; // только так и не иначе!!!
		ЗаполнитьНаСервереФорму(ДанныеФормы, Данные);
		КопироватьДанныеФормы(ДанныеФормы, Форма.Объект);
		Форма.Открыть();	
		
		//	 - Возврат материалов из эксплуатации (возврат на счет 10.10);
		
		//ВозвратМатИзЭкспл=Документы.ВозвратМатериаловИзЭксплуатации.СоздатьДокумент();
		//ВозвратМатИзЭкспл.Склад=
		
	
КонецЕсли; 	

КонецПроцедуры
 
&НаСервереБезКонтекста
Процедура ЗаполнитьНаСервереФорму(ДанныеФормы,Данные )
	
	Док = Документы.ВозвратМатериаловИзЭксплуатации.СоздатьДокумент();
	
	док.Склад =Данные.СкладСдающий ; 

	// Заполняем реквизиты объекта или другие действия ********
		
	Док.Комментарий="йцу";
	ЗначениеВДанныеФормы(Док,ДанныеФормы); // Кладем обратно в объект формы уже созданный документ

	
КонецПроцедуры