Дипломная работа: Автоматизация учета продаж в магазине компьютерной техники «COMPIX»

Скачать

Заказать новую работу

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
КонецЦикла;
Движения.Записать();
Если Режим = РежимПроведенияДокумента.Оперативный Тогда
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ОстаткиТовараОстатки.Склад,
| ОстаткиТовараОстатки.Товар,
| ОстаткиТовараОстатки.НаборСвойств,
| -ОстаткиТовараОстатки.КоличествоОстаток КАК Количество
|ИЗ
| РегистрНакопления.ОстаткиТовара.Остатки(
| ,
| Склад = &Склада
| И (Товар, НаборСвойств) В
| (ВЫБРАТЬ
|
ПеремещениеТовараСписокТоваров.Товар,
|
ПеремещениеТовараСписокТоваров.НаборСвойств
| ИЗ
|
Документ.ПеремещениеТовара.СписокТоваров КАК
ПеремещениеТовараСписокТоваров
| ГДЕ
|
ПеремещениеТовараСписокТоваров.Ссылка = &Ссылка)) КАК
ОстаткиТовараОстатки
|ГДЕ
| ОстаткиТовараОстатки.КоличествоОстаток < 0";
Запрос.УстановитьПараметр("Склада", ПеремещениеСоСклада);
Запрос.УстановитьПараметр("Ссылка", Ссылка);
РезультатЗапроса = Запрос.Выполнить();
Если НЕ РезультатЗапроса.Пустой() Тогда
Отказ = Истина;
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Сообщить("Недостаточно товара " +
ВыборкаДетальныеЗаписи.Товар + " со свойствами " + "(" +
ВыборкаДетальныеЗаписи.НаборСвойств + ")" +" в количестве " +
ВыборкаДетальныеЗаписи.Количество + " шт.");
КонецЦикла;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Документ «Начальные остатки товара»
Код формы документа «Начальные остатки товара»
Элементы.Номер.Видимость = Ложь;
Элементы.Дата.Видимость = Ложь;
Код модуля объекта «Начальные остатки товара»
Процедура ОбработкаПроведения(Отказ, Режим)
// регистр ОстаткиТовара Приход
Движения.ОстаткиТовара.Записывать = Истина;
Движение = Движения.ОстаткиТовара.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Склад = Склад;
Движение.Товар = Товар;
Движение.НаборСвойств = НаборСвойств;
Движение.Количество = Количество;
КонецПроцедуры
Источник: https://baza.diplomsite.ru/previewfile/259

Смотрите также:

ЦЕНОВАЯ ПОЛИТИКА ПРЕДПРИЯТИЯ НА ПРИМЕРЕ ООО «ДНС РИТЕЙЛ»
_archivetempпротивовоспалительные
_Роджерс Карл, Брак и его альтернативы
- Обратный порядок следования фаз 4
- Сопротивление изоляции 25
!_Лабораторные_работы_1_сем_ОУТС
!Контрольная работа (задание)