Добрый день уважаемые коллеги. Помогите дилетанту разобраться.
Есть обработка, которая создает счет-фактуру и делает определенные движения по в ней. Сейчас это выглядит так (см.рис 1), на сколько я понимаю эти записи создает следующий код. (см.рис.2). Стоит задача сделать так, чтобы данная обработка делала движения еще по другим счетам во второй строчке (см.рис.3). Делаю следующую вставку в коде (см.рис.4) но ничего не происходит. Подскажите что не так делаю. Заранее Спасибо!
Есть обработка, которая создает счет-фактуру и делает определенные движения по в ней. Сейчас это выглядит так (см.рис 1), на сколько я понимаю эти записи создает следующий код. (см.рис.2). Стоит задача сделать так, чтобы данная обработка делала движения еще по другим счетам во второй строчке (см.рис.3). Делаю следующую вставку в коде (см.рис.4) но ничего не происходит. Подскажите что не так делаю. Заранее Спасибо!
Прикрепленные файлы:
По теме из базы знаний
- Загрузка номенклатуры c картинками (несколько потоков одновременно) и сопутствующими данными в базу и любые документы из yml, xls, xlsx, xlsm, ods, ots, csv для УТ 10.3, УТ 11 (все), БП 3, КА 2, ERP 2, УНФ 1.6/3.0, Розница 2/3.0
- [БП 3.0] Свертка БП 2.0 или БП 3.0 документами "Ввод начальных остатков" в БП 3.0 beta
- Создание РКО на основании документа Зарплата к выплате, для депонированной зарплаты
- Доработка проведения типовых документов в УТ 11.4, КА 2.4, ЕРП 2.4
- Пример создания документа с движениями в ERP 2.5.7
Найденные решения
рабочий код проверил
ПроводкиСФБУ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
ПроводкиСФБУ.Отбор.Регистратор.Установить(Сф);
ПроводкиСФБУ.Записать(); //очищаем текущие
СтрСФ = ПроводкиСФБУ.Добавить();
СтрСФ.Активность = Истина;
СтрСФ.Период = СФ.Дата;
СтрСФ.СчетДт = ПланыСчетов.Хозрасчетный.РасчетыНДСНалоговогоАгента;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетДт, СтрСФ.СубконтоДт,1 , Сф.контрагент);
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетДт, СтрСФ.СубконтоДт,2 , Сф.ДоговорКонтрагента);
СтрСФ.СчетКт = ПланыСчетов.Хозрасчетный.НДСНалоговогоАгентаПоОтдельнымВидамТоваров;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетКт, СтрСФ.СубконтоКт,1 , Перечисления.ВидыПлатежейВГосБюджет.Налог);
СтрСФ.Сумма = СуммаНДС;
//Сергей Шахов
СтрСф2 = ПроводкиСФБУ.Добавить();
СтрСф2.Активность = Истина;
СтрСФ2.Период = СФ.Дата;
СтрСФ2.СчетДт = ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетДт, СтрСФ.СубконтоДт,1 , Сф.контрагент);
СтрСф2.СчетКт = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетКт, СтрСФ.СубконтоКт,1 , Сф.Контрагент);
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетКт, СтрСФ.СубконтоКт,2 , Выборка.Документ);
ПроводкиСФБУ.Записать();
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(4)
Если Выборка.СФ <> Null Тогда
ПроводкиСФБУ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
ПроводкиСФБУ.Отбор.Регистратор.Установить(Выборка.СФ);
ПроводкиСФБУ.Прочитать();
СФПроводки = ПроводкиСФБУ.Выгрузить();
КоличСФПроводок = СФПроводки.Количество();
а = 0;
Если КоличСФПроводок = 0 Тогда
СтрСФ = СФПроводки.Добавить();
СтрСФ.Активность = Истина;
СтрСФ.Период = Выборка.СФ.Дата;
СтрСФ.СчетДт = ПланыСчетов.Хозрасчетный.РасчетыНДСНалоговогоАгента;
СтрСФ.ВидСубконтоДт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты;
СтрСФ.СубконтоДт1 = Выборка.Контрагент;
СтрСФ.ВидСубконтоДт2 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры;
СтрСФ.СубконтоДт2 = Выборка.ДоговорКонтрагента;
СтрСФ.СчетКт = ПланыСчетов.Хозрасчетный.НДСНалоговогоАгентаПоОтдельнымВидамТоваров;
СтрСФ.ВидСубконтоКт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ВидыПлатежейВГосБюджет;
СтрСФ.СубконтоКт1 = Перечисления.ВидыПлатежейВГосБюджет.Налог;
СтрСФ.Сумма = СуммаНДС;
//Сергей Шахов
СтрСф2 = СфПроводки.Добавить();
СтрСф2.Активность = Истина;
СтрСФ2.Период = Выборка.СФ.Дата;
СтрСФ2.СчетДт = ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
СтрСФ2.ВидСубконтоДт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ПрочиеДоходыИРасходы.Наименование = "Налоги и сборы";
СтрСф2.СчетКт = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ;
СтрСф2.ВидСубконтоКт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты;
СтрСФ2.СубконтоКт1 = Выборка.Контрагент;
СтрСф2.СубконтоКт2 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ДокументыРасчетовСКонтрагентами;
СтрСф2.СубконтоКт2 = Выборка.Документ;
Иначе
СФПроводки.Очистить();
СтрСФ = СФПроводки.Добавить();
СтрСФ.Активность = Истина;
СтрСФ.Период = Выборка.СФ.Дата;
СтрСФ.СчетДт = ПланыСчетов.Хозрасчетный.РасчетыНДСНалоговогоАгента;
СтрСФ.ВидСубконтоДт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты;
СтрСФ.СубконтоДт1 = Выборка.Контрагент;
СтрСФ.ВидСубконтоДт2 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры;
СтрСФ.СубконтоДт2 = Выборка.ДоговорКонтрагента;
СтрСФ.СчетКт = ПланыСчетов.Хозрасчетный.НДСНалоговогоАгентаПоОтдельнымВидамТоваров;
СтрСФ.ВидСубконтоКт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ВидыПлатежейВГосБюджет;
СтрСФ.СубконтоКт1 = Перечисления.ВидыПлатежейВГосБюджет.Налог;
СтрСФ.Сумма = СуммаНДС;
//Сергей Шахов
СтрСф2 = СфПроводки.Добавить();
СтрСф2.Активность = Истина;
СтрСФ2.Период = Выборка.СФ.Дата;
СтрСФ2.СчетДт = ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
СтрСФ2.ВидСубконтоДт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ПрочиеДоходыИРасходы.Наименование = "Налоги и сборы";
СтрСф2.СчетКт = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ;
СтрСф2.ВидСубконтоКт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты;
СтрСФ2.СубконтоКт1 = Выборка.Контрагент;
СтрСф2.СубконтоКт2 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ДокументыРасчетовСКонтрагентами;
СтрСф2.СубконтоКт2 = Выборка.Документ;
КонецЕсли;
ПроводкиСФБУ.Загрузить(СФПроводки);
ПроводкиСФБУ.Записать(Истина);
Показать
(4)
Если Выборка.СФ <> Null Тогда
ПроводкиСФБУ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
ПроводкиСФБУ.Отбор.Регистратор.Установить(Выборка.СФ);
ПроводкиСФБУ.Записать(); //очищаем текущие
СтрСФ = ПроводкиСФБУ.Добавить();
СтрСФ.Активность = Истина;
СтрСФ.Период = Выборка.СФ.Дата;
СтрСФ.СчетДт = ПланыСчетов.Хозрасчетный.РасчетыНДСНалоговогоАгента;
СтрСФ.ВидСубконтоДт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты;
СтрСФ.СубконтоДт1 = Выборка.Контрагент;
СтрСФ.ВидСубконтоДт2 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры;
СтрСФ.СубконтоДт2 = Выборка.ДоговорКонтрагента;
СтрСФ.СчетКт = ПланыСчетов.Хозрасчетный.НДСНалоговогоАгентаПоОтдельнымВидамТоваров;
СтрСФ.ВидСубконтоКт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ВидыПлатежейВГосБюджет;
СтрСФ.СубконтоКт1 = Перечисления.ВидыПлатежейВГосБюджет.Налог;
СтрСФ.Сумма = СуммаНДС;
//Сергей Шахов
СтрСф2 = ПроводкиСФБУ.Добавить();
СтрСф2.Активность = Истина;
СтрСФ2.Период = Выборка.СФ.Дата;
СтрСФ2.СчетДт = ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
СтрСФ2.ВидСубконтоДт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ПрочиеДоходыИРасходы.Наименование = "Налоги и сборы";
СтрСф2.СчетКт = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ;
СтрСф2.ВидСубконтоКт1 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты;
СтрСФ2.СубконтоКт1 = Выборка.Контрагент;
СтрСф2.СубконтоКт2 = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ДокументыРасчетовСКонтрагентами;
СтрСф2.СубконтоКт2 = Выборка.Документ;
КонецЕсли;
ПроводкиСФБУ.Записать();
Показать
рабочий код проверил
ПроводкиСФБУ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
ПроводкиСФБУ.Отбор.Регистратор.Установить(Сф);
ПроводкиСФБУ.Записать(); //очищаем текущие
СтрСФ = ПроводкиСФБУ.Добавить();
СтрСФ.Активность = Истина;
СтрСФ.Период = СФ.Дата;
СтрСФ.СчетДт = ПланыСчетов.Хозрасчетный.РасчетыНДСНалоговогоАгента;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетДт, СтрСФ.СубконтоДт,1 , Сф.контрагент);
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетДт, СтрСФ.СубконтоДт,2 , Сф.ДоговорКонтрагента);
СтрСФ.СчетКт = ПланыСчетов.Хозрасчетный.НДСНалоговогоАгентаПоОтдельнымВидамТоваров;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетКт, СтрСФ.СубконтоКт,1 , Перечисления.ВидыПлатежейВГосБюджет.Налог);
СтрСФ.Сумма = СуммаНДС;
//Сергей Шахов
СтрСф2 = ПроводкиСФБУ.Добавить();
СтрСф2.Активность = Истина;
СтрСФ2.Период = СФ.Дата;
СтрСФ2.СчетДт = ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетДт, СтрСФ.СубконтоДт,1 , Сф.контрагент);
СтрСф2.СчетКт = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ;
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетКт, СтрСФ.СубконтоКт,1 , Сф.Контрагент);
БухгалтерскийУчет.УстановитьСубконто(СтрСФ.СчетКт, СтрСФ.СубконтоКт,2 , Выборка.Документ);
ПроводкиСФБУ.Записать();
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот