Имя: Пароль:
1C
1С v8
Помогите на УПР ФОРМ сделать заполнение ТЧ ДОК программно
0 picom
 
08.02.12
08:44
Создал документ
ТЧ надо заполнять при нажатии на волшебную кнопку.
С УПР формами только начал свою работу, простите за глупый вопрос.
..

&НаСервереБезКонтекста
Функция СписокДок(Контр)
   Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    СервисноеОбслуживание.Ссылка
       |ИЗ
       |    Документ.СервисноеОбслуживание КАК СервисноеОбслуживание
       |ГДЕ
       |    СервисноеОбслуживание.Контрагент = &Контрагент";

   Запрос.УстановитьПараметр("Контрагент", Контр);

   Результат = Запрос.Выполнить().Выгрузить();
   Возврат Результат;
КонецФункции


&НаКлиенте
Процедура ЗаполнитьТЧ(Команда) //Это и есть процедура от этой кнопки
   
   ТЗРез = СписокДок(Объект.Контрагент.Ссылка); //непонятно как передавать значения в функцию
   
   Для каждого Стр Из ТЗРез Цикл
       НовСтр = Объект.ДокументыСервиса.Добавить();
       НовСтр.ДокументыСервисаДокумент = Стр.Ссылка;
   КонецЦикла;

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