Имя: Пароль:
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
Получилось, тока каждый поставщик отображается как группа, можно раскрыть на плюс, хотя при попытки переноса групп ругнулось на то что этот справочник не может содержать группы. Пожалуй пойду почитаю УТ...
Программист всегда исправляет последнюю ошибку.