РУКОВОДИТЕЛЮ
Задача: Взаиморасчеты с контрагентами в УНФ.
Документы по продажам и закупкам есть, но не все. Надо ввести платежи. С учетом кассового метода учета затрат процедура загрузки банковской выписки для управленческого учета (УНФ) отличается от бухгалтерского. Всего две кнопки и жить стало легче.
Для каждой позиции банковской выписки теперь можно посмотреть
- Состояние взаиморасчетов с контрагентом
- Список документов по контрагенту
ИСПОЛНИТЕЛЮ
Процедура разнесения банковской выписки включает
- Идентификацию платежа, и если не удалось, то
- Определение статьи затрат/доходов при учете кассовым методом
Идентификация платежа
В систему управленческого учета попадают далеко не все документы Закупки и Продажи.
Часто закупки в интересах АХО, Услуги по ремонту, охране, медицинскому обслуживанию, аренде и др. регистрируются только в бухгалтерии.
Платежи по таким Закупкам и Продажам есть, и в управленческом учете также учитываются, но как прочие, по соответствующим статьям.
Для идентификации платежа смотрим
- Наличие задолженности по взаиморасчетам, в т.ч. отдельно по договорам, и если нет
- Наличие документов Закупки/Продажи – Счетов, Заказов (авансовые платежи)
Загрузка банковской выписки
Состояние взаиморасчетов
Документы по контрагенту
АДМИНИСТРАТОРУ
Доработка включает
- Расширение УФ_Банк
- Отчет цмВзаиморасчеты
РАЗРАБОТЧИКУ
Всего две команды в форме обработки БанкКлиент добавлены в контекстное меню Таблицы ДокументыКИмпорту
&НаКлиенте
Процедура уфб_ПоказатьДокументыКонтрагентаПосле(Команда)
Если НЕ Элементы.ДокументыКИмпорту.ТекущиеДанные = Неопределено Тогда
мКонтрагент = Элементы.ДокументыКИмпорту.ТекущиеДанные.Контрагент;
Если ЗначениеЗаполнено(мКонтрагент) И
типЗнч(мКонтрагент) = ТИП("СправочникСсылка.Контрагенты") Тогда
СтруктураОтбора = Новый Структура("Контрагент", мКонтрагент);
ПараметрыФормы = Новый Структура(
"Отбор, КлючНастроек, СформироватьПриОткрытии",
СтруктураОтбора,
"Контрагент",
Истина);
ОткрытьФорму("Обработка.ДокументыПоКритериюОтбора.Форма.СписокДокументов",
ПараметрыФормы, ЭтаФорма, УникальныйИдентификатор);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура уфб_ПоказатьСостояниеВзаиморасчетовПосле(Команда)
Если НЕ Элементы.ДокументыКИмпорту.ТекущиеДанные = Неопределено Тогда
мКонтрагент = Элементы.ДокументыКИмпорту.ТекущиеДанные.Контрагент;
Если ЗначениеЗаполнено(мКонтрагент) И
типЗнч(мКонтрагент) = ТИП("СправочникСсылка.Контрагенты") Тогда
ВариантОтчета = цмОбщиеВызовСервера.НайтиПоРеквизиту("ВариантыОтчетов",
"Наименование","Итоги по взаиморасчетам + Договоры");
УсловияОтбора = Новый Структура("Контрагент", мКонтрагент);
ПараметрыФормы = Новый Структура("Отбор, СформироватьПриОткрытии", УсловияОтбора, Истина);
ПараметрыФормы.Вставить("КлючВарианта",
цмОбщиеВызовСервера.цмВычислить("КлючВарианта", вариантОтчета));
ОткрытьФорму("Отчет.цмВзаиморасчеты.ФормаОбъекта",
ПараметрыФормы, ЭтаФорма, УникальныйИдентификатор);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Проверено на следующих конфигурациях и релизах:
- Управление нашей фирмой, редакция 3.0, релизы 3.0.12.214
Вступайте в нашу телеграмм-группу Инфостарт