Имя: Пароль:
1C
1С v8
Подскажите как в БСп вывести печатные формы для разных типов документов
0 RomaH
 
naïve
20.11.12
09:31
в одну форму?
журнал документов или ссылки на докмуенты в ТЧ другого документа

как напечатать эти разные типы документов в одну форму печати?
1 mikecool
 
20.11.12
09:32
выбирать по очереди, печататть, вернутые таб доки выводить в один или по отдельности
2 vmv
 
20.11.12
09:34
я бы простенький отчет в таком случае сделал с результурующим табдоком, к нему команды бы прикрутил и использовал их где угодно господам хорошим
3 RomaH
 
naïve
20.11.12
09:36
(1) вот не врубаюсь как их выводить по отдельности на закладках формы "ПечатьДокументов"
4 mikecool
 
20.11.12
09:40
ТабДок = Новый ТабличныйДокумент;
Для Каждого Строка Из ТЧ Цикл
 ТабДок.Вывести(Строка.СсылкаНаДокумент.Напечатать());
Конеццикла

типа так
5 RomaH
 
naïve
20.11.12
09:41
я смотрю в сторону типовых механизмов

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

но че-то не выходит
6 RomaH
 
naïve
20.11.12
09:48
КоллекцияПечатныхФорм.Очистить();
это нужно оказалось