Bernet @ Вчера, 10:23
,
Вот Полный запрос.
Процедура ДвиженияВыработкаБюджетаОбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт
//запись движений
НаборЗаписей = Источник.Движения.ВыработкаБюджета;
НоваяСтрока = НаборЗаписей.Добавить();
НоваяСтрока.СтатьяДвиженияДенежныхСредств = Источник.СтатьяДвиженияДенежныхСредств;
НоваяСтрока.Сумма = Источник.СуммаВБазовойВалюте;
НоваяСтрока.Период = Источник.Дата;
НоваяСтрока.Месяц= Источник.Дата;
НоваяСтрока.Подразделение = Источник.Подразделение;
НоваяСтрока.Регистратор = Источник.Ссылка;
НаборЗаписей.Записать();
// Проверка
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ЛимитыПодразделенийСрезПоследних.Сумма КАК Лимит,
| ЕСТЬNULL(ВыработкаБюджетаОбороты.СуммаОборот, 0) КАК УжеСписали
|ИЗ
| РегистрСведений.ЛимитыПодразделений.СрезПоследних(&Дата, СтатьяДвиженияДенежныхСредств = &СтатьяДвиженияДенежныхСредств) КАК ЛимитыПодразделенийСрезПоследних
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ВыработкаБюджета.Обороты(
| НАЧАЛОПЕРИОДА(&Дата, НЕДЕЛЯ),
| &Дата,
| ,
| СтатьяДвиженияДенежныхСредств = &СтатьяДвиженияДенежныхСредств
| И Подразделение = &Подразделение) КАК ВыработкаБюджетаОбороты
| ПО ЛимитыПодразделенийСрезПоследних.СтатьяДвиженияДенежныхСредств = ВыработкаБюджетаОбороты.СтатьяДвиженияДенежныхСредств
| И ЛимитыПодразделенийСрезПоследних.Подразделение = ВыработкаБюджетаОбороты.Подразделение";
Запрос.УстановитьПараметр("Дата", Источник.Дата);
Запрос.УстановитьПараметр("СтатьяДвиженияДенежныхСредств", Источник.СтатьяДвиженияДенежныхСредств);
Запрос.УстановитьПараметр("Подразделение", Источник.Подразделение);
Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
Если Выборка.УжеСписали > Выборка.Лимит Тогда
Отказ = Истина;
Сообщить("ru = ‘Невозможно провести документ, исчерпан лимит! Возможный лимит " + Выборка.Лимит + ", вы хотите провести на общую сумму" + Выборка.УжеСписали + "‘");
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Я в регистре сведений записываю статью,подразделение и сумму по которым надо сравнивать документы при проводке.
Статья может быть одинаковая у разных подразделений. Сейчас я делаю проводку первый рас все срабатывает говорит что нельзя больше. ну когда я меняю подразделение проводки бесконечные хотя в регистре сведений есть сумма максимум проводки.
burza @ Сегодня, 10:50
,
Разобрался сам.