Имеются две одинаковые базы. Есть запрос на получения определенных реализаций товаров и услуг.
Из базы, где получили этот запрос , выгрузить эти данные в другую. Отправьте пожалуйста пример
---
```1c
    Процедура КнопкаВыполнитьНажатие(Кнопка)
    СтрокаПодключения =
    "file='C:\Users\Fin3\Desktop\Новая папка (2)\KVVK_8_2\'; usr='Администратор3'; pwd='123';";
    ComConnector = ПолучитьCOMОбъектПоВерсииПлатформы();
    СообщениеПользователю = Новый СообщениеПользователю;

    Попытка
    ComConnection = COMConnector.Connect(СтрокаПодключения);
    Исключение
    СообщениеПользователю.Текст = "Ошибка подключения: " + ОписаниеОшибки();
    СообщениеПользователю.Сообщить();
    Возврат;
    КонецПопытки;
    МенеджерДокумента = ComConnection.Документы.РеализацияТоваровУслуг;
    ComConnection.УстановитьБезопасныйРежим(Ложь);
    ComConnection.УстановитьПривилегированныйРежим(Истина);
    Документ = МенеджерДокумента.СоздатьДокумент();
    Документ.Дата = ТекущаяДата();
    Документ.Организация = ComConnection.Справочники.Организации.НайтиПоКоду("000000001");
    Документ.Контрагент = ComConnection.Справочники.Контрагенты.НайтиПоКоду("БП0005005");
    Документ.ДоговорКонтрагента =ComConnection.Справочники.ДоговорыКонтрагентов.НайтиПоКоду("БП0005005");
    Документ.СчетУчетаРасчетовПоАвансам= ComConnection.ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.02");
    Документ.СчетУчетаРасчетовСКонтрагентом = ComConnection.ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.02");
    Документ.СпособЗачетаАвансов = ComConnection.Перечисления.СпособыЗачетаАвансов.Автоматически;
    Документ.ВалютаДокумента = ComConnection.Справочники.Валюты.НайтиПоНаименованию("руб.");
    Документ.ВидОперации= ComConnection.перечисления.ВидыОперацийРеализацияТоваров.ПродажаКомиссия;
    Документ.ОбменДанными = Истина;
    Документ.Записать(Режимзаписидокумента.Запись);

    //Документ.Записать();

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

    Функция ПолучитьCOMОбъектПоВерсииПлатформы() Экспорт

    // Определяем имя COM-объекта по версии платформы
    ИмяComОбъекта = ";
    Инфо = Новый СистемнаяИнформация;
    Если Найти(Инфо.ВерсияПриложения, "8.3") > 0 Тогда
    ИмяComОбъекта = "V83.COMConnector";
    ИначеЕсли Найти(Инфо.ВерсияПриложения, "8.2") > 0 Тогда
    ИмяComОбъекта = "V82.COMConnector";
    Иначе
    ВызватьИсключение "Не удалось определить версию платформы";
    КонецЕсли;

    // Инициализируем COM-объект и соединение
    COMConnector = Новый COMОбъект(ИмяComОбъекта);

    Возврат COMConnector;

    КонецФункции
```

Осталось только понять как провести
---
Ну вот если кратко то можно так, через ком-соединение

