Обработка заполнения УФ

1С v8

11.08.15

✎

14:07

Заполняю справочник обработкой заполнения, все нормально заполняется, только изменения видны если закрыть и открыть форму элемента, соответственно вопрос: как обновить в текущей форме данные?
Метод Форма.Прочитать() не работает, по крайней мере у меня.

&НаКлиенте
Процедура ВыполнитьКоманду(ИдентификаторКоманды, ОбъектыНазначенияМассив) Экспорт

    Объект.СсылкаНаОбъект = ОбъектыНазначенияМассив[0];

    Ответ = Вопрос("Документ автоматически переСОХРАНИТСЯ... ", РежимДиалогаВопрос.ОКОтмена);
    Если Ответ = КодВозвратаДиалога.ОК Тогда

        ЗаполнитьОбъект();

    КонецЕсли;

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

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

&НаСервере
Функция ЗаполнитьОбъект()

    ОбъектДок = Объект.СсылкаНаОбъект.ПолучитьОбъект();
    ОбъектДок.Адресат = Справочники.Пользователи.НайтиПоНаименованию("ИвановИванИванович");
    ОбъектДок.Подразделение = Справочники.СтруктураПредприятия.НайтиПоКоду("00-000018");
    ОбъектДок.Записать();

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

1 Timon1405

11.08.15

✎

14:13

(0) RTFM http://its.1c.ru/db/metod8dev#content:4148:hdoc:_top

2 Fedor-1971

11.08.15

✎

14:13

(0) Заполняй форму, а не объект документа.
По сути ты пытаешься сохранить данные в объект (вместо заполнения формы), а потом через геморой вчитываешь на форму.

3 alexei366

11.08.15

✎

14:16

(0) Так я чуток не понимаю как у тя устроино.
То есть есть обработка некая на ней кнопка? или как?

4 capllary_
surgut

11.08.15

✎

14:35

(3) Внешняя обработка заполнения.

5 capllary_
surgut

11.08.15

✎

14:44

(1) Спасибо, но там только есть информация как при открытии формы заполнять её, у меня же вопрос стоит в заполнении уже открытой формы.

6 capllary_
surgut

11.08.15

✎

15:01

Все, победил)

&НаКлиенте
Процедура ВыполнитьКоманду(ИдентификаторКоманды, ОбъектыНазначенияМассив) Экспорт

    Объект.СсылкаНаОбъект = ОбъектыНазначенияМассив[0];
    ЗаполнитьОбъект();
    Ответ = Вопрос("Документ автоматически переСОХРАНИТСЯ... ", РежимДиалогаВопрос.ОКОтмена);
    Если Ответ = КодВозвратаДиалога.ОК Тогда

        Окна = ПолучитьОкна();
        Для Каждого Окно Из Окна Цикл
            Если Найти(Окно.Заголовок, Объект.СсылкаНаОбъект) Тогда
                ОбъектФормы = Окно.ПолучитьСодержимое();
                ОбъектФормы.Прочитать();
            КонецЕсли;
        КонецЦикла;


    КонецЕсли;


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