Имя: Пароль:
1C
1С v8
Запрос со списком значений
,
0 abbas
 
05.12.12
11:36
Код вот такой
1 Wobland
 
05.12.12
11:37
класс!
2 DYS2012
 
05.12.12
11:37
И СчетУчетаБУ В ИЕРАРХИИ (&СчетУчетаБУ)
3 DYS2012
 
05.12.12
11:37
СписокСчетовОС = Новый СписокЗначений;
   Для Каждого Счет Из СписокСчетов.СписокСчетов Цикл
       СписокСчетовОС.Добавить(Счет.Счет.Ссылка);    
   КонецЦикла;
4 Stim
 
05.12.12
11:37
да
5 Нуф-Нуф
 
05.12.12
11:37
кто все эти люди?
6 DYS2012
 
05.12.12
11:37
Запрос.УстановитьПараметр("СчетУчетаБУ", СписокСчетовОС);
7 Classic
 
05.12.12
11:38
Это явно какой-то квест. Нам будут по строчке в 10 минут выдавать
8 Wobland
 
05.12.12
11:38
(0) в пятой строке ошибка
9 DYS2012
 
05.12.12
11:39
Если счетов много то увы ничего не выходит, а если один то все работает, меняли И СчетУчетаБУ В ИЕРАРХИИ (&СчетУчетаБУ) на И СчетУчетаБУ В (&СчетУчетаБУ), тоже без изменений, подскажите плс............
10 Wobland
 
05.12.12
11:39
(9) кто такой abbas?
11 Нуф-Нуф
 
05.12.12
11:40
(10) его альтерэго
12 Нуф-Нуф
 
05.12.12
11:40
хз че значит, но слово прикольное
13 Wobland
 
05.12.12
11:40
и чего подсказать? всё работает верно
14 Wobland
 
05.12.12
11:40
(12) другое я
15 Stim
 
05.12.12
11:41
решение:  

ActiveCell  = Excel.ActiveCell.SpecialCells(xlLastCell);
   RowCount     = ActiveCell.Row;
   ColumnCount = ActiveCell.Column;
   
   НомерСтроки  = 3;
   НомерКолонки = 1;
   
   ДеревоЗагрузки.Строки.Очистить();
   СтруктураРодителей.Очистить();
   СтруктураРодителей.Вставить("Уровень_0", ДеревоЗагрузки);
   
   Для Row = НомерСтроки По RowCount Цикл
       
       Уровень = ExcelЛист.Rows(Row).OutlineLevel;
       
       ТекущаяСтрока = СтруктураРодителей["Уровень_"+(Уровень-1)].Строки.Добавить();
       
       ТекущийНомерКолонки = 1;        
       Для каждого КолонкаТаблицы Из ДеревоЗагрузки.Колонки Цикл
           
           ТекущаяСтрока[КолонкаТаблицы.Имя] = ExcelЛист.Cells(Row, ТекущийНомерКолонки).Value;
           ТекущийНомерКолонки = ТекущийНомерКолонки + 1;
           
       КонецЦикла;
       
       // заполним структуру родителей

       СтруктураРодителей.Вставить("Уровень_"+Уровень, ТекущаяСтрока);
       
   КонецЦикла;
16 Wobland
 
05.12.12
11:42
(15) болеешь?
17 Stim
 
05.12.12
11:42
(16) за спартак. ачо?
18 DYS2012
 
05.12.12
11:43
Так вот именно не работает ничего, если выбираю один счет(1), то все работает, если десяток счетов(10),в состав которого входит счет(1), ничего не выводит
19 Нуф-Нуф
 
05.12.12
11:43
Голуби летят над нашей зоной...
Голубям нигде преграды нет...
20 Stim
 
05.12.12
11:44
у меня в глазах двоится, или автор с шизофренией
21 Wobland
 
05.12.12
11:45
(20) либо кто-то срочно начал писать в чужой ветке, либо одно из двух
22 kiabs
 
05.12.12
11:47
Автор, напиши свой вопрос/задание/проблему в ОДНОМ сообщении!!!
23 kiabs
 
05.12.12
11:49
Я тут по телепатировал. В отчете условие стоит неверное, нужно вот так => Таблица.Счет В (&СчетУчетаБУ)
24 Wobland
 
05.12.12
11:50
(23) он на это уже жаловался в(9)
25 kiabs
 
05.12.12
11:51
(24) Тогда сдаюсь.
26 hhhh
 
05.12.12
11:52
(18) а что такое Счет.Счет.Ссылка ?? Или действительно в глазах двоится?
27 kiabs
 
05.12.12
11:54
(26) Кстати да, у меня тоже в галазх двоится.
28 DYS2012
 
05.12.12
11:56
(26) Есть справочник такой как Список счетов,
В этом спр. есть Таб.Часть где указываются счета, при выборе элемента из это справочника мы запихиваем ТЧ в список значений вот так
СписокСчетовОС = Новый СписокЗначений;
   Для Каждого Счет Из СписокСчетов.СписокСчетов Цикл
       СписокСчетовОС.Добавить(Счет.Счет.Ссылка); // Можно без Ссылки, ТИП Ссылочный  
   КонецЦикла;
29 kiabs
 
05.12.12
12:01
(28) Через отладчик убедись, что СписокСчетовОС  - действительно список значений и каждый элемент - действительно   тип Счет.Ссылка
30 hhhh
 
05.12.12
12:01
СписокСчетовОС.ЗагрузитьЗначения(СписокСчетов.СписокСчетов.ВыгрузитьКолонку("Счет"));
31 JenyZ
 
05.12.12
12:28
А зачем вообще нужен список счетов?
Предлагаю так: Запрос.УстановитьПараметр("МассивСчетов", СписокСчетов.СписокСчетов.ВыгрузитьКолонку("Счет");
Как по мне: СписокСчетов.СписокСчетов - бред какой-то...
32 kiabs
 
05.12.12
12:38
(31) тут вся тема - бред
Программист всегда исправляет последнюю ошибку.