Имя: Пароль:
1C
1C 7.7
v7: Вывести контрагентов из группы
0 Snik_666
 
20.07.11
15:14
Добрый День!
Блин вылетает 1с ка на простой обработке что не так ?

Процедура Сформировать()
   СпрГр = СоздатьОбъект("Справочник.Контрагенты");
   СпрГр.НайтиПоКоду("3332");//Корпорация
   
   Спр = СоздатьОбъект("Справочник.Контрагенты");
   Спр.ИспользоватьРодителя(СпрГр.ТекущийЭлемент());
   Спр.ВыбратьЭлементы(1);
   Пока Спр.ПолучитьЭлемент() = 1 Цикл
       Если Спр.ЭтоГруппа() = 1 Тогда
           продолжить;
       КонецЕсли;    
       
       Сообщить("Спр "+Спр.ТекущийЭлемент());
   КонецЦикла;

КонецПроцедуры


смотрю отладчиком группа есть
на методе Спр.ВыбратьЭлементы(1) вылетает
1 FN
 
20.07.11
15:15
ТиИ?
2 ДенисЧ
 
20.07.11
15:15
Если СпрГр.НайтиПоКоду("3332") = 0 Тогда
 Сообщить("Облом-сЪ");
 Возврат;
КонецЕсли;
3 Ёпрст
 
20.07.11
15:19
Сообщить(СпрГр.ЭтоГруппа()) ?
4 ДенисЧ
 
20.07.11
15:21
Попытка
Спр.ВыбратьЭлементы(1);
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
?
5 andrewks
 
20.07.11
15:24
чё-то телепаты мало вариантов дали. жарко, наверное :)

подкину ещё:
(0) снеси индексы *.cdx, запусти монопольно.
и, да, (2) абсолютно прав - результат поиска надо проверять _обязательно_
6 Snik_666
 
20.07.11
15:27
База под SQLем
Попытка
Спр.ВыбратьЭлементы(1);
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;

всеравно вылетает
7 andrewks
 
20.07.11
15:28
стесняюсь спросить: а скуль какой?
8 ДенисЧ
 
20.07.11
15:28
(6) Вылетает как?
9 1Сергей
 
20.07.11
15:30
(6) в логах что?
10 palpetrovich
 
20.07.11
15:34
а (2) пробовал?
11 ado
 
20.07.11
16:14
Возможно, косяки с признаком группы. Например, элемент -- родитель, а группой не является. Проверь (3)
12 Snik_666
 
20.07.11
17:50
Разобрался, каким то образом в 3х уровневом справочнике оказался мой родитель уже на 3м уровне
Программист всегда исправляет последнюю ошибку.