Подскажите как правильно написать
Движение.СубконтоДт[0]=Справочники.Контрагенты.НайтиПоНаименованию("Балтком Юни ООО");

создаю операцию бух программно
НовДок=Документы.ОперацияБух.СоздатьДокумент();
НовДок.Дата=ВыборкаДетальныеЗаписи.РегистраторДата;
НовДок.Записать();
НаборЗаписей=РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();        НаборЗаписей.Отбор.Регистратор.Установить(НовДок.Ссылка);
Движение=НаборЗаписей.Добавить();
                Движение.Регистратор=НовДок.Ссылка;
                Движение.Период=НовДок.Дата;
                Движение.Организация=НовДок.Организация;
                Движение.СчетДт=ПланыСчетов.Хозрасчетный.НайтиПоКоду(ВыборкаДетальныеЗаписи.СчетДтКод);
Движение.СчетДт.ВидыСубконто[0]=Справочники[СтрЗаменить(Строка(ВыборкаДетальныеЗаписи.СубконтоДт1Тип)," ","")].НайтиПоНаименованию(ВыборкаДетальныеЗаписи.СубконтоДт1).Значение;
НаборЗаписей.Записать();

ты извращенец какойто

это все пишется в Обработка проведения дока если что

и совсем другими словами

(2) сам ты извращенец

и это все написано в обработке по загрузке докукментов из базы в базу

(5)Нук тогда объясни -нафейхуа этот изврат тебе нужен?

(6)Конфа бах идентичная?

здесь вообще еще есть подключение по OLE и т.д

*баз

(9)Оле?
Ну ты еще dos 6.2 вспомни:-)
Выкинь в топку оле.
COM -наше все

?

(12) Это значит мне нужно тебе объяснить?
Да ради бога.
https://www.google.ru/search?as_sitesearch=forum.mista.ru&q=ComConnect#newwindow=1&q=ComObject+site%3Aforum.mista.ru

(13) твои ответы не о чем

или так
https://www.google.ru/search?as_sitesearch=forum.mista.ru&q=ComConnect#newwindow=1&q=ComConector+site%3Aforum.mista.ru

ЗапросКом=Новый Запрос;
   ЗапросКом.Текст =
        "ВЫБРАТЬ
        |    ХозрасчетныйОборотыДтКт.Регистратор.Представление КАК Регистратор,
        |    ХозрасчетныйОборотыДтКт.Регистратор.Дата,
        |    ХозрасчетныйОборотыДтКт.Период,
        |    ХозрасчетныйОборотыДтКт.НомерСтроки КАК НомерСтроки,
        |    ХозрасчетныйОборотыДтКт.СчетДт.Код КАК СчетДтКод,
        |    ХозрасчетныйОборотыДтКт.СубконтоДт1.Представление КАК СубконтоДт1,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.СубконтоДт1) КАК СубконтоДт1Тип,
        |    ХозрасчетныйОборотыДтКт.СубконтоДт2.Представление КАК СубконтоДт2,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.СубконтоДт2) КАК СубконтоДт2Тип,
        |    ХозрасчетныйОборотыДтКт.СубконтоДт3.Представление КАК СубконтоДт3,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.СубконтоДт3) КАК СубконтоДт3Тип,
        |    ХозрасчетныйОборотыДтКт.СчетКт.Код КАК СчетКтКод,
        |    ХозрасчетныйОборотыДтКт.СубконтоКт1.Представление КАК СубконтоКт1,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.СубконтоКт1) КАК СубконтоКт1Тип,
        |    ХозрасчетныйОборотыДтКт.СубконтоКт2.Представление КАК СубконтоКт2,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.СубконтоКт2) КАК СубконтоКт2Тип,
        |    ХозрасчетныйОборотыДтКт.СубконтоКт3.Представление КАК СубконтоКт3,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.СубконтоКт3) КАК СубконтоКт3Тип,
        |    ХозрасчетныйОборотыДтКт.СуммаОборот,
        |    ХозрасчетныйОборотыДтКт.КоличествоОборотДт,
        |    ХозрасчетныйОборотыДтКт.КоличествоОборотКт,
        |    ТИПЗНАЧЕНИЯ(ХозрасчетныйОборотыДтКт.Регистратор) КАК РегистраторТип
        |ИЗ
        |    РегистрБухгалтерии.Хозрасчетный.ОборотыДтКт(&ДатаНачала, &ДатаКонца, Запись, , , , , ) КАК ХозрасчетныйОборотыДтКт
        |
        |УПОРЯДОЧИТЬ ПО
        |    Регистратор,
        |    НомерСтроки
        |ИТОГИ ПО
        |    Регистратор";

    ЗапросКом.УстановитьПараметр("ДатаКонца", ДатаКонца);
    ЗапросКом.УстановитьПараметр("ДатаНачала", ДатаНачала);

    Результат = ЗапросКом.Выполнить();

    //ВыборкаРегистратор = Результат.Выбрать(V8.ОбходРезультатаЗапроса.ПоГруппировкам);
    ВыборкаРегистратор = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

    Пока ВыборкаРегистратор.Следующий() Цикл
        // Вставить обработку выборки ВыборкаРегистратор
        Сообщить("                                                                                                             ");
        Сообщить(" Загружаем " + ВыборкаРегистратор.Регистратор);
        КолСимвВКоммент=СтрДлина("Создан из "+ВыборкаРегистратор.Регистратор);
        док_не_найден=нашли_документ(КолСимвВКоммент,"Создан из "+ВыборкаРегистратор.Регистратор);
        Если док_не_найден=ЛОЖЬ тогда
            Сообщить(" Документ уже загружен "+ВыборкаРегистратор.Регистратор);
            Сообщить("                                                                                                             ");
            продолжить;
        КонецЕсли;      

        
        
        //Сообщить(""+ВыборкаРегистратор.Регистратор);
        НовДок=Документы.ОперацияБух.СоздатьДокумент();
