Имя: Пароль:
1C
 
УФ. Открыть форму документа, после заполнения типовым методом
0 1CIlya
 
01.10.18
19:05
Здравствуйте, друзья!

Не могу взять в толк как открыть УФ. Заполняю в обработке программно на сервере документ ВедомостьНаВыплатуЗарплатыВБанк.


Процедура ВыполнитьКоманду(ИдентификаторКоманды, ОбъектыНазначенияМассив) Экспорт
    
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ ...";        
    
    Для Каждого ОбъектНазначения Из ОбъектыНазначенияМассив Цикл        
        Запрос.УстановитьПараметр("Ссылка", ОбъектНазначения.Ссылка);
        ОбъектНазначения.ЗаполнитьПоТаблицеЗарплат(Запрос.Выполнить().Выгрузить());        
    КонецЦикла;
    
КонецПроцедуры    

Все заполняется хорошо. Теперь нужно показать результат заполнения пользователю, и если его все устроит, он заполненный документ сохранит. Код модуля формы обработки такой:


&НаСервере
Процедура ЗаполнитьНаСервере(ДанныеФормы)
    
    ОбъектыНазначенияМассив = Новый Массив;
    ОбъектыНазначенияМассив.Добавить(Объект.Ссылка.ПолучитьОбъект());
    
    ОбработкаОбъект = РеквизитФормыВЗначение("Объект");
    ОбработкаОбъект.ВыполнитьКоманду("НТХ_ЗаполнитьВедомостьВБанк", ОбъектыНазначенияМассив);
    
    Для Каждого ОбъектНазначения Из ОбъектыНазначенияМассив Цикл
        Результат = КопироватьДанныеФормы(ОбъектНазначения, ДанныеФормы); //здесь выскакивает ошибка
    КонецЦикла;
    
КонецПроцедуры

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


Как передать форме данные из объектов, находящихся на сервере?
1 breezee
 
01.10.18
19:44
ДанныеФормыВЗначние() вроде
Основная теорема систематики: Новые системы плодят новые проблемы.