|
УФ Получить список форм внешней обработки |
☑ |
0
G751
22.02.23
✎
18:31
|
Всем привет
ПолныйПутьКОбработке = СокрЛП(АдресВнешнегоОтчетаОбработки);
Адрес = ПоместитьВоВременноеХранилище(Новый ДвоичныеДанные(ПолныйПутьКОбработке));
ИмяСКоторымПодключенаОбработка = ПодключитьПолучитьИмяВнешнейОбработки(Адрес);
ФормаВнешнейОбработки = ПолучитьФорму("ВнешняяОбработка." + ИмяСКоторымПодключенаОбработка + ".Форма."+СокрЛП(ФормаОтчетаОбработки));
Ну и открыть форму. Это получение конкретной формы. Все ОК.
Как получить список ВСЕХ форм внешней обработки?
Если кто в курсе вопроса, небольшой пример, плиз
Всем спасибо
|
|
1
Fedor-1971
23.02.23
✎
12:23
|
(0) попробуй так:
Для каждого текФорма из ИмяСКоторымПодключенаОбработка.Метаданные().Формы цикл
КонецЦикла;
|
|
2
eddy_n
23.02.23
✎
22:56
|
(1) Не прокатит: ИмяСКоторымПодключенаОбработка - просто текст, не ОбработкаОбъект.
|
|
3
eddy_n
23.02.23
✎
23:55
|
&НаКлиенте
Процедура Команда1(Команда)
Оповещение = Новый ОписаниеОповещения("ПослеВыбораФайлов", ЭтаФорма);
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.ПроверятьСуществованиеФайла = Истина;
Диалог.Фильтр = НСтр("ru='Внешние обработки, отчёты (*.epf; *.ert)|*.epf; *.ert");
Диалог.Показать(Оповещение);
КонецПроцедуры
&НаКлиенте
Процедура ПослеВыбораФайлов(ВыбранныеФайлы, Знач ДопПар) Экспорт
Если ВыбранныеФайлы = Неопределено Тогда Возврат КонецЕсли;
ВыпНаСерв(ВыбранныеФайлы);
КонецПроцедуры
Процедура ВыпНаСерв(ВыбранныеФайлы)
Для Каждого ЭлМассива ИЗ ВыбранныеФайлы Цикл
ОбработкаОбъект = ВнешниеОбработки.Создать(ЭлМассива);
Для Каждого ТекФорма из ОбработкаОбъект.Метаданные().Формы цикл
КонецЦикла;
КонецЦикла;
КонецПроцедуры
|
|
4
mistеr
24.02.23
✎
13:13
|
(0) Вроде нет такого
|
|
5
G751
24.02.23
✎
15:17
|
(3) Спасибо, все работает. Классно! Еще раз, большое спасибо и всего наилучшего. Выручил.
Тема закрыта.
|
|