УТ 10.3 Печать в доках идет через общую форму ФормаВыбораПечатныхФорм. Как из нее вытащить реквизит НаПринтер во внешнюю печатную форму?

Печать идет через процедуры в модуле объекта документа

Ну да, я понимаю. Может неудачно объяснила... У меня в модуле объекта во внешней обработке:

      СчетФактура = УчетНДС.НайтиПодчиненныйДокумент(СсылкаНаОбъект, "СчетФактураВыданный");
        Реализация=СсылкаНаОбъект.ПолучитьОбъект();
        Реализация.Печать("ТОРГ12", 1, Ложь);
        ОбъектСФ=СчетФактура.ПолучитьОбъект();
        ОбъектСФ.Печать("СчетФактура1137", 1, Ложь);

Вместо Ложь хочу значение реквизита НаПринтер. Как?

(2) ОбъектСФ.Печать("СчетФактура1137", 1, НаПринтер), не?

(3) Шутка? Я так тоже умею.

(4) Какие уж тут шутки.

(5) Мне тоже в общем-то невесело. Моя внешняя обработка формирует комплект документов, часть из других внешних обработок через Табличный документ (с ними все ок), часть стандартных из УТ. Вот с ними проблема. Реквизит НаПечать - НЕ МОЙ, его значение мне надо получить.

(6) блин, НаПринтер.

(7) НаПринтер - переменная, отвечающая за то, будет ли выведена печ. форма на экран или сразу на принтер. Его не надо получать, его надо устанавливать

ОбъектСФ.Печать("СчетФактура1137", 1, Ложь);
Вот это должно оправить сразу на печать, если есть принтер по умолчанию

+(9) Тьфу, то есть на экран

(8) Да, да, в этом и проблема. В документе пользователь выставляет или не выставляет флаг На принтер. Необходима реакция на его действия.

(11) Ты перехватываешь события ФормаВыбораПечатныхФорм?

(11) а так ОбъектСФ.Печать("СчетФактура1137", 1, Ложь); я сделала просто для отладки.

(12) Не знаю как ((

Короче, в своей обработке заводищь галку "НаПринтер" и подсовываешь ее в процедуру "Печать" модуля объекта

(15) в своей не хочется, есть же в ФормеВыбораПечатныхФорм. Как событие перехватить?

(16) "Достижения (опыт):    Умею прикидываться глупой блондинкой."

Ты сейчас прикидываешься?

Ты документы распечатать хочешь из обработки?

(17) Я сейчас серьезна как никогда. Вероятно, просто туплю.

(19) Ответь на (18)

(18) Попытаюсь еще раз. Я подсоединяю свою внешнюю печатную форму. При нажатии на кнопку Печать в документе она появляется в списке вместе со стандартными, там же есть флаг На печать. Вот он мне и нужен

(21) Откройте УТ, посмотрите.

(21) Один воппрос: Нахера? Что ты с этим флагом потом делать будешь?

(22) Я знаю как устроена печать документов в УТ

(21) "Моя внешняя обработка формирует комплект документов, часть из других внешних обработок через Табличный документ (с ними все ок), часть стандартных из УТ. Вот с ними проблема."

Твом слова?

(23)(25)В моей внешней печатной форме 6 доков - 4 относятся к другим моим внешним печатным формам и по ним идет реакция на флаг На принтер без моего участия, а по коду которой я привела, естественно, нет. Вот сюда мне нужно это нахера...

(25) (26) "Начальник! Скажи в чем моя вина" (С) "Иван Васильевич меняет профессию"

PS Почитала ваши посты :)))))

Выкладывай свою печ. форму на 6 доков, что - то ты ерунду какую-то пишешь. Не пойму тебя.

НаПринтер = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(ПараметрыСеанса.ТекущийПользователь, "ПечатьДокументовБезПредварительногоПросмотра") = Истина;

Это из процедуры ПриОткрытии() ФормаВыбораПечатныхФорм

Кусок по остальным внешним выкинула, чтобы не загромождать

