Имя: Пароль:
1C
1С v8
Проблема с перенос справочника в УТ 11
0 Trotter
 
08.08.13
10:10
Вот так копирую группу:
СпрОле = V7.CreateObject("Справочник.Контрагенты");
    СпрОле.ВыбратьЭлементы();
    Пока СпрОле.ПолучитьЭлемент()=1 Цикл
        Если СпрОле.ЭтоГруппа()=1 Тогда
            Если Справочники.Контрагенты.НайтиПоНаименованию(СпрОле.Наименование) = Справочники.Контрагенты.ПустаяСсылка() Тогда
                НоваяГруппа = Справочники.Контрагенты.СоздатьГруппу();
                НоваяГруппа.Наименование = СпрОле.Наименование;
                Если СпрОле.Родитель.Наименование <> "" Тогда
                НоваяГруппа.Родитель = Справочники.Контрагенты.НайтиПоНаименованию(СпрОле.Родитель.Наименование);
                КонецЕсли;
                НоваяГруппа.Записать();
                Сообщить("Создана Группа: " + СпрОле.Наименование);
            КонецЕсли;
        КонецЕсли;
    КонецЦикла;
По Аналогии элементы:
    СпрОле = V7.CreateObject("Справочник.Контрагенты");
    СпрОле.ВыбратьЭлементы();
    Пока СпрОле.ПолучитьЭлемент()=1 Цикл
        Если СпрОле.ЭтоГруппа()=0 Тогда
            Если Справочники.Контрагенты.НайтиПоНаименованию(СпрОле.Наименование) = Справочники.Контрагенты.ПустаяСсылка() Тогда
                НовыйКонтрагент = Справочники.Контрагенты.СоздатьЭлемент();
                НовыйКонтрагент.Наименование = СпрОле.Наименование;
                Если СпрОле.Родитель.Наименование <> "" Тогда
                НовыйКонтрагент.Родитель = Справочники.Контрагенты.НайтиПоНаименованию(СпрОле.Родитель.Наименование);
            КонецЕсли;
            НовыйКонтрагент.Записать();
                Сообщить("Создан контрагент: " + СпрОле.Наименование);    
            КонецЕсли;
КонецЕсли;
КонецЦикла;

Ошибка при переносе элементов:
{Обработка.МО.Форма.Форма.Форма(132)}: Ошибка при установке значения атрибута контекста (Родитель)
                НовыйКонтрагент.Родитель = Справочники.Контрагенты.НайтиПоНаименованию(СпрОле.Родитель.Наименование);
по причине:
Справочник не многоуровневый
Справочник не многоуровневый


Почему так происходит и как поправить подскажите плиз.
Конфа УТ 11 откуда переношу из 7ки Рарус Магазин 2.
1 MadJhey
 
08.08.13
10:14
Контрагенты - не многоуровневый спр. О чем и написано. Кроме того есть спр-к "партнеры". Переносить надо данные прежде всего в него, а потом в контрагенты.
2 Trotter
 
08.08.13
10:15
(1) Сейчас попробую, пробовал так делать, но вроде без записи ))
3 Trotter
 
08.08.13
10:49
Получилось, тока каждый поставщик отображается как группа, можно раскрыть на плюс, хотя при попытки переноса групп ругнулось на то что этот справочник не может содержать группы. Пожалуй пойду почитаю УТ...