Всем предновогодний привет!
Есть внешняя печатная форма, но не могу понять, почему при сохранении печатки через ОбщиеФормы"СохранениеПечатнойФормы" не выводит "Присоединить к документу(Присоединить)", т.е. присоеденить к документу.
Через отладчик нашел причину, в коде ниже Параметры.ОбъектыПечати пустой. Как его заполнить через внешнюю печатку?
// заполнение списка форматов
Для Каждого ФорматСохранения Из УправлениеПечатью.НастройкиФорматовСохраненияТабличногоДокумента() Цикл
ВыбранныеФорматыСохранения.Добавить(Строка(ФорматСохранения.ТипФайлаТабличногоДокумента),
ФорматСохранения.Представление, Ложь, ФорматСохранения.Картинка);
КонецЦикла;
ВыбранныеФорматыСохранения[0].Пометка = Истина; // По умолчанию выбран только первый формат из списка.
// Заполнение списка выбора для присоединения файлов к объекту.
Для Каждого ОбъектПечати Из Параметры.ОбъектыПечати Цикл
Если КОбъектуМожноПрисоединятьФайлы(ОбъектПечати.Значение) Тогда
Элементы.ВыбранныйОбъект.СписокВыбора.Добавить(ОбъектПечати.Значение);
КонецЕсли;
КонецЦикла;
// Место сохранения по умолчанию.
ВариантСохранения = "СохранитьВПапку";
// настройка видимости
ЕстьВозможностьПрисоединения = Элементы.ВыбранныйОбъект.СписокВыбора.Количество() > 0;
Элементы.ВыборМестаСохраненияФайла.Видимость = Параметры.РасширениеДляРаботыСФайламиПодключено
Или ЕстьВозможностьПрисоединения;
Элементы.ВариантСохранения.Видимость = ЕстьВозможностьПрисоединения;
Если Не ЕстьВозможностьПрисоединения Тогда
Элементы.ПапкаДляСохраненияФайлов.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Верх;
КонецЕсли;
Элементы.ПапкаДляСохраненияФайлов.Видимость = Параметры.РасширениеДляРаботыСФайламиПодключено;
// Объект для присоединения по умолчанию.
Если ЕстьВозможностьПрисоединения Тогда
ВыбранныйОбъект = Элементы.ВыбранныйОбъект.СписокВыбора[0].Значение;
КонецЕсли;
Элементы.ВыбранныйОбъект.ТолькоПросмотр = Элементы.ВыбранныйОбъект.СписокВыбора.Количество() = 1;
Если ОбщегоНазначения.ЭтоМобильныйКлиент() Тогда
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
Элементы.КнопкаСохранить.Отображение = ОтображениеКнопки.Картинка;
КонецЕсли;
КонецПроцедуры
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn