Имя: Пароль:
1C
1С v8
КД отбор по организации
0 Aleksei_Pro
 
10.08.12
11:21
Написал правила, написал обработку куда правила запихнул, создал реквизит "Организация", в обработке по кнопке нажатию написал:
   // Установка параметров выгрузки
   
   мУниверсальнаяВыгрузкаДанных.ИмяФайлаОбмена = ФайлВыгрузки;
       
   мУниверсальнаяВыгрузкаДанных.ПостроительОтчета = Построитель;
   мУниверсальнаяВыгрузкаДанных.ДатаНачала     = ДатаНач;
   мУниверсальнаяВыгрузкаДанных.ДатаОкончания  = ?(НЕ ЗначениеЗаполнено(ДатаКон), ДатаКон, КонецДня(ДатаКон));
   мУниверсальнаяВыгрузкаДанных.РежимОбмена    = "Выгрузка";
   мУниверсальнаяВыгрузкаДанных.ВыводВОкноСообщенийИнформационныхСообщений = ФлагКомментироватьОбработкуОбъектов;
   
   
   мУниверсальнаяВыгрузкаДанных.Параметры.Вставить("НеЗамещатьДокументыПриЗагрузке",   НеЗамещатьДокументыПриЗагрузке);
   мУниверсальнаяВыгрузкаДанных.Параметры.Вставить("НеЗамещатьСправочникиПриЗагрузке", НеЗамещатьСправочникиПриЗагрузке);
   мУниверсальнаяВыгрузкаДанных.Параметры.Вставить("Организация",                      Организация);
   
   Организации = Новый ТаблицаЗначений();
   Организации.Колонки.Добавить("Организация");
   Стр = Организации.Добавить();
   Стр.Организация = Организация;    

   УзелДляОбмена = Новый Структура();
   УзелДляОбмена.Вставить("Организации", Организации);
   мУниверсальнаяВыгрузкаДанных.Параметры.Вставить("УзелДляОбмена", УзелДляОбмена);
   
   мУниверсальнаяВыгрузкаДанных.ТаблицаПравилВыгрузки = ТаблицаПравилВыгрузки.Скопировать();
   
   мУниверсальнаяВыгрузкаДанных.ВыполнитьВыгрузку();


В правилах перед выгрузкой данных написал:

УзелДляОбмена = Параметры.УзелДляОбмена;
Параметры.Вставить("ИспользоватьФильтрПоОрганизациям",?(УзелДляОбмена.Организации.Количество()>0,Истина,Ложь));
Если Параметры.ИспользоватьФильтрПоОрганизациям Тогда
   Параметры.Вставить("МассивОрганизаций",УзелДляОбмена.Организации.ВыгрузитьКолонку("Организация"));
КонецЕсли;

Перед конвертацией объекта написал:
Выполнить(Алгоритмы.ВозможностьВыгрузкиОбъектаПоФильтрам);

Параметр "Организация" создал, алгоритм взял типовой из выгрузки УТ-БП20
1 Aleksei_Pro
 
10.08.12
11:21
(0) почему отбор не работает?
2 Aleksei_Pro
 
10.08.12
11:49
что никто правила не писал?
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс