Из документа посредством обработки модально открывается форма, как из нее обратно в документ получить параметры?
Из документа посредством обработки модально открывается форма, как из нее обратно в документ получить параметры?
Опять же: ТЕЛЕПАТОВ НА ФОРУМЕ НЕТ!!!<br>Вы что, НЕ можете сообщить платформу, конфигурацию, номер релизов!<br>В "семерке" , например:<br>СохранитьЗначение()<br>ВосстановитьЗначение()
"Что подразумевается под словом "форма" в вопросе?<br><br>Ответ наугад: если про 7.7, то так<br><br>В документе:<br>СписокПараметров=СоздатьОбъект("СписокЗначений");<br>СписокПараметров.Установить("Контекст",Контекст);<br>СписокПараметров.Установить("Параметр1",ЧтоНибудь);<br>ОткрытьФормуМодально("Обработка.КакаяТоОбработка",СписокПараметров);<br>Если СписокПараметров.Получить("СтатусВозврата")=1 Тогда<br>РезультатИзОбработки=СписокПараметров.Получить("КакойТоРезультат");<br>...<br>КонецЕсли;<br><br><br>В открывающейся обработке Обработка.КакаяТоОбработка:<br>Перем Парам;<br>Процедура ПриОткрытии()<br>Парам=Форма.Параметр;<br>Если ПустоеЗначение(Парам)=1 Тогда<br>СтатусВозврата(0);<br>Возврат;<br>КонецЕсли;<br>КонецПроцедуры<br><br>Процедура ПриВыполнить()<br>Парам.Установить("КакойТоРезультат",ТаблицаДанных);<br>Парам.Установить("СтатусВозврата",1);<br>Форма.Закрыть();<br>КонецПроцедуры"
"Спасибо за ответ!<br><br>А вы говорите нет ТЕЛЕПАТОВ)))<br>Да 7.7. ПУБ 306.<br>Форма - это диалог в обработке.<br>На самом деле дурацкий вопрос, видно к трем ночи мозг уже спал. Утром сделал все сам:<br>(кстати, забыл сказать, что из документа в обработку тоже передается параметр)<br><br>В документе:<br> Конт = ЧётоТам;<br> ОткрытьФормуМодально("Обработка.ВыборДоговора", Конт);<br> Если ТипЗначенияСтр(Конт) = "СписокЗначений" Тогда<br> Параметр1= Конт.Получить("Параметр1");<br> Параметр2=Конт.Получить("Параметр2");<br> КонецЕсли;<br><br>В обработке:<br>Процедура ПриОткрытии(Передача)<br> Здесь не важно, что происходит.<br>КонецПроцедуры<br><br>Процедура Выполнить()<br> Передача = СоздатьОбъект("СписокЗначений");<br> Передача.ДобавитьЗначение(Чё-тоТам1, "Парам1");<br> Передача.ДобавитьЗначение(Чё-тоТам2, "Парам2");<br> Форма.Параметр = Передача;<br> Форма.Закрыть(0);<br>КонецПроцедуры<br><br>Все работает, правда может выглядит не так красиво, как со СтатусамиВозрата."
<br>> А вы говорите нет ТЕЛЕПАТОВ)))<br><br>Повезло!<br><br>Похоже, один "екстрасенс" затесался! Исполать ему!!!