&НаКлиенте 

Процедура ДоверенностьВвести(Команда) 



Форма = ПолучитьФорму("Документ.ВозвратТоваровОтКлиента.Форма.ФормаПодготовкиДоверенности"); 

ДанныеФормы = ЭтаФорма.Объект; 

ЗаполнитьДокументНаСервере(ДанныеФормы); 

КопироватьДанныеФормы(ДанныеФормы, Форма.Объект); 

Форма.Открыть(); 



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



&НаСервере 

Функция ЗаполнитьДокументНаСервере(ДанныеФормы); 



Док = ДанныеФормыВЗначение(ДанныеФормы, Тип("ДокументОбъект.ВозвратТоваровОтКлиента")); 



Для К = 1 По Док.Товары.Количество() = 0 Цикл 

СтрДок = Док.Товары.Добавить(); 

КонецЦикла; 



ЗначениеВДанныеФормы(Док,ДанныеФормы); 



КонецФункции