Добрый день! Сделала правила КА->БП, справочники и документы перенесла, есть только одна проблема - не проставлены счета учета в табличных частях и субконто. Есть ли относительно простой способ все поправить?

Дописать правила не предлагать?

написать обработочку, которая получит все объекты документы и инициирует процедуры заполнения счетов в модуле объекта

(1)пока не поняла как дописать правила

(3) Посмотри как устанавливаются счета учета в БП, и в ПослеЗагрузке пробегайся по ТЧ и проставляй так же

(4)это понятно, вопрос в другом. вот например док "Поступление товаров и услуг"

(5) И что с ним?)

в Ка есть счета 25.01, 25.02, 25.03, в БП вместо них надо поставить 25, так же и с 26. Вопрос: как в этом обработчике "после загрузки" поставить условие на счет учета?

у тебя конвертация плана счетов прописана?

(8)только конвертация значений, сейчас проверяю

(7) Стоп, это не счета учета, это счета затрат. ТОгда это надо тянуть из КА из соответсвующего реквизита в соответсвующий реквизит БП, настроив соответствие предопределенных счетов в правиле Хозрасчетный-Хозрасчетный

(10)вот вроде настроила для планов счетов соответствие - а не идет. сейчас по новой проверю

(10) а тут не надо ставить тогда поиск по коду? получается по коду не будет точного соответствия

по коду не надо

в документе нужно в полях где счета указать ПКО

(12) а так не проще?
В КА РТиУ
ПослеЗагрузки
Объект.ЗаполнитьТабличныеЧастиПередПроведением(Ложь);
Объект.ЗаполнитьСчетаУчетаВТабЧасти(Объект.Товары, "Товары", Истина, Истина);
СтруктураСчетовШапки = Объект.ЗаполнитьСтруктуруСчетовУчетаШапки(Истина,Истина);
ЗаполнитьЗначенияСвойств(Объект, СтруктураСчетовШапки);
Объект.Записать();

а в ПТиУ счета затрат?

(16)и там, и там
(15)так это значениями по умолчанию заполнится, а им надо в точности как в источнике

(14)ПКО стоит, но половина счетов почему-то не перегрузилась...

(17) надеюсь ты еще не нафеячила  в БП таких же субсчетов?

каким образом? вообще появились после обмена 2 субсчета, но сама я их не добавляла

уже не 2, а больше...

(16) так же
ЗаполнитьСтруктуруСчетовУчетаШапки()

(22) какой еще шапки если они в ТЧ

(20) ты прописала что субсчетам счета 25 в КА соответствует один счет в БП?

сделала сопоставление значений - все равно не грузится - 117пустых с 26-25-44, и штук 20 заполненных

(24)да

субсчета с Ка в БП больше не кочуют, но все так же не проставляются

включай отладку и смотри че происходит

отладку как обычно в конфигураторе?

- <Свойство Имя="СчетУчета" Тип="ПланСчетовСсылка.Хозрасчетный">
 <Пусто />
вот что в самом фа

файле

нашла причину: в КА снята галочка "показывать в документах счета учета" - теперь новый вопрос: как заполнить счет учета по движениям документа?

что!?

причем тут эта галочка и куда ты собралась заполнять счета по движениям, а самое главное причем тут КА?

(33)вот такая вот база! в самой тч не заполнен счет учета, например, на вкладке "Товары" поступления товаров и услуг. крыж был снят и поле не заполнено, я крыж выставила - и теперь видно. а раз в тч нет счета - то и не выгрузится

(32) обработчик "после загрузки в файл" пропишите потребные реквизиты прямым текстом,не забывая добавлять префикс "обьект."
в табличной части можно перебрать строки и тоже через префикс "обьект."

(35) рауз?

Приблизительно так

Объект.СуммаДокумента = Объект.Товары.Итог("Сумма");
нглТекущийПользователь = глЗначениеПеременной("глТекущийПользователь");

