&НаКлиенте Процедура ТранспортнаяНакладная(Команда) Форма = ПолучитьФорму("Документ.ТранспортнаНакладна.Форма.ФормаДокумента"); ДанныеФормы = Форма.Объект; ТранспортнаяНакладнаяСервер(ДанныеФормы); КопироватьДанныеФормы(ДанныеФормы, Форма.Объект); Форма.Открыть(); КонецПроцедуры &НаСервере Процедура ТранспортнаяНакладнаяСервер(ДанныеФормы) текДок = Элементы.Список.ТекущаяСтрока.Ссылка; Док = ДанныеФормыВЗначение(ДанныеФормы, Тип("ДокументОбъект.ТранспортнаНакладна")); Док.Заполнить(текДок); ЗначениеВДанныеФормы(Док, ДанныеФормы); КонецПроцедуры
Комментариев нет:
Отправить комментарий