7.7 загрузка номенклатуры в ТиС9.2

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 7.7"", создана пользователем mazza, 16 сен 2009.

  1. TopicStarter Overlay
    mazza
    Offline

    mazza Опытный в 1С

    Регистрация:
    4 фев 2009
    Сообщения:
    138
    Симпатии:
    0
    Баллы:
    26
    Привет всем.
    Я в программировании 1С новичок. Вот пытаюсь написать обработку для загрузки данных из таблиц Excel в Справочник Номенклатура (1С Торговля и склад ред.9.2) нашел обработку пример кода ниже. Как загрузить реквизит справочника штрих код. Пишет ошибку Поле агрегатного объекта не обнаружено (РеквШтрихкодБазовой)
    Код:
    //*******************************************
    Процедура Сформировать()
    //Создаем ОЛЕ подключение к Excel
    Excel = СоздатьОбъект("Excel.Application");  
    
    //Открываем файл
    Excel.Workbooks.Open("C:\Documents and Settings\Павел\Рабочий стол\Книга.xls"); 
    
    //Открываем активную книгу
    Книга = Excel.ActiveWorkbook;
    
    //Получааем количество строк в книге
    Строк = Excel.Cells.CurrentRegion.Rows.Count;
    
    //Создадим заранее объект справочника ТМЦ
    СпрТМЦ = СоздатьОбъект("Справочник.Номенклатура");
    
    
    
    //Перебираем строки и обрабатываем данные
    Для х = 1 По Строк Цикл
    
    //Зная типы значений в колонках и перебирая строки получаем
    //необходимые значения и обрабатываем их   
    КодТМЦ       = СокрЛП(Строка(Excel.Cells(х, 1).Value));  
    НаименованиеТМЦ = СокрЛП(Строка(Excel.Cells(х, 2).Value));
    
    ШтрихКод = СокрЛП(Строка(Excel.Cells(х, 3).Value));
    Сообщить(КодТМЦ);
    Сообщить(НаименованиеТМЦ);
    Сообщить(Штрихкод);
    
    Если СпрТМЦ.НайтиПоКоду(КодТМЦ) = 1 Тогда 
    НайдТовар = СпрТМЦ.ТекущийЭлемент();
    
    Иначе
    
    
    СпрТМЦ.Новый();
    СпрТМЦ.Код = КодТМЦ;
    СпрТМЦ.Наименование = НаименованиеТМЦ;
    СпрТМЦ.РеквШтрихкодБазовой  = ШтрихКод;
    СпрТМЦ.ПолнНаименование = НаименованиеТМЦ;
    
    Конецесли;
    
    СпрТМЦ.Записать();   
    //.......     
    
    Конеццикла;
    
    //После загрузки зарываем соединение с Excel
    Excel.Workbooks.Close();
    
    КонецПроцедуры
    
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.523
    Симпатии:
    407
    Баллы:
    104
    РеквШтрихкодБазовой - это не стандартный реквизит справочника номенклатура. Штрихкод в ТиС хранится в подчиненном справочнике Единицы

Поделиться этой страницей