Групповая печать документов Бюджет 631 релиз
|
Tron
10.04.2009 - 08:36
|
Имеется задача - необходимо иметь возможность распечатать все документы (заявки на кассовый расход) за один день определенным количеством копий. Сломал моск решая эту задачу - помогите кому сколько не жалко))) Имея вот такую обработку Процедура Выполнить() Док=СоздатьОбъект("Документ.ЗаявкаНаКассовыйРасход"); Док.ВыбратьДокументы(ВыбНачПериода, ВыбКонПериода); НачатьТранзакцию(); Пока Док.ПолучитьДокумент()=1 Цикл Если Док.ПометкаУдаления()=0 Тогда КонецЕсли; КонецЦикла; ЗафиксироватьТранзакцию(); КонецПроцедуры Необходимо сразу распечатать без предпросмотра 2 экземпляра. Хотябы в каком направлении ковырять подскажите)) (простой способ с передиранием модуля и печатной формы как было с платежными поручениями в случае с заявкой не осилил( с подсчетом страниц запутался:) |