Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
15 Дек 2017, 07:43
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Пороги. Не пойму...  (Прочитано 1511 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Maxwell

  • *
  • Сообщений: 2
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2010-05-20
  • Сайт: 
Наверно, поднимаю избитый вопрос, но решение именно этой задачи не могу найти... Короче, задача следующая:
Для каждого элемента справочника "номенклатура", в форме элемента, существует возможность задания числового "порога", т.е. при привышении данного количества единиц товара в документе "Внутренний заказ" проведение блокируется и выдаётся сообщение.
Видел массу решений похожих задач, но адаптировать для этой не получается. Подскажите что-нибудь, PLZ


Оффлайн cubase

  • *
  • Сообщений: 15
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2010-05-21
  • Сайт: 
  • Профессия: Бухгалтер
допустим что у справочника Номенклатура есть реквизит "ПорогКоличества" тип число

в модуле Документа  в процедуре ПередЗаписью

ТЗ_Товары = Товары.Выгрузить( ,"Номенклатура,Количество");       
   Запрос =Новый Запрос;
   Запрос.Текст ="
   |  ВЫБРАТЬ Источник.Номенклатура ,Источник.Количество
   |  Поместить ВремТаблица
   |  ИЗ
   |  &Источник как Источник ;
   |   
   |  ВЫБРАТЬ Ссылка,
   |  ПорогКоличества ,
   |  ВремТаблица.Номенклатура,
   |  ВремТаблица.Количество
   |  ИЗ
   |  Справочник.Номенклатура как спрНоменклатура
   |  Внутреннее Соединение
   |  ВремТаблица
   |  ПО
   |  спрНоменклатура.Ссылка = ВремТаблица.Номенклатура
   |  И ПорогКоличества < ВремТаблица.Количество
           |  ";
      
   Запрос.УстановитьПараметр("Источник",ТЗ_Товары);
   Выборка =Запрос.Выполнить().Выбрать();
   Если Выборка.Следующий() Тогда   
      Сообщить("Количество номенклатуры превышает порог!" , СтатусСообщения.Важное);
      Отказ =Истина;
   КонецЕсли;   

Оффлайн Maxwell

  • *
  • Сообщений: 2
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2010-05-20
  • Сайт: 
Спасибо. Вроде заработало


Теги:
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
176 Сообщений
ilyay ilyay
69 Сообщений
oleg-x
48 Сообщений
alex0402
44 Сообщений
AIFrame
41 Сообщений
andron81_81
38 Сообщений
MuI_I_Ika MuI_I_Ika
33 Сообщений
Golickoff Golickoff
31 Сообщений
BuhRust
30 Сообщений
Dima Dddd Dima Dddd
26 Сообщений

* Кто онлайн

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal