Здровеньки булы, коллеги!
Вопрос знатокам. Можно ли стандартными (или не совсем)средствами перенести остаток на счете только по одному счету (19)?

переписать обработку v77exp, не?

как вариант - перенеси полностью в отдельную базу восьмерки
и уже оттуда через стандартную выгр-загр в xml вытяни в рабочую базу

(2) "вытяни" - в смысле 19 счет остатки

а что-нибудь более простое?

мне кажется, (2) - это очень просто, на 15 минут, и писать ничего не надо

ТаблицаОстатковПоБухсчетам = БазаНаемник.РегистрыБухгалтерии.Хозрасчетный.Остатки(КонецДня(ДатаОстатков));
       Для Каждого бух из ТаблицаОстатковПоБухсчетам Цикл
           //Если    бух.СуммаОстатокДт-бух.СуммаОстатокКт<0 Тогда
           //        Продолжить;
           //        КонецЕсли;
           ЭтуПроводкуиспользоватьМожно = Ложь;
           если ПланыСчетов.Хозрасчетный.НайтиПоКоду(бух.Счет.Код).Забалансовый тогда
               Сообщить("счет "+ бух.Счет.Код+" - забалансовый, его использовать в проводках нельзя!",СтатусСообщения.ОченьВажное);
               Продолжить;
           КонецЕсли;
           для нс = 1 по 3 Цикл
               если бух["Субконто"+Строка(нс)]= неопределено тогда
                   Продолжить;
               иначе
               КонецЕсли;
                           
                   Если Лев(СокрЛП((бух.Счет.Код)),2)= "12"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "20"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "45"
           //                                                0
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "21"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "40"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "41"
           //        или СокрЛП((бух.Счет.Код)) = "41"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "44"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "46"
           //        или Лев(СокрЛП((бух.Счет.Код)),2) = "50"

           //        или Лев(СокрЛП((бух.Счет.Код)),2) ="51"
                   или Лев(СокрЛП((бух.Счет.Код)),2) = "13" тогда
                       ЭтуПроводкуиспользоватьМожно = Истина;
                       
                       Иначе
                   ЭтуПроводкуиспользоватьМожно = Ложь;
                   Прервать;
               КонецЕсли;
               
           КонецЦикла;
           Если ЭтуПроводкуиспользоватьМожно тогда
               

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

а базу получи через комконнектор

а, ну да, (6) и (7) попроще будет

Спс. Думаю грузить буду в отдельную базу а там перекину через какой нибудь обмен между идентичными базами просто документ ввод остатков.

(9) удачи