Регистрация обязательств и сведений по договорам
Добрый день, коллеги!
У клиента часто так бывает, что он вносит изменения в обязательствах, добавляя суммы по новым КФО, КПС и т.д. На втором изменении в проводках минусуются суммы, внесенные первоначально, хотя изменений конкретно по этим строкам никаких нет.
Подскажите, пожалуйста, почему так происходит, и как это исправить?
У клиента часто так бывает, что он вносит изменения в обязательствах, добавляя суммы по новым КФО, КПС и т.д. На втором изменении в проводках минусуются суммы, внесенные первоначально, хотя изменений конкретно по этим строкам никаких нет.
Подскажите, пожалуйста, почему так происходит, и как это исправить?
По теме из базы знаний
- Видеокурс-самоучитель "1С:Документооборот 2.1 и 3.0" для самостоятельного внедрения
- Обновление конфигураций Бухгалтерия 2, КА 1.1, ЗУП 2.5
- Внешние печатные формы для 1С:Бухгалтерии государственного учреждения 2.0 -= Все формы за 3 $m =-
- Добавление строк в регистрации обязательств по договорам с разными ИФО. БГУ 2.0
- Уведомление по расчетам между бюджетами по межбюджетным трансфертам (форма 0504817) для БГУ 2.0
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(2) Добрый день!
Ошибка похоже в модуле РаботаСОбязательствамиПовтИспНаВремяВызова в этой функции:
Функция ПолучитьТаблицуИзмененийОбязательства(Обязательство, Документ) Экспорт
СтруктураРеквизитовДокумента = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Документ, "Дата, Основание");
СтруктураРеквизитовДоговора = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Обязательство, "ВидДоговора");
Запрос = Новый Запрос;
ТекстЗапроса = "ВЫБРАТЬ
| ПФО_До.КлючАналитики.КФО КАК КФО,
| ПФО_До.КлючАналитики.КПС КАК КПС,
| ПФО_До.КлючАналитики.КЭК КАК КЭК,
| ПФО_До.КлючАналитики.Номенклатура КАК Номенклатура,
| ПФО_До.КлючАналитики.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
| ПФО_До.КлючАналитики.ПериодПлана КАК ПериодПлана,
| ПФО_До.КлючАналитики.РазделЛицевогоСчета КАК РазделЛицевогоСчета,
| ПФО_До.КлючАналитики.КодЦели КАК КодЦели,
| ПФО_До.КлючАналитики.КодМероприятия КАК КодМероприятия,
| ПФО_До.КлючАналитики.ДопКлассификация КАК ДопКлассификация,
| ПФО_До.КлючАналитики.Подразделение КАК Подразделение,
| ПФО_До.ОКП,
| ПФО_До.Сумма КАК Сумма,
| ПФО_До.СуммаВВалютеБезусловная КАК СуммаВВалютеБезусловная
|ИЗ
| РегистрСведений.ПланФинансированияОбязательств.СрезПоследних(
| &Период,
| Обязательство = &Обязательство
| И &УсловиеРегистратор) КАК ПФО_До";
Если СтруктураРеквизитовДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.ИноеОбязательство Тогда
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&УсловиеРегистратор", "Регистратор = &Регистратор");
Запрос.УстановитьПараметр("Регистратор", СтруктураРеквизитовДокумента.Основание);
Иначе
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&УсловиеРегистратор", "Регистратор <> &Регистратор");
Запрос.УстановитьПараметр("Регистратор", Документ);
КонецЕсли;
Запрос.Текст = ТекстЗапроса;
Запрос.УстановитьПараметр("Период", СтруктураРеквизитовДокумента.Дата);
Запрос.УстановитьПараметр("Обязательство", Обязательство);
ТаблицаИзменений = Запрос.Выполнить().Выгрузить();
Возврат ТаблицаИзменений;
КонецФункции
Ошибка похоже в модуле РаботаСОбязательствамиПовтИспНаВремяВызова в этой функции:
Функция ПолучитьТаблицуИзмененийОбязательства(Обязательство, Документ) Экспорт
СтруктураРеквизитовДокумента = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Документ, "Дата, Основание");
СтруктураРеквизитовДоговора = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Обязательство, "ВидДоговора");
Запрос = Новый Запрос;
ТекстЗапроса = "ВЫБРАТЬ
| ПФО_До.КлючАналитики.КФО КАК КФО,
| ПФО_До.КлючАналитики.КПС КАК КПС,
| ПФО_До.КлючАналитики.КЭК КАК КЭК,
| ПФО_До.КлючАналитики.Номенклатура КАК Номенклатура,
| ПФО_До.КлючАналитики.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
| ПФО_До.КлючАналитики.ПериодПлана КАК ПериодПлана,
| ПФО_До.КлючАналитики.РазделЛицевогоСчета КАК РазделЛицевогоСчета,
| ПФО_До.КлючАналитики.КодЦели КАК КодЦели,
| ПФО_До.КлючАналитики.КодМероприятия КАК КодМероприятия,
| ПФО_До.КлючАналитики.ДопКлассификация КАК ДопКлассификация,
| ПФО_До.КлючАналитики.Подразделение КАК Подразделение,
| ПФО_До.ОКП,
| ПФО_До.Сумма КАК Сумма,
| ПФО_До.СуммаВВалютеБезусловная КАК СуммаВВалютеБезусловная
|ИЗ
| РегистрСведений.ПланФинансированияОбязательств.СрезПоследних(
| &Период,
| Обязательство = &Обязательство
| И &УсловиеРегистратор) КАК ПФО_До";
Если СтруктураРеквизитовДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.ИноеОбязательство Тогда
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&УсловиеРегистратор", "Регистратор = &Регистратор");
Запрос.УстановитьПараметр("Регистратор", СтруктураРеквизитовДокумента.Основание);
Иначе
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&УсловиеРегистратор", "Регистратор <> &Регистратор");
Запрос.УстановитьПараметр("Регистратор", Документ);
КонецЕсли;
Запрос.Текст = ТекстЗапроса;
Запрос.УстановитьПараметр("Период", СтруктураРеквизитовДокумента.Дата);
Запрос.УстановитьПараметр("Обязательство", Обязательство);
ТаблицаИзменений = Запрос.Выполнить().Выгрузить();
Возврат ТаблицаИзменений;
КонецФункции
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот