0
Dmitry017
30.03.13
✎
23:01
|
Не могу понять, почему не видит определение процедуры (не могу пройти синтаксис-контроль
Процедура ОбработкаПроведения(Отказ, Режим)
//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
// регистр РезервыНоменклатуры Приход
Движения.РезервыНоменклатуры.Записывать = Истина;
Для Каждого ТекСтрокаТовары Из Товары Цикл
ТекущийОстаток = ОпределениеОстатка(Товары.Номенклатура.Наименование);
//если не хватает товара, выход из функции
Если ТекущийОстаток < Товары.Количество Тогда
ПоказатьПредупреждение();
Возврат;
КонецЕсли;
Движение = Движения.РезервыНоменклатуры.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Номенклатура = ТекСтрокаТовары.Номенклатура;
Движение.Склад = Склад;
Движение.Резерв = ТекСтрокаТовары.Количество;
Движение.ПоСчёту = Ссылка;
КонецЦикла;
//}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры
&НаКлиенте
Процедура ПоказатьПредупреждение()
Предупреждение("Не хватает товаров на складе", 5, "ВНИМАНИЕ!");
КонецПроцедуры // ПоказатьПредупреждение()
{Документ.Счёт.МодульОбъекта(15,4)}: Процедура или функция с указанным именем не определена (ПоказатьПредупреждение)
<<?>>ПоказатьПредупреждение(); (Проверка: Сервер)
|
|