```1c
    V8 = Новый COMОбъект("V82.ComConnector");
    База = V8.Connect ("File="D:\Локальная_УПП\"; Usr="Юзер";Pwd="Пароль";");

    Запрос = База.NewObject("Запрос");
    Запрос.Текст ="Выбрать Ссылка Из Документы.РеализацияТоваровУслуг";
    ВыборкаРезультата = Запрос.выполнить().выбрать();
    Пока выборкаРезультата.следующий() цикл
    // тут берете документы и создаете их в базе
    Конеццикла
```
---
V8 = Новый COMОбъект("V82.ComConnector");
База = V8.Connect ("File=""D:\Локальная_УПП\""; Usr=""Юзер"";Pwd=""Пароль"";");

Произошла исключительная ситуация (V82.COMConnector.1): Ошибка при выполнении операции с информационной базой
Несовместимая версия файла базы данных '\\fin3\Обмен\Ленар абый/1Cv8.1CD'
---
вам нужно указать каталог базы а нее файла 1Cv8.1CD, укажите \\fin3\Обмен\Ленар абый\
---
\\fin3\Обмен\Ленар абый\

```1c
    Путь = "\\fin3\Обмен\Ленар абый";
    V8 = Новый COMОбъект("V82.ComConnector");
    База = V8.Connect ("File="\\fin3\Обмен\Ленар абый\"; Usr="Админ";Pwd="Пароль";");
```

Все равно ошибка
---
какова рода ошибка. может вы не верно делаете ком соединение, вот в таком ее виде нужно указать. Может у вас имя конектора вот такое V8.COMConnector

v8 = CreateObject("V8.COMConnector");
Если ФайловаяБазаДанных Тогда
        СтрокаПодключения = "file='" + КаталогБазыДанных + "'; usr='" + Пользователь + "'; pwd='" + Пароль + "';";
Иначе
        СтрокаПодключения = "srvr='" + Сервер + "'; ref='" + БазаДанных + "'; usr='" + Пользователь + "'; pwd='" + Пароль + "';";
КонецЕсли;
Соединение = V8.Connect(СтрокаПодключения)
---
Не удалось подключиться к базе{ВнешняяОбработка.ВнешняяОбработка1.Форма.Форма.Форма(8)}: Ошибка при вызове метода контекста (Connect): Произошла исключительная ситуация (1C:Enterprise 8.3.11.2954): Существуют активные сеансы работы с данной информационной базой, использующие Платформу 1С:Предприятия другой версии.
Используйте для подключения к информационной базе платформу версии 8.3.9.1818.
---
Код

   Соединение = Новый COMОбъект("V83.Application");

СтрокаСоединения = "File = ""\\fin3\Обмен\Ленар абый""; Usr = Админ; Pwd =";
Попытка
Подключение = Соединение.Connect(СтрокаСоединения);
Исключение
Сообщение = Новый СообщениеПользователю;
Сообщение.Текст = "Не удалось подключиться к базе" + ОписаниеОшибки();
Сообщение.Сообщить();
КонецПопытки;

Показать полностью
Вот это использовал
---
у вас отличаются версии платформы, при локальных базах у вас одна база сделала временный файл от версии 8.3.11.2954 а другая от 8.3.9.1818 вот и конфликт. Нужно прийти к единой платформе
---
Вот получается соединение прошло, как дальше создать документ?
---
ДокументCOM = Подключение .Документы.ИмяДокумента.СоздатьДокумент() // и дальше все как обычно.
---
Подключение = Соединение.Connect(СтрокаСоединения);

Вот тут подвисает и все
---
Дальше этого зависания не идет
---
у вас так и не получилось или нашли другой способ решить задачу?
---
Нашел другой способ. Могу отправить
---
если честно, то да интересно был бы признателен, либо тут напишите, либо в сообщение, можно по почте sedovsu@mail.ru
---
```1c
    Процедура КнопкаВыполнитьНажатие(Кнопка)
    СтрокаПодключения =
    "file='C:\Users\Fin3\Desktop\Новая папка (2)\KVVK_8_2\'; usr='Администратор3'; pwd='123';";
    ComConnector = ПолучитьCOMОбъектПоВерсииПлатформы();
    СообщениеПользователю = Новый СообщениеПользователю;

    Попытка
    ComConnection = COMConnector.Connect(СтрокаПодключения);
    Исключение
    СообщениеПользователю.Текст = "Ошибка подключения: " + ОписаниеОшибки();
    СообщениеПользователю.Сообщить();
    Возврат;
    КонецПопытки;
    МенеджерДокумента = ComConnection.Документы.РеализацияТоваровУслуг;
    ComConnection.УстановитьБезопасныйРежим(Ложь);
    ComConnection.УстановитьПривилегированныйРежим(Истина);
    Документ = МенеджерДокумента.СоздатьДокумент();
    Документ.Дата = ТекущаяДата();
    Документ.Организация = ComConnection.Справочники.Организации.НайтиПоКоду("000000001");
    Документ.Контрагент = ComConnection.Справочники.Контрагенты.НайтиПоКоду("БП0005005");
    Документ.ДоговорКонтрагента =ComConnection.Справочники.ДоговорыКонтрагентов.НайтиПоКоду("БП0005005");
    Документ.СчетУчетаРасчетовПоАвансам= ComConnection.ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.02");
    Документ.СчетУчетаРасчетовСКонтрагентом = ComConnection.ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.02");
    Документ.СпособЗачетаАвансов = ComConnection.Перечисления.СпособыЗачетаАвансов.Автоматически;
    Документ.ВалютаДокумента = ComConnection.Справочники.Валюты.НайтиПоНаименованию("руб.");
    Документ.ВидОперации= ComConnection.перечисления.ВидыОперацийРеализацияТоваров.ПродажаКомиссия;
    Документ.ОбменДанными = Истина;
    Документ.Записать(Режимзаписидокумента.Запись);

    //Документ.Записать();

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

    Функция ПолучитьCOMОбъектПоВерсииПлатформы() Экспорт

    // Определяем имя COM-объекта по версии платформы
    ИмяComОбъекта = ";
    Инфо = Новый СистемнаяИнформация;
    Если Найти(Инфо.ВерсияПриложения, "8.3") > 0 Тогда
    ИмяComОбъекта = "V83.COMConnector";
    ИначеЕсли Найти(Инфо.ВерсияПриложения, "8.2") > 0 Тогда
    ИмяComОбъекта = "V82.COMConnector";
    Иначе
    ВызватьИсключение "Не удалось определить версию платформы";
    КонецЕсли;

    // Инициализируем COM-объект и соединение
    COMConnector = Новый COMОбъект(ИмяComОбъекта);

    Возврат COMConnector;

    КонецФункции
```

Осталось только понять как провести
---
благодарю

Осталось только понять как провести
А если вызвать проведение Документ.Записать(Режимзаписидокумента.Проведение) не получается??
---
Так не получалось
---
А если вызвать метод из 2 базы, кот. будет проводить их? Либо ты можешь регламентно делать это.
---
Вам спасибо за помощь
---
Документ.Записать(ComConnection.РежимЗаписиДокумента.Проведение);

Вот так удалось провести
---
это работа с планом обмена,
создайте, настройте, используйте
---
План обмена позволит из 10 реализаций сделать 1?
---
что бы

из 10 реализаций сделать 1

это вам выгрузку по правилам конвертации данных надо.
(это к программисту, сами не осилите)
---
(это к программисту, сами не осилите)

Самое необоснованный ответ. Если бы вы написали "Вам будет сложно это изучить", тогда понятно