Функция Печать() Экспорт        

        СчетФактура = УчетНДС.НайтиПодчиненныйДокумент(СсылкаНаОбъект, "СчетФактураВыданный");
        Реализация=СсылкаНаОбъект.ПолучитьОбъект();
        Реализация.Печать("ТОРГ12", 1, Ложь);
        ОбъектСФ=СчетФактура.ПолучитьОбъект();
        ОбъектСФ.Печать("СчетФактура1137", 1, НаПринтер);
        
        ИмяМакета=Справочники.ВнешниеОбработки.НайтиПоНаименованию("Счет АТС подпись из заказа");
        Заказ=СсылкаНаОбъект.Сделка;
        ДвоичныеДанные = ИмяМакета.ХранилищеВнешнейОбработки.Получить();
        ТабДокумент = Неопределено;
        ИмяФайла = ПолучитьИмяВременногоФайла("epf");
                    
        Попытка
            ДвоичныеДанные.Записать(ИмяФайла);
            Обработка = ВнешниеОбработки.Создать(ИмяФайла);
            Обработка.СсылкаНаОбъект = Заказ;
            ТабДокумент = Обработка.Печать();
            
            УдалитьФайлы(ИмяФайла);
            Если ТипЗнч(ТабДокумент) = Тип("ТабличныйДокумент") И (ПустаяСтрока(ТабДокумент.ИмяПараметровПечати)) Тогда

                Попытка
                    ИдентификаторОбработки = Строка(ИмяМакета.УникальныйИдентификатор());
                    ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_" + СтрЗаменить(ИдентификаторОбработки, "-", "_");
                    ТабДокумент.ИмяПараметровПечати = ТабДокумент.ИмяПараметровПечати + "_" + Заказ.Метаданные().Имя;
                Исключение
                    
                КонецПопытки;
            КонецЕсли;
        Исключение
            ОбщегоНазначения.СообщитьОбОшибке(ОписаниеОшибки(),, "Не удалось сформировать внешнюю печатную форму!");
        КонецПопытки;
        Возврат ТабДокумент;        
КонецФункции;

(30) это я в курсе, при открытии флаг На принтер становится как в настройках пользователя Печать без предварительного просмотра. НО пользователь может поменять его значение уже в форме.

(31) в коде НаПринтер естественно не работает

(32) "НО пользователь может поменять его значение уже в форме"
Ну и? Пользователь меняет флаг интерактивно, на 1 раз, установленное значение НИГДЕ не сохраняется. В приведенном тобой коде ты нигде не вызываешь общую форму выбора печатной формы.
Внимание, вопрос: Откуда тогда ты хочешь вытащить переменную "НаПринтер"?

(34) Именно это я и хочу. Как мне ее вызвать с текущим значением?

Вообщем, задача твоя неясна. Если ты делаешь обработку для печати пачек документов, то тут одназначно (15). Если ты вдруг хочешь из своей обработки для каждой ПФ вызывать общую форму выбора, то это бред.

(35) Мля, да нету у нее текущего значения!!! Значение устанавливается при открытии из настроек пользователя. Все.

Ладно, сдаюсь. Спасибо за попытки помочь...

Мля, может это я тупой, но я так и не понял на кой хер тебе сдалась эта общая форма и ее реквизит

(38) Сдаваться не по-русски =)

(38) Ты опиши словами, чего хочешь-то? Типа, запустил обработку, нажал кнопку "Печать" и ....

(41) Попытаюсь в последний раз.....
Моя внешняя печатная форма формирует комплект документов.
Через сервис - Внешние печатные формы я ее подсоединяю к документу Реализация товаров услуг.
В документе по кнопке печать вываливается список стандартных доков на печать + мой комплект. Там же есть флаг На Печать (не мой!). Пользователь иногда хочет сразу весь комплект на принтер, иногда перед печатью посмотреть. Ну, нравится ему это флаг. Нужна реакция. Вот.

(42) То есть, речь идет о стандартной кнопке "Печать" на панели меню?

(43) ДА!!!

(44) Ну, слава Богу!
Как вариант - сделай две кнопки: "Печать" (сразу печать без просмотра) и "Печать с просмотром" (выводить на просмотр).

(45) как вариант - принимаю. Спасибо.

(45) семерочник до мозга костей

(47) Предложи 8-чный вариант.

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

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

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

В твоей "обработке":

Функция Печать(НаПринтер = Ложь);

Получишь значение переменной в свою обработку

+(49) Не проверял, на вскидку.

(48) есть парметры печати,  есть передача значений параметров в универсальные процедуры. тс вообще в какой-то истерике,  путается в показаниях

(51) Тс в (42) описал задачу - 8-чный вариант?

(52) да

(49) проверила. не работает

(54) что проверила? так?
СчетФактура = УчетНДС.НайтиПодчиненныйДокумент(СсылкаНаОбъект, "СчетФактураВыданный");
        Реализация=СсылкаНаОбъект.ПолучитьОбъект();
        Реализация.Печать("ТОРГ12", 1, Реализация.НаПринтер);
        ОбъектСФ=СчетФактура.ПолучитьОбъект();
        ОбъектСФ.Печать("СчетФактура1137", 1, СчетФактура.НаПринтер);

(55) хотя не то. запутала совсем