$ 0 0 Код 1C v 8.2 УП&НаКлиенте Процедура Команда1(Команда) Форма = ПолучитьФорму("Документ.ЗаявкаПокупателя.ФормаОбъекта");ДанныеФормы = Форма.Объект; ЗаполнитьДокументНаСервере(ДанныеФормы); КопироватьДанныеФормы(ДанныеФормы, Форма.Объект); Форма.Открыть(); КонецПроцедуры &НаСервере Функция ЗаполнитьДокументНаСервере(ДанныеФормы); Док = ДанныеФормыВЗначение(ДанныеФормы, Тип("ДокументОбъект.ЗаявкаПокупателя"));// Заполняем реквизиты какие нужно // Док.Реквизит = " тру ля ля";// ......ЗначениеВДанныеФормы(Док,ДанныеФормы); КонецФункции