Имя: Пароль:
1C
1С v8
Прямая печать форм
0 V1rus93
 
14.10.19
12:23
Подскажите как отправить форму на печать без предварительного осмотра. УНФ 1.6 редакции. Вот :

Если МассивЧековККМ.Количество() > 0 Тогда
        ПараметрыОткрытия = Новый Структура("ИмяМенеджераПечати,ИменаМакетов,ПараметрКоманды,ПараметрыПечати");
        ПараметрыОткрытия.ИмяМенеджераПечати = "Документ.ЧекККМ";
        ПараметрыОткрытия.ИменаМакетов         = "ТоварныйЧек";
        ПараметрыОткрытия.ПараметрКоманды     = МассивЧековККМ;
        ПараметрыОткрытия.ПараметрыПечати     = Неопределено;        
        ОткрытьФорму("ОбщаяФорма.ПечатьДокументов", ПараметрыОткрытия, пФорма, пФорма.КлючУникальности);
КонецЕсли;

Вот так открывается форма где есть кнопка "Печать":

Процедура Печать(Команда)
    ТабличныеДокументы = ТабличныеДокументыДляПечати();
    УправлениеПечатьюКлиент.РаспечататьТабличныеДокументы(ТабличныеДокументы, ОбъектыПечати,
    ТабличныеДокументы.Количество() > 1, ?(НастройкиПечатныхФорм.Количество() > 1, Копий, 1));
КонецПроцедуры

Как сделать печать из РМК(рабочее место кассира) сразу на печать без открытия формы ?
1 DrZombi
 
гуру
14.10.19
12:35
(0) Как-то, так... а там используя параметры печати указать, что тебе не надо смотреть :)

    МассивОбъектов = ПолучитьМассивДокументов();
    
    ПараметрыПечати = Новый Структура;
    ПараметрыПечати.Вставить("ДополнительныеПараметры",Новый Структура("ДополнитьКомплектВнешнимиПечатнымиФормами",Ложь)); //ПараметрыПечати.ДополнительныеПараметры.ДополнитьКомплектВнешнимиПечатнымиФормами
    ПараметрыПечати.Вставить("ЗаголовокФормы",ОбщегоНазначенияБПВызовСервера.СформироватьЗаголовокДокумента(Объект.Ссылка));
    
    УправлениеПечатьюКлиент.ВыполнитьКомандуПечатиНаПринтер("Документ.АктСверкиВзаиморасчетов", "АктСверки", МассивОбъектов, ПараметрыПечати);
2 V1rus93
 
14.10.19
13:21
(1) Спасибо, буду пробовать !!!