public void ТоварыКПередачеСоСкладовКонтрольСвободныхОстатков_ПередачаТоваров(/*СтруктураШапкиДокумента, СтруктураПараметров, МетаданныеТабЧасти, Заголовок, Отказ*/)
{
//ЕстьХарактеристика = МетаданныеТабЧасти.Реквизиты.Найти("ХарактеристикаНоменклатуры") <> Неопределено;
//ЕстьСерия = МетаданныеТабЧасти.Реквизиты.Найти("СерияНоменклатуры") <> Неопределено;
//ЕстьКачество = МетаданныеТабЧасти.Реквизиты.Найти("Качество") <> Неопределено;
//ЕстьКоэффициент = МетаданныеТабЧасти.Реквизиты.Найти("Коэффициент") <> Неопределено;
/*// ПОЛУЧИМ УСЛОВИЯ ДЛЯ ВИРТУАЛЬНЫХ ТАБЛИЦ ОСТАТКОВ
*/
/*СтруктураУсловий = Новый Структура(
"ЕстьХарактеристика,ЕстьКачество",
ЕстьХарактеристика,
ЕстьКачество);*/
//СтруктураУсловий.Вставить("ИспользоватьСерииНоменклатуры", СтруктураПараметров.ИспользоватьСерииНоменклатуры);
//СтруктураУсловий.Вставить("ИспользоватьХарактеристикиНоменклатуры", СтруктураПараметров.ИспользоватьХарактеристикиНоменклатуры);
/*УсловияТаблицыОстатков = ПолучитьСтруктуруУсловийТаблицыОстатков(
СтруктураПараметров.ИмяДокумента,
СтруктураПараметров.ИмяТаблицы,
Новый Структура("Полное,БезКачества"),
СтруктураУсловий);*/
//Запрос = Новый Запрос;
/*// Установим параметры запроса
*/
//Запрос.УстановитьПараметр("ДокументСсылка", СтруктураШапкиДокумента.Ссылка);
//Запрос.УстановитьПараметр("ПустаяСерия" , Справочники.СерииНоменклатуры.ПустаяСсылка());
//Запрос.УстановитьПараметр("ПустойОрдер", Документы.ПриходныйОрдерНаТовары.ПустаяСсылка());
//Запрос.УстановитьПараметр("Склад", СтруктураШапкиДокумента.Склад);
//Запрос.УстановитьПараметр("Сделка", СтруктураШапкиДокумента.Заказ);
/*ТекстЗапроса = "
|ВЫБРАТЬ // Запрос, контролирующий остатки на складах
| Док.Номенклатура.Представление КАК НоменклатураПредставление,
| Док.Номенклатура.ЕдиницаХраненияОстатков.Представление КАК ЕдиницаХраненияОстатковПредставление,
| Неопределено КАК СерияНоменклатуры,
| %ПОЛЕ_Док_Характеристика% КАК ХарактеристикаНоменклатуры,
| %ПОЛЕ_Док_Качество% КАК Качество,
| &Склад КАК Склад,
| %ПОЛЕ_Док_Количество% КАК ДокументКоличество,
| ЕСТЬNULL(МАКСИМУМ(Резервы.КоличествоОстаток), 0) КАК РезервыКоличество,
| ЕСТЬNULL(МАКСИМУМ(РезервыПоСделке.КоличествоОстаток), 0) КАК РезервыПоСделкеКоличество,
| 0 КАК КПолучению,
| МАКСИМУМ(ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0)
| + ЕСТЬNULL(ТоварыВРозницеОстатки.КоличествоОстаток, 0)) КАК ОстаткиКоличество,
| ЕСТЬNULL(МАКСИМУМ(КПередаче.КоличествоОстаток), 0) КАК КПередачеКоличество
|ИЗ
| Документ." + СтруктураПараметров.ИмяТаблицы + " КАК Док
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыНаСкладах.Остатки(, " + УсловияТаблицыОстатков.Полное + ") КАК ТоварыНаСкладахОстатки
|ПО
| ТоварыНаСкладахОстатки.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И ТоварыНаСкладахОстатки.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
| //СОЕДИНЕНИЕ_Качество_Остатки// И ТоварыНаСкладахОстатки.Качество = Док.Качество
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыВРознице.Остатки(, " + УсловияТаблицыОстатков.Полное + ") КАК ТоварыВРозницеОстатки
|ПО
| ТоварыВРозницеОстатки.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И ТоварыВРозницеОстатки.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
| //СОЕДИНЕНИЕ_Качество_Остатки// И ТоварыВРозницеОстатки.Качество = Док.Качество
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыВРезервеНаСкладах.Остатки(," + УсловияТаблицыОстатков.БезКачества + ") КАК Резервы
|ПО
| Резервы.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И Резервы.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыВРезервеНаСкладах.Остатки(, ДокументРезерва = &Сделка
| И " + УсловияТаблицыОстатков.БезКачества + ") КАК РезервыПоСделке
|ПО
| РезервыПоСделке.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И РезервыПоСделке.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыКПередачеСоСкладов.Остатки(," + УсловияТаблицыОстатков.Полное + ") КАК КПередаче
|ПО
| КПередаче.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И КПередаче.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
| //СОЕДИНЕНИЕ_Качество_Остатки// И КПередаче.Качество = Док.Качество
|
|ГДЕ
| Док.Ссылка = &ДокументСсылка
|
|СГРУППИРОВАТЬ ПО
| Док.Номенклатура,
| %ПОЛЕ_Док_Характеристика%,
| %ПОЛЕ_Док_Качество%
|
|ИМЕЮЩИЕ
| МАКСИМУМ(ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0)
| + ЕСТЬNULL(ТоварыВРозницеОстатки.КоличествоОстаток, 0))
| - ЕСТЬNULL(МАКСИМУМ(Резервы.КоличествоОстаток), 0)
| - ЕСТЬNULL(МАКСИМУМ(КПередаче.КоличествоОстаток), 0)
| + ЕСТЬNULL(МАКСИМУМ(РезервыПоСделке.КоличествоОстаток), 0) < %ПОЛЕ_Док_Количество%
|
|ДЛЯ ИЗМЕНЕНИЯ
| РегистрНакопления.ТоварыКПередачеСоСкладов.Остатки // Блокирующие чтение таблицы остатков регистра для разрешения коллизий многопользовательской работы
|"
+ ?(ЕстьСерия, "
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ // Запрос, контролирующий остатки на складах
| Док.Номенклатура.Представление КАК НоменклатураПредставление,
| Док.Номенклатура.ЕдиницаХраненияОстатков.Представление КАК ЕдиницаХраненияОстатковПредставление,
| Док.СерияНоменклатуры КАК СерияНоменклатуры,
| %ПОЛЕ_Док_Характеристика% КАК ХарактеристикаНоменклатуры,
| %ПОЛЕ_Док_Качество% КАК Качество,
| &Склад КАК Склад,
| %ПОЛЕ_Док_Количество% КАК ДокументКоличество,
| 0 КАК РезервыКоличество,
| 0 КАК РезервыПоСделкеКоличество,
| 0 КАК КПолучению,
| МАКСИМУМ(ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0)
| + ЕСТЬNULL(ТоварыВРозницеОстатки.КоличествоОстаток, 0)) КАК ОстаткиКоличество,
| ЕСТЬNULL(МАКСИМУМ(КПередаче.КоличествоОстаток), 0) КАК КПередачеКоличество
|ИЗ
| Документ." + СтруктураПараметров.ИмяТаблицы + " КАК Док
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыНаСкладах.Остатки(," + УсловияТаблицыОстатков.Полное + ") КАК ТоварыНаСкладахОстатки
|ПО
| ТоварыНаСкладахОстатки.Склад = &Склад
| И ТоварыНаСкладахОстатки.Номенклатура = Док.Номенклатура
| И ТоварыНаСкладахОстатки.ХарактеристикаНоменклатуры = %СОЕДИНЕНИЕ_Характеристика_Остатки%
| И ТоварыНаСкладахОстатки.Качество = %СОЕДИНЕНИЕ_Качество_Остатки%
| И ТоварыНаСкладахОстатки.СерияНоменклатуры = %СОЕДИНЕНИЕ_Серия_Остатки%
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыВРознице.Остатки(," + УсловияТаблицыОстатков.Полное + ") КАК ТоварыВРозницеОстатки
|ПО
| ТоварыВРозницеОстатки.Склад = &Склад
| И ТоварыВРозницеОстатки.Номенклатура = Док.Номенклатура
| И ТоварыВРозницеОстатки.ХарактеристикаНоменклатуры = %СОЕДИНЕНИЕ_Характеристика_Остатки%
| И ТоварыВРозницеОстатки.Качество = %СОЕДИНЕНИЕ_Качество_Остатки%
| И ТоварыВРозницеОстатки.СерияНоменклатуры = %СОЕДИНЕНИЕ_Серия_Остатки%
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыВРезервеНаСкладах.Остатки(," + УсловияТаблицыОстатков.БезКачества + ") КАК Резервы
|ПО
| Резервы.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И Резервы.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
|
|ЛЕВОЕ СОЕДИНЕНИЕ
| РегистрНакопления.ТоварыКПередачеСоСкладов.Остатки(," + УсловияТаблицыОстатков.Полное + ") КАК КПередаче
|ПО
| КПередаче.Номенклатура = Док.Номенклатура
| //СОЕДИНЕНИЕ_Характеристика_Остатки// И КПередаче.ХарактеристикаНоменклатуры = Док.ХарактеристикаНоменклатуры
| //СОЕДИНЕНИЕ_Серия_Остатки// И КПередаче.СерияНоменклатуры = Док.СерияНоменклатуры
| //СОЕДИНЕНИЕ_Качество_Остатки// И КПередаче.Качество = Док.Качество
|
|ГДЕ
| Док.Ссылка = &ДокументСсылка
| И Док.СерияНоменклатуры <> &ПустаяСерия
|
|СГРУППИРОВАТЬ ПО
| Док.Номенклатура,
| Док.СерияНоменклатуры,
| %ПОЛЕ_Док_Характеристика%,
| %ПОЛЕ_Док_Качество%
|
|ИМЕЮЩИЕ
| МАКСИМУМ(ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0)
| + ЕСТЬNULL(ТоварыВРозницеОстатки.КоличествоОстаток, 0))
| - ЕСТЬNULL(МАКСИМУМ(КПередаче.КоличествоОстаток), 0) < %ПОЛЕ_Док_Количество%
|
|ДЛЯ ИЗМЕНЕНИЯ
| РегистрНакопления.ТоварыКПередачеСоСкладов.Остатки // Блокирующие чтение таблицы остатков регистра для разрешения коллизий многопользовательской работы
|", "");*/
//ТоварыКПередачеСоСкладовДополнитьТекстЗапроса(ТекстЗапроса, СтруктураПараметров, ЕстьХарактеристика, ЕстьСерия, ЕстьКачество, ЕстьКоэффициент, Ложь);
//Запрос.Текст = ТекстЗапроса;
//Выборка = Запрос.Выполнить().Выбрать();
while(true/*Выборка.Следующий()*/)
{
//СвободныйОстаток = Выборка.ОстаткиКоличество - Выборка.РезервыКоличество - Выборка.КПередачеКоличество - Выборка.КПолучению + Выборка.РезервыПоСделкеКоличество;
/*СтрокаСообщения = "Свободного остатка для резервирования " +
УправлениеЗапасами.ПредставлениеНоменклатуры(
Выборка.НоменклатураПредставление,
?(ЕстьХарактеристика, Выборка.ХарактеристикаНоменклатуры, ""),
?(ЕстьСерия, Выборка.СерияНоменклатуры, "")) +
" на складе """ + СокрЛП(Выборка.Склад) + """" +
?(ЕстьКачество, " с качеством " + Выборка.Качество, "") + " недостаточно.";*/
/*УправлениеЗапасами.ОшибкаНетОстатка(СтрокаСообщения, СвободныйОстаток, Выборка.ДокументКоличество,
Выборка.ЕдиницаХраненияОстатковПредставление, Отказ, Заголовок);*/
}
//;;
}