Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2, свеженьких 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Проверка регистра по параметрам проведения заявок , Есть документ который сравнивает проведенный документ по статье и сумм          
burza Подменю пользователя
сообщение 20.03.17, 9:36
Сообщение #1

Оратор
*****
Группа: Пользователи
Сообщений: 312
Спасибо сказали: 1 раз
Рейтинг: 1

как сюда дописать еще параметр Подразделение.

Запрос
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|    ЛимитыПодразделенийСрезПоследних.Сумма КАК Лимит,
|    ЕСТЬNULL(ВыработкаБюджетаОбороты.СуммаОборот, 0) КАК УжеСписали
|ИЗ
|    РегистрСведений.ЛимитыПодразделений.СрезПоследних(&Дата, СтатьяДвиженияДенежныхСредств = &СтатьяДвиженияДенежныхСредств) КАК ЛимитыПодразделенийСрезПоследних
|        ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ВыработкаБюджета.Обороты(НАЧАЛОПЕРИОДА(&Дата, НЕДЕЛЯ), &Дата, , СтатьяДвиженияДенежныхСредств = &СтатьяДвиженияДенежныхСредств) КАК ВыработкаБюджетаОбороты
|        ПО ЛимитыПодразделенийСрезПоследних.СтатьяДвиженияДенежныхСредств = ВыработкаБюджетаОбороты.СтатьяДвиженияДенежныхСредств
|            И ЛимитыПодразделенийСрезПоследних.Подразделение = ВыработкаБюджетаОбороты.Подразделение";
Запрос.УстановитьПараметр("Дата", Источник.Дата);
Запрос.УстановитьПараметр("СтатьяДвиженияДенежныхСредств", Источник.СтатьяДвиженияДенежныхСредств);
Запрос.УстановитьПараметр("Подразделение", Источник.Подразделение);


Есть документ который сравнивает проведенный документ по статье и сумму. Надо еще по подразделению

Сообщение отредактировал Vofka - 20.03.17, 10:09

Bernet Подменю пользователя
сообщение 20.03.17, 9:50
Сообщение #2

Ветеран
Иконка группы
Группа: Местный
Сообщений: 858
Из: Місто щасливих людей
Спасибо сказали: 319 раз
Рейтинг: 0

В параметрах связи у вас указано подразделение, если вы имели в виду как отобрать по 1-му подразделению, то в этой строке:
|    РегистрСведений.ЛимитыПодразделений.СрезПоследних(&Дата, СтатьяДвиженияДенежныхСредств = &СтатьяДвиженияДенежныхСредств) КАК ЛимитыПодразделенийСрезПоследних

добавьте ещё один параметр и будет вам счастье, типа такого:
|    РегистрСведений.ЛимитыПодразделений.СрезПоследних(&Дата, СтатьяДвиженияДенежныхСредств = &СтатьяДвиженияДенежныхСредств И Подразделение = &Подразделение) КАК ЛимитыПодразделенийСрезПоследних


Signature
Дописываю конфигурации на платформе 8.х.
- Управление торговым предприятием для Украины
- Управление производственным предприятием для Украины
- Управление небольшой фирмой для Украины
- Бухгалтерия для Украины;
- Общепит для Украины
- Ресторан (Рарус)
- Розница

burza Подменю пользователя
сообщение 20.03.17, 10:06
Сообщение #3

Оратор
*****
Группа: Пользователи
Сообщений: 312
Спасибо сказали: 1 раз
Рейтинг: 1

Bernet @ Сегодня, 9:50 * ,
Не работает у меня происходит сравнение по сумме и статье дописываю это по подразделению не идет сравнение

Bernet Подменю пользователя
сообщение 20.03.17, 10:23
Сообщение #4

Ветеран
Иконка группы
Группа: Местный
Сообщений: 858
Из: Місто щасливих людей
Спасибо сказали: 319 раз
Рейтинг: 0

Ищите в сторону данных. Кстати по сумме в самом запросе я сравнения не вижу, скорее всего вы это делаете при обходе результата запроса. Вы тут сравниваете по статье + подразделение. В итоге у вас запрос выберет все строки из таблицы "ЛимитыПодразделенийСрезПоследних", где есть указанная статья и подразделение и по соединению выберет из таблицы "ВыработкаБюджетаОбороты" только те строки в которых есть такая же статья и подразделение. Если не получаете желаемый результат - копайте в сторону данных. Может в регистрах нет нужных вам записей, может по дате не проходят.


Signature
Дописываю конфигурации на платформе 8.х.
- Управление торговым предприятием для Украины
- Управление производственным предприятием для Украины
- Управление небольшой фирмой для Украины
- Бухгалтерия для Украины;
- Общепит для Украины
- Ресторан (Рарус)
- Розница

burza Подменю пользователя
сообщение 21.03.17, 11:19
Сообщение #5

Оратор
*****
Группа: Пользователи
Сообщений: 312
Спасибо сказали: 1 раз
Рейтинг: 1

Bernet @ Вчера, 10:23 * ,
Вот Полный запрос.
Процедура ДвиженияВыработкаБюджетаОбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт
//запись движений
НаборЗаписей = Источник.Движения.ВыработкаБюджета;
НоваяСтрока = НаборЗаписей.Добавить();
НоваяСтрока.СтатьяДвиженияДенежныхСредств = Источник.СтатьяДвиженияДенежныхСредств;
НоваяСтрока.Сумма = Источник.СуммаВБазовойВалюте;
НоваяСтрока.Период = Источник.Дата;
НоваяСтрока.Месяц= Источник.Дата;
НоваяСтрока.Подразделение = Источник.Подразделение;
НоваяСтрока.Регистратор = Источник.Ссылка;
НаборЗаписей.Записать();
// Проверка

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

Я в регистре сведений записываю статью,подразделение и сумму по которым надо сравнивать документы при проводке.
Статья может быть одинаковая у разных подразделений. Сейчас я делаю проводку первый рас все срабатывает говорит что нельзя больше. ну когда я меняю подразделение проводки бесконечные хотя в регистре сведений есть сумма максимум проводки.

burza @ Сегодня, 10:50 * ,
Разобрался сам.

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 19.04.24, 5:37
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!