Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
16 апр 2024, 15:01

Отправка на печать документа на управляемых формах.

Автор Yulenka, 10 янв 2015, 19:37

0 Пользователей и 1 гость просматривают эту тему.

Yulenka

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

Не отправляется он на печать. С помощью точек останова смотрела, выходит в процедуры печать, получает табличный документ, но на печать почему-то не идет. Помогите, пожалуйста, голову сломала... БухгалтерияПредприятия 3.0
      

дфтын

А где собственно отправка на печать?
Добавлено: 10 янв 2015, 20:35


Документы.РеализацияТоваровУслуг.Печать(
Есть она!
Ну вы дальше это, расскажите , а что дальше на экране?
Помог? Нажми - Спасибо :)
skype: Soprov1C

Yulenka

На экране я нажимаю на кнопку, при нажатии вызывается процедура, в которой и вызывается фрагмент приведенного кода, но в итоге ничего не происходит.

дфтын

Помог? Нажми - Спасибо :)
skype: Soprov1C

StepManner

сделай отправку с вопросом о выборе принтера. там доп параметр в печати табдока есть. Если напечатает, то 1с-ка выбирает принтер косячный.

Yulenka

Добавила следующие строки и заработало:
ТабДок=КоллекцияпечатныхФорм.Получить(0).ТабличныйДокумент;
ТабДок.Напечатать(РежимИспользованияДиалогаПечати.НеИспользовать);

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск