Что хочу: получить наименование товара который находится в 7.7 из 8.2

Что делаю:

Перем База;

Функция ПодключитьБазу() 
    База=Новый COMОбъект("V1CEnterprise.Application");
    
    Попытка   
        СтрокаПодключения = "/D"""+СокрЛП(ПутьКБазе)+""" /N"""+СокрЛП(Пользователь)+""" /P"""+СокрЛП(Пароль)+"""";
        Открыта=База.Initialize(База.RMTrade,СтрокаПодключения,"NO_SPLASH_SHOW");
        
        Если Открыта Тогда
            ЕстьПодключение = Истина;
        Иначе
            #Если Клиент Тогда
                Сообщить("Ошибка при подключении!");
            #КонецЕсли
            ЕстьПодключение = Ложь;
        КонецЕсли;    
    Исключение
        #Если Клиент Тогда
            Сообщить("Ошибка при подключении!");
        #КонецЕсли
        ЕстьПодключение = Ложь;
    КонецПопытки;

    Возврат ЕстьПодключение;
КонецФункции

Процедура КнопкаВыполнитьНажатие(Кнопка)
Сообщить("Подключение к базе " + ПодключитьБазу()); //Истина
    спр = База.CreateObject("Справочник.ТМЦ");
    Если спр.НайтиПоРеквизиту("КодТовара", КодТовара) = 1 Тогда
        Сообщить(спр.ТекущийЭлемент().Наименование);    
    Иначе
        Сообщить("Не нашли");
    КонецЕсли;
КонецПроцедуры

Требуемый код товара присутствует.

Вопросы:
1. Если фун-я ПодключитьБазу() возвращает Истину, значит с подключением проблем нет?
2. Что мне надо написать в "Процедура КнопкаВыполнитьНажатие(Кнопка)" чтобы вернуло "наименование" любого товара?

Что значит любого?

Чтобы хоть какие-то данные вытаскивало.

Пускай будет первого в выборке(сортировка по коду).

1. Подключение

    ПодключеннаяБаза = Новый COMОбъект("V77S.Application");
    
    Открыта = ПодключеннаяБаза.Initialize(ПодключеннаяБаза.RMTrade, "/d" + База + " /N" + Пользователь + " /P" + Пароль,"");

2.Поиск склада

        СпрТемп = ПодключеннаяБаза.CreateObject("Справочник.Склади");
        СпрТемп.НайтиПоКоду(пКод);
        Склад_8 = СоздатьСклад( СпрТемп.ТекущийЭлемент());

ВОт так когдато переносил контрагентов

СпрЗап = База77.CreateObject("Справочник.Контрагенты");
    СпрЗап.ВыбратьЭлементы();
    Пока СпрЗап.ПолучитьЭлемент() = 1 Цикл 
        Если СпрЗап.ПометкаУдаления()<> 0 Тогда Продолжить;
        КонецЕсли;
        Если СпрЗап.ЭтоГруппа()<> 0 Тогда Продолжить;
        КонецЕсли;
        //
        те = СпрЗап.ТекущийЭлемент();  
        Рез = Создать_Контрагента(те);
    КонецЦикла;

Сообщение отредактировал sava1 - 03.11.14, 15:45

Да, если перебирать справочник и сообщать КодТовара - то все ок.

Значит у меня ошибка в

Если спр.НайтиПоРеквизиту("КодТовара", КодТовара) = 1 Тогда

Видно надо указывать родителя.

Уникальность кода какая - во всем справочнике/в пределах подчинения ?

Если есть полный код - ищем по полному.

- "КодТовара" это реквизит справочника. Не имеет ничего общего с реквизитом по умолчанию для справочников "Код".
- Справочник.ТМЦ ничему не подчинен, но иерархический.

НайтиПоРеквизиту(<?>,,);
Синтаксис:
НайтиПоРеквизиту(<ИмяРеквизита>,<Значение>,<ФлагГлобальногоПоиска>)
Назначение:
Найти элемент справочника по значению реквизита.
Возвращает: 1 - если действие выполнено;
0 - если действие не выполнено (элемент не найден).
...
Замечание:
Метод можно использовать только для реквизитов с установленным признаком ''Сортировка''.

Обратите внимание на ''Сортировка''.

Сообщение отредактировал alex1c - 05.11.14, 16:54