Задача № 2.34 "Плохие серии"

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

Запрос.УстановитьПараметр("Ссылка", Ссылка);
Результат = Запрос.Выполнить();
Если не Результат.Пустой() тогда
Выборка = Результат.Выбрать();
Пока Выборка.Следующий() Цикл
Сообщить("У товара " + Выборка.Номенклатура + " " + Выборка.Характеристика + " недоброкачественная серия " + Выборка.Серия);
КонецЦикла;
Отказ = истина;
КонецЕсли;

4. Создаем простой Отчет СводкаПоНедоброкачественнымСериям
ВЫБРАТЬ
НеДоброкачественныеСерии.Номенклатура,
НеДоброкачественныеСерии.Серия,
ТоварыНаСкладахОстатки.ВНаличииОстаток КАК Остаток,
ДвиженияСерийТоваров.Количество,
ДвиженияСерийТоваров.Период КАК Дата,
ДвиженияСерийТоваров.Регистратор,
ДвиженияСерийТоваров.Регистратор.Партнер КАК Партнер,
НеДоброкачественныеСерии.Характеристика
ИЗ
РегистрСведений.НеДоброкачественныеСерии КАК НеДоброкачественныеСерии
ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыНаСкладах.Остатки({(&ТекущаяДата)}, ) КАК ТоварыНаСкладахОстатки
ПО НеДоброкачественныеСерии.Номенклатура = ТоварыНаСкладахОстатки.Номенклатура
И НеДоброкачественныеСерии.Серия = ТоварыНаСкладахОстатки.Серия
И НеДоброкачественныеСерии.Характеристика = ТоварыНаСкладахОстатки.Характеристика
ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ДвиженияСерийТоваров КАК ДвиженияСерийТоваров
ПО НеДоброкачественныеСерии.Номенклатура = ДвиженияСерийТоваров.Номенклатура
И НеДоброкачественныеСерии.Серия = ДвиженияСерийТоваров.Серия
И НеДоброкачественныеСерии.Характеристика = ДвиженияСерийТоваров.Характеристика

5. Устанавливаем в отчет в раздел Закупки. Запускаем предприятие с параметром \С ЗапуститьОбновлениеИнформационнойБазы.