Выгрузка Бухгалтерия Альфа-Авто
Читают тему
Вход в личный кабинет
Для получения доступа к форуму необходимо
авторизоваться
или
зарегистрироваться
на сайте.
{{ formTitle ? formTitle : 'Заказ обратного звонка' }}
{{ formDescription }}
Сообщить об ошибке
Альфа-Авто: Автосервис+Автозапчасти. Редакция 4.1 (4.1.01.19)
Бухгалтерия предприятия, редакция 2.0 (2.0.47.7)
Производится выгрузка из Альфа-Авто в Бухгалтерию.
Как настроить такой механизм:
Документ "Расходный кассовый ордер"
Если выгружается из Альфы этот документ со статьей "Выплата заработной платы",
То при загрузке в Бухгалтерию создается документ с Видом операции "Прочий расход" и заполняется "Работники Организации" = Контрагенту из Расходного кассового ордера Альфа-Авты?
Я знаю как сделать, чтобы вид операции заполнялся при загрузке, но не знаю как заполнить "Работники Организации" = Контрагенту из Расходного кассового ордера Альфа-Авты
тут что-то есть
судя по ссылке.
Но мне бухгалтера сказали что лучше чтобы выгружалось в вид операции "Прочий расход" и заполнялось только поле Работники Организации(для них этого достаточно)
Нужно было дописать в функции Функция ПолучитьХО_ПКО_РКО(ВидДокумента,СтатьяДДС) Экспорт
ХозОперация = Перечисления.ВидыОперацийРКО.ПрочийРасход;
// Процедура загрузки документов вида <РасходныйКассовыйОрдер> в <РасходныйКассовыйОрдер>
Процедура ЗагрузитьБП2Документ_РасходныйКассовыйОрдер(ТекОбъект="", ИдентификаторОбъекта="") Экспорт
вот это
Тогда
// Вместо контрагента необходимо подставить справочник Физические лица
ИдентификаторКонтрагента = ПолучитьЗначениеРеквизита("Контрагент");
Если ЗначениеЗаполнено(ИдентификаторКонтрагента) Тогда
НаименованиеСотрудника= ПолучитьЗначениеРеквизита("_1С_Наименование","Справочник.Сотрудники",ИдентификаторКонтрагента);
Если ЗначениеЗаполнено(НаименованиеСотрудника) Тогда
Попытка
УстановитьРеквизит(ТекОбъект, "Контрагент", ПолучитьФизЛицо(Неопределено,НаименованиеСотрудника));
Если НоваяСтрокаЗарплата <> Неопределено Тогда
НоваяСтрокаЗарплата.Физлицо = ТекОбъект.Контрагент;
НоваяСтрокаЗарплата.Сумма = ПолучитьЗначениеРеквизита("СуммаДокумента");
КонецЕсли;
Исключение
КонецПопытки;
КонецЕсли;
КонецЕсли;
КонецЕсли;