Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: РИБ для УТП, обмен для бухгалтерской базы
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Конфигурация "1С:Конвертация данных"
AlexeyMalko
Создан обмен, но нормально не работает. Выгружаю с базы приёмника документы -загружаются вроде бы нормально , хотя и очень долго. Но не заполненяются счета учета расчетов с контрагентами и счета учёта НДС ( в Реализации товаров и Услуг и платёжках), если перевыбрать договор то заполняются. Регистр сведений заполнен. Почему так ? Может кто о делал подобное , если можно поделитесь правилами обмена, УТП немного дописана, может и типовой подойти, но чтобы только бух учёт. Спасибо
Bernet
AlexeyMalko @ Сегодня, 9:36 необходимо зарегистрироваться для просмотра ссылки ,
В вашем обмене надо программно вызывать те функции, которые происходят при изменении Контрагента/Договора на форме документа. Там идет обращение либо к процедурам общего модуля либо к экспортным процедурам модуля объекта документа.
Сам по себе договор не подставится
AlexeyMalko
Bernet @ Сегодня, 10:14 необходимо зарегистрироваться для просмотра ссылки ,
ну это один из вариантов, может правильней при обмене сразу как то подставлять счета учёта? это я как пример попробовал при каких условиях подставляются
Bernet
AlexeyMalko @ Сегодня, 10:29 необходимо зарегистрироваться для просмотра ссылки ,
Вам нужно заполнить Организацию, Контрагента, Договор и можно дальше вызвать процедуру, которая заполняет счета учета - тогда все автоматом подставит
            СчетаУчета = УправлениеВзаиморасчетами.ПолучитьСчетаРасчетовСКонтрагентом(Организация, Контрагент, ДоговорКонтрагента);
            
            Если ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Тогда
                СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя;
                СчетУчетаРасчетовПоАвансам     = СчетаУчета.СчетАвансовПокупателя;
            ИначеЕсли ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.Бартерный Тогда
                СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателяПриБартере;
                СчетУчетаРасчетовПоАвансам     = СчетаУчета.СчетАвансовПокупателяПриБартере;
            Иначе
                СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя;
                СчетУчетаРасчетовПоАвансам     = СчетаУчета.СчетАвансовПокупателя;
            КонецЕсли;
            
            СчетУчетаРасчетовПоТаре          = СчетаУчета.СчетУчетаТарыПокупателя;
            СчетУчетаРасчетовПоТареПоАвансам = СчетаУчета.СчетАвансовПоТареПокупателя;
            СчетУчетаНДС                      = СчетаУчета.СчетУчетаНДСПродаж;
            СчетУчетаНДСПодтвержденный       = СчетаУчета.СчетУчетаНДСПродажПодтвержденный;
AlexeyMalko
Может как то по другому сделать базу бухгалтерскую - я думал может документы почистить в упр учётом. может так буде быстрее , а то что то конвертация не радует пока что
Gazulo
AlexeyMalko @ Сегодня, 8:37 необходимо зарегистрироваться для просмотра ссылки ,
В Правиле конвертации объекта "РеализацияТоваровУслуг" в обработчике событий "После загрузки" :

СчетаУчета = УправлениеВзаиморасчетами.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента);
Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя;
Объект.СчетУчетаРасчетовПоАвансам     = СчетаУчета.СчетАвансовПокупателя;
Объект.СчетУчетаРасчетовПоТаре        = СчетаУчета.СчетУчетаТарыПокупателя;
Объект.СчетУчетаНДС                   = СчетаУчета.СчетУчетаНДСПродаж;
Объект.СчетУчетаНДСПодтвержденный        = СчетаУчета.СчетУчетаНДСПродажПодтвержденный;


Объект.Записать();


 ! 

необходимо зарегистрироваться для просмотра ссылки: 9
 
AlexeyMalko
Gazulo @ Вчера, 16:58 необходимо зарегистрироваться для просмотра ссылки ,
сейчас попробую, так долго что то обмен у меня происходит. что проба чего то целый день выгружается
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.