Всем привет! Конфа "УПП" на 8.1 Есть документ с след.таб.частью: Наряд,Подразделение-заказчик и т.д.Нужно,чтобы перед распечаткой печ.формы этого дока пользователь мог выбрать какое-то одно или несколько "различных" подразделений и вывести на печать...Как лучше это реализовать,перед распечаткой выводить какую-ниюудь доп.форму с выгруженной ТЗ и там уже отметками выбирать или...Вообщем,что посоветуете?

список с пометками выдавай, и доп форма не нужна

Создай список значений подразделений с ТЧ, перед печатью  организуй выбор с пометками, по отмеченным печатай.

(2) а данные все-таки в доп.форму выгружать,да?

можно какой-нибудь пример

ТвойСписок.ОтметитьЭлементы()

(5) спасибо,данные в список значений выгрузил,а дальше как...я до этого циклом перебирал ТЧ и получал соответствующие реквизиты ТЧ и выводил их на печать,а теперь как быть.Т.е. я имею ввиду кроме "заказчика" есть еще несколько реквизитов которые должны быть в печатной форме.
   спДанныеОтбора=Новый СписокЗначений;
   
   Запрос=Новый Запрос;
   Запрос.УстановитьПараметр("ЭтотДок", ЭтотОбъект.Ссылка);
   Запрос.Текст="ВЫБРАТЬ РАЗЛИЧНЫЕ
                |    ЖурналУчетаНарядов.Заказчик
                |ИЗ
                |    Документ.ЖурналУчетаНарядов.Наряды КАК ЖурналУчетаНарядовНаряды
                |ГДЕ
                |    ЖурналУчетаНарядовНаряды.Ссылка.Ссылка = &ЭтотДок";
   Выборка=Запрос.Выполнить().Выбрать();
   Пока Выборка.Следующий() Цикл
       спДанныеОтбора.Добавить(Выборка.Заказчик);    
   КонецЦикла;    
       
   спДанныеОтбора.ЗагрузитьЗначения(Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Заказчик"));
   спДанныеОтбора.ОтметитьЭлементы();

прошу сильно не пинать,я впервые сталкиваюсь с СпискомЗначений

(6) ну и теперь то-же самое, только фильтр поставь на отмеченные в твоем списке подразделения

(8) спасибо

Я видимо Алень,подскажите где ошибка,в макет вываливается без фильтра по галочкам.После запроса в (6) пишу это

   Запрос=Новый Запрос;
   Запрос.Текст="ВЫБРАТЬ РАЗЛИЧНЫЕ
                |    ЖурналУчетаНарядовНаряды.Заказчик,
                |    ЖурналУчетаНарядовНаряды.Наряд,
                |    ЖурналУчетаНарядовНаряды.Работник
                |ИЗ
                |    Документ.ЖурналУчетаНарядов.Наряды КАК ЖурналУчетаНарядовНаряды
                |ГДЕ
                |    ЖурналУчетаНарядовНаряды.Ссылка.Ссылка = &ЭтотДок"
                |    И ЖурналУчетаНарядовНаряды.Заказчик В(&Список)";

   Выборка=Запрос.Выполнить().Выбрать();
   Запрос.УстановитьПараметр("ЭтотДок", ЭтотОбъект.Ссылка);
   Запрос.УстановитьПараметр("Список", спДанныеОтбора);
   
  Пока Выборка.Следующий() Цикл
   Для каждого Элемент из спДанныеОтбора Цикл
    Если Элемент.Пометка тогда

ОбластьНаряды = Макет.ПолучитьОбласть("Документы");    
ОбластьНаряды.Параметры.Заполнить(Выборка);

ТабДок.Вывести(ОбластьНаряды);
       
КонецЕсли;                                
КонецЦикла;    
КонецЦикла;

Область = Макет.ПолучитьОбласть("Визы");
           
Область.Параметры.Ответственный=
ПараметрыСеанса.ТекущийПользователь.Наименование;
           
ТабДок.Вывести(Область);            
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Истина;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;
ТабДок.Показать();

Я видимо Алень,подскажите где ошибка,в макет вываливается без фильтра по галочкам.После запроса в (6) пишу это

   ТабДок = Новый ТабличныйДокумент;
   ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
   Макет = Документы.ЖурналУчетаНарядов.ПолучитьМакет("Печать");
   Шапка = Макет.ПолучитьОбласть("Шапка");    
   ТабДок.Вывести(Шапка);    

   Запрос=Новый Запрос;
   Запрос.Текст="ВЫБРАТЬ РАЗЛИЧНЫЕ
                |    ЖурналУчетаНарядовНаряды.Заказчик,
                |    ЖурналУчетаНарядовНаряды.Наряд,
                |    ЖурналУчетаНарядовНаряды.Работник
                |ИЗ
                |    Документ.ЖурналУчетаНарядов.Наряды КАК ЖурналУчетаНарядовНаряды
                |ГДЕ
                |    ЖурналУчетаНарядовНаряды.Ссылка.Ссылка = &ЭтотДок"
                |    И ЖурналУчетаНарядовНаряды.Заказчик В(&Список)";

   Выборка=Запрос.Выполнить().Выбрать();
   Запрос.УстановитьПараметр("ЭтотДок", ЭтотОбъект.Ссылка);
   Запрос.УстановитьПараметр("Список", спДанныеОтбора);
   
  Пока Выборка.Следующий() Цикл
   Для каждого Элемент из спДанныеОтбора Цикл
    Если Элемент.Пометка тогда

ОбластьНаряды = Макет.ПолучитьОбласть("Документы");    
ОбластьНаряды.Параметры.Заполнить(Выборка);

ТабДок.Вывести(ОбластьНаряды);
       
КонецЕсли;                                
КонецЦикла;    
КонецЦикла;

Область = Макет.ПолучитьОбласть("Визы");
           
Область.Параметры.Ответственный=
ПараметрыСеанса.ТекущийПользователь.Наименование;
           
ТабДок.Вывести(Область);            
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Истина;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;
ТабДок.Показать();

(11) Ну видимо Список должен содержать только элементы с пометками (без пометок не должно быть).

список должен содержать только отмеченные позиции

^

какие будут варианты,господа!

^^

Выборка=Запрос.Выполнить().Выбрать();
Запрос.УстановитьПараметр("ЭтотДок", ЭтотОбъект.Ссылка);
Запрос.УстановитьПараметр("Список", спДанныеОтбора);

(17) ?

Странный участок. Параметры после выполнения запроса устанавливаются

(19) после перестановки параметров над текстом запроса ничего не изменилось

(20) попробуй закомментировать установку параметров

(21) ничего не изменилось

Цикл второй у тебя классный) У тебя строки не замноживаются?:)

Тебе в запрос надо передать список только то, что пометили галочками, а второй цикл вообще убрать надо

(23) действительно задваиваются....(24) а что именно убрать,че-то я не врубился

(22) поэтому и вываливается все без отбора. Перепиши свой код внимательно заново.

после ТвойСписок.ОтметитьЭлементы() добавь
ы = 0;
Пока ы < ТвойСписок.Количество() цикл
    Если не ТвойСписок[ы].пометка тогда
         ТвойСписок.Удалить(ы);
    Иначе
         ы = ы + 1;
    КонецЕсли;
КонецЦикла;

всем спасибо,всё получилось