Как перенести элемент справочника из группы в "корень" справочника программно?
30.03.2006
10:57
#1
"Требуется изменить Родителя элемента справочника, а именно - сделать так, чтобы он не входил ни в какую группу.<br>Пишу так:<br>Спр.ВыбратьЭлементы;<br> Пока Спр.ПолучитьЭлемент()=1 Цикл <br> ТекЭл=Спр.ТекущийЭлемент(); <br> Если (ТекЭл.ЭтоГруппа()=0) и (ТекЭл.Уровень()>1) Тогда<br> ТекЭл.Родитель=ПолучитьПустоеЗначение("Справочник.Номенклатура"); <br> КонецЕсли;<br> КонецЦикла; <br><br>Выдает: Объект не может быть перепозиционирован!<br>Похожий вопрос нашла на форуме, но четкого ответа там нет.<br><br>Подскажите, пожалуйста, может я что не так делаю? "
30.03.2006
21:27
#2
"Пускай длинно, но верно:<br><br> Спр = СоздатьОбъект("Справочник.<вид справочника>");<br> Спс=СоздатьОбъект("СписокЗначений");<br> Спр.ВыбратьЭлементы();<br> Пока Спр.ПолучитьЭлемент()=1 Цикл<br> Если (Спр.ЭтоГруппа()=0) и (Спр.Уровень()>1) Тогда<br> Спс.ДобавитьЗначение(Спр.ТекущийЭлемент());<br> КонецЕсли;<br> КонецЦикла;<br> Для Сч=1 По Спс.РазмерСписка() Цикл<br> Спр.НайтиЭлемент(Спс.ПолучитьЗначение(Сч));<br> Спр.Родитель=""""; <br> Спр.Записать();<br> КонецЦикла;<br><br>"
30.03.2006
21:46
#3
"спр=СоздатьОбъект("Справочник.Номенклатура");<br>спр.ВыбратьЭлементы(0); <br>пока спр.получитьэлемент()=1 цикл <br> если спр.Текущийэлемент().ЭтоГруппа()=0 тогда<br> спр.Родитель="""";<br> спр.записать(); <br> конецесли;<br>конеццикла;"
Читают тему
(гостей: 1)