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