НовДок.Комментарий="Создан из "+ВыборкаРегистратор.Регистратор;
        НовДок.Содержание="Создан из "+ВыборкаРегистратор.Регистратор;
        НовДок.Ответственный=ПараметрыСеанса.ТекущийПользователь;
                
        ВыборкаДетальныеЗаписи = ВыборкаРегистратор.Выбрать();
        Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
            Если Год(НовДок.Дата)=1 тогда
                НовДок.Дата=ВыборкаДетальныеЗаписи.РегистраторДата;
                НовДок.Записать();
                НаборЗаписей=РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
                НаборЗаписей.Отбор.Регистратор.Установить(НовДок.Ссылка);
            КонецЕСли;
    
                //    найден=Справочники[СтрЗаменить(Строка(ВыборкаДетальныеЗаписи.СубконтоДт1Тип)," ","")].НайтиПоНаименованию(ВыборкаДетальныеЗаписи.СубконтоДт1);
                //Документы[СтрЗаменить(Строка(ВыборкаДетальныеЗаписи.СубконтоДт3Тип)," ","")]
                
                Движение=НаборЗаписей.Добавить();
                Движение.Регистратор=НовДок.Ссылка;
                Движение.Период=НовДок.Дата;
                Движение.Организация=НовДок.Организация;
                Движение.СчетДт=ПланыСчетов.Хозрасчетный.НайтиПоКоду(ВыборкаДетальныеЗаписи.СчетДтКод);
                Попытка
            Движение.СчетДт.ВидыСубконто[0]=Справочники[СтрЗаменить(Строка(ВыборкаДетальныеЗаписи.СубконтоДт1Тип)," ","")].НайтиПоНаименованию(ВыборкаДетальныеЗаписи.СубконтоДт1).Значение;

(14)Ну если ты туп, чтобы понят мои ответы - то тогда извини.
Прими соболезнования.

(16)+ полный код

подскажите как правильно написать строчку
Движение.СчетДт.ВидыСубконто[0]=Справочники[СтрЗаменить(Строка(ВыборкаДетальныеЗаписи.СубконтоДт1Тип)," ","")].НайтиПоНаименованию(ВыборкаДетальныеЗаписи.СубконтоДт1).Значение;

(17) туп ты

(18)Иди в дворники. Мой тебе совет.

(20)да, конечно.Это я пришел на мисту задавать тупые вопросы, а не ты:-)

(22) ты просто спамер

(23)Кто я?6-)))
Ты просто жгешь нериально:-))
Я- спамер. Это крутое утверждение.

(25)ты уже сам в оффтоп выходишь своей темы :-)

а задачка то просто решалась,
ДВижение.СубконтоДт[тексубк.ВидСубконто]=Справочники[СтрЗаменить(Строка(ВыборкаДетальныеЗаписи.СубконтоДт1Тип)," ","")].НайтиПоНаименованию(ВыборкаДетальныеЗаписи.СубконтоДт1);

(27) а если наименование поменяется? Или в базе не один элемент с таким наименованием?
или это разовая загрузка и все подводные камни заранее известны?

смотри в типовой функцию УстановитьСубконто