Пакетная печать документов
Задачи пользователя - Пакетная печать
Бесплатные
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Узнавайте о новых бесплатных решениях в нашей телеграм-группе Инфостарт БЕСПЛАТНО
Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Позволяет производить печать документов пакетно, то есть формы документов печатаются по очереди в одном окне за определенный период, ну критерии, в принципе, можно уже установить самому, главное сама мысля.
Кроме того, что используешь обработку, нужно :
1)В глобальном модуле создать глобальную переменную глТаб;
2)В процедуре документа ПриОткрытии() нужно прописать проверку
Если ТипЗначенияСтр(Форма.параметр) = "Строка" тогда
Если Форма.Параметр = "Печать" тогда
инд = 0;
Печать(Инд);
СтатусВозврата(0);
Возврат;
КонецЕсли;
КонецЕсли;
3)В процедуре Печать(Инд)
Если (Инд = 0) и (Форма.Параметр <> "Печать") тогда
Таб = СоздатьОбъект("Таблица");
ИначеЕсли (Инд=0) и (Форма.Параметр = "Печать") тогда
Таб = глТаб;
КонецЕсли;
а ниже, где идет вывод на печать, прописать:
Если (Инд = 0) и (Форма.Параметр <> "Печать") тогда
Таб = Показать();
ИначеЕсли (Инд=0) и (Форма.Параметр = "Печать") тогда
Таб.ПараметрыСтраницы(1,,,10,10,,,,,1,,);
Таб.НоваяСтраница();
КонецЕсли;
Ну и, в принципе, усе... зацените
Вступайте в нашу телеграмм-группу Инфостарт