[Yoja]

Добрый день!

Открываю
1С:Підприємство 8.2 (8.2.13.219)
Управление небольшой фирмой для Украины, редакция 1.3
ЗАПУСКАЮ, внешнюю обработку

Подключаюсь напрямую у БД
1С:Підприємство 8.2 (8.2.13.219)
Бухгалтерия для Украины, редакция 1.2.

Делаю выгрузку справочника, но мне выгружается справочник из УНФ,
как выбрать справочник из Бухгалтерия для Украины

Код:

Процедура Кнопка1Нажатие(Элемент)
        //строим запрос к контрагентам
    
    Запрос1С = Новый Запрос;
    Запрос1С.Текст = 
        "ВЫБРАТЬ
        |   Контрагенты.Код,
        |   Контрагенты.Наименование
        |ИЗ
        |    Справочник.Контрагенты КАК Контрагенты";
        
        
    РезультатЗапроса    = Запрос1С.Выполнить();
    Выборка = РезультатЗапроса.Выбрать();

        
    
    Пока Выборка.Следующий() Цикл
        Сообщить(Выборка.Код);
        Сообщить(Выборка.Наименование);
    КонецЦикла;     

КонецПроцедуры

[alex040269]

Подключаюсь напрямую у БД
1С:Підприємство 8.2 (8.2.13.219)
Бухгалтерия для Украины, редакция 1.2.

Подробнее об этом.

[Yoja]

Указываю путь к БД, как на картинке, Имя, Пароль, Нажимаю ПОДКЛЮЧИТЬСЯ
Подключение происходит.


Код подключения к БД.

Процедура TestConnectionBDНажатие(Элемент)
    Если СокрЛП(УкажитеПутьКБДИП) = "" Тогда
         Предупреждение("Не указан путь к БД")
    Иначе    
        Если СокрЛП(Пользователь)="" Тогда
             Предупреждение("Не указано имя пользователя ")
        Иначе
        // Создается объект-коннектор 
        V82 = Новый COMObject("V82.COMConnector");
                Попытка
                    Открыта = V82.Connect(СформироватьСтрокуПодключения());
                    Пароль = "";
                Исключение
                    Предупреждение(ОписаниеОшибки()); //"Ошибка открытия информационной базы"
                    //Сообщить(ОписаниеОшибки());
                 Возврат;
                КонецПопытки;
        КонецЕсли    
    КонецЕсли
КонецПроцедуры

Функция СформироватьСтрокуПодключения()
    СтрокаПодключения = "";
    СтрокаПодключения = "File="""+ СокрЛП(УкажитеПутьКБДИП) + """;Usr=""" + СокрЛП(Пользователь) + """;Pwd=""" + СокрЛП(Пароль)+ """;";
    //Сообщить(СтрокаПодключения);   
    Возврат СтрокаПодключения;    
КонецФункции

+ к тому, скажу
Просто открыл обработку в кофигурации бухгалтерия для укр.
Нажал кнопку Справочник номенклатуры, и список выгрузился.
Подключение к БД вообще не указывал

[alex040269]

Вот. Что бы запрос работал в другой базе нужно:

Запрос1С = V82.NewObject("Запрос");

ну и все значения параметров тоже тянуть из соответсвующей базы, если таковые имеются.

[Yoja]

Для достижения результата, понадобилось:
1. Объявить глобальную переменную Запрос1С (пишеться в самом начале модуля)

Перем Запрос1С

2. В процедуре прямогу подключения к бд (TestConnectionBDНажатие), дописать перед словом ИСКЛЮЧЕНИЕ

Запрос1С = Открыта.NewObject("Запрос");

3. Удалить строку из процедуры запроса (Кнопка1Нажатие)

Запрос1С = Новый Запрос;

P.S. Все процедуры выше в ТЕМЕ.
Спасибо