Цитата: Ветер в поле от 08 декабря 2025, 10:45Если есть работа со сканером, то постоянно на такие проблемы натыкаешься...Про мышей, кактус и работу со сканером ИСКЛЮЧИТЕЛЬНО в режиме эмуляции COM-порта я промолчу... Со ВнешнегоСобытия данные прилетают в то поле, которое вы хотите, и никуда фокус не убегает...
ТЗ_НДС = СоздатьОбъект("ТаблицаЗначений");
ТЗ_НДС.НоваяКолонка("ВидДеятельности");
ТЗ_НДС.НоваяКолонка("СтавкаНДС");
ТЗ_НДС.НоваяКолонка("НДС","Число");
// по каждой строке документа заполняешь НДС по ставкам по видам деятельности
//...
ТЗ_НДС.Свернуть("ВидДеятельности,СтавкаНДС","НДС");
ТЗ_НДС.ВЫбратьСтроки();
Пока ТЗ_НДС.ПолучитьСтроку() = 1 Цикл
Если ТЗ_НДС.НДС <> 0 Тогда
Операция.НоваяПроводка();
Операция.ПервичныйДокумент = глПредставлениеПервичногоДокумента(Контекст);
Операция.НомерЖурнала = "ТВ";
Операция.СодержаниеПроводки = "Начислен НДС";
Операция.Дебет.Счет = СчетПоКоду("90.3");
Операция.Дебет.Субконто(1, ТЗ_НДС.ВидДеятельности);
Операция.Дебет.Субконто(2, ТЗ_НДС.СтавкаНДС);
Операция.Кредит.Счет = СчетПоКоду("68.2");
Операция.Кредит.ВидыПлатежейВБюджет = Перечисление.ВидыПлатежейВБюджет.Налог;
Операция.Сумма = ТЗ_НДС.НДС;
КонецЕсли;
КонецЦикла;
Цитата: Злоп от 08 декабря 2025, 17:40как у них 90.3 по кредиту закроется...Ну и опять же - если документ вкорячен в типовую Бухию, то "ЗакрытиеМесяца" всё сделает чётко.