Если Объект.Метаданные().Реквизиты.Найти("Склад") <> Неопределено
   И ( Объект.Склад.Пустая()) Тогда
   Объект.Склад = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(нглТекущийПользователь, "ОсновнойСклад");
КонецЕсли;


Если Объект.Метаданные().Реквизиты.Найти("Организация") <> Неопределено
   И ( Объект.Организация.Пустая()) Тогда
   Объект.Организация = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(нглТекущийПользователь, "ОсновнаяОрганизация");
КонецЕсли;

Ха = Истина;
Если Объект.Метаданные().Реквизиты.Найти("ДоговорКонтрагента") <> Неопределено
   И ( Объект.ДоговорКонтрагента.Пустая()) Тогда
   
   СпрДоговоров = Справочники.ДоговорыКонтрагентов.Выбрать(,Объект.Контрагент );
   Пока СпрДоговоров.Следующий() Цикл
       Если ( Нрег( СпрДоговоров.Наименование ) = "основной договор" ) И
           ( СпрДоговоров.ВидДоговора  = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком ) Тогда
               Объект.ДоговорКонтрагента = СпрДоговоров.Ссылка;
               Ха = Ложь;
            Прервать;
       КонецЕсли;
   КонецЦикла;
   Если Ха Тогда
//        СпрДоговоров.Новый;
       НовыйЭлемент = Справочники.ДоговорыКонтрагентов.СоздатьЭлемент();
       НовыйЭлемент.Наименование = "Основной договор";
       НовыйЭлемент.ВидДоговора  = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком;
       НовыйЭлемент.Владелец   = Объект.Контрагент;
       НовыйЭлемент.Организация  = Объект.Организация;
       НовыйЭлемент.ВалютаВзаиморасчетов  = Объект.ВалютаДокумента;
       НовыйЭлемент.Записать();
       Объект.ДоговорКонтрагента = НовыйЭлемент.Ссылка;
       
       
   КонецЕсли;
   
КонецЕсли;

Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.01");
Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.НайтиПоКоду("60.02");

Для каждого СтрокаТЧ из Объект.Товары Цикл
   Если СтрокаТЧ.СуммаНДС > 0 Тогда
       Если Не ЗначениеЗаполнено( СтрокаТЧ.СтавкаНДС ) Тогда
           СтрокаТЧ.СтавкаНДС = Перечисления.СтавкиНДС.НДС18;
       КонецЕсли;
   КонецЕсли;
   
   СтрокаТЧ.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("41.01");
   СтрокаТЧ.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НайтиПоКоду("19.03");
   
КонецЦикла;

   Ин = 0;
   Попытка
       Объект.Записать(РежимЗаписиДокумента.Проведение);
       Сообщить("Документ проведен : "+ СокрЛП(Объект));
       Ин = Ин + 1;
   Исключение
       Сообщить("ДОКУМЕНТ НЕ ПРОВЕДЕН : "+ ОписаниеОшибки(), СтатусСообщения.ОченьВажное);
       Сообщить(" "+СокрЛП(Объект));
   КонецПопытки;
Объект.Записать(РежимЗаписиДокумента.ОтменаПроведения);




Как видите, можно любой реквизит дозагрузить
и даже перепровести, но это как вариант
Только с обработчиком нагрешил - обработчик "после загрузки"
т.6е проверяем реквизиты при загрузке уже после загрузки обьекта

(38) дозаполнить <> дозагрузить

(32) да, кстати, это не причина, впрочем Вы и сами догадались

(39) погрешности стиля изложения <> излагаемому..
Вам нужно вТулу

(41) дозаполнить - заполнить по данным базы приемника
дозагрузить - заполнить по данным базы источника
погрешность стиля джона вейна не равна джону вейну, ага
(35) счета учета заполнены в документе то?

http://1c.alllangin.com/shop/buh8tokaupp.php
http://1c.alllangin.com/shop/shop.php