Содержание:
1. Проблемы программирования 1С 8.3
1. Проблемы программирования 1С 8.3
Вопрос "правильной" обработки результата выполнения запроса в программе 1С Бухгалтерия 8.3 – один из первых вопросов, который возникает у разработчиков 1С, встав на путь просветления когда они начинают интересоваться не только тем "чтобы код работал", но и тем "как лучше, быстрее" и другими вопросами повышения качества своего кода.
Есть два варианта. Они зависят от цели, которую требуется достичь при программировании 1С 8.3:
1-й вариант. Требуется просто проверить - результат "пустой" или не "пустой", и в зависимости от этого выполнить те или иные действия (при этом не требуется перебирать результат выполнения запроса);
2-й вариант. В дополнение к действиям, перечисленным для 1-го варианта, требуется перебрать и обработать результат выполнения запроса, если он оказался не "пустым".
2. Код в 1С 8.3
Рассмотрим оба варианта на примере выполнения работы такого запроса в коде 1С 8.3:
Запрос.УстановитьПараметр("Период",НовыйГраница(МоментВремени(),ВидГраницы.Включая));
Запрос.Текст=
"ВЫБРАТЬ
| СвободныеОстатки.Номенклатура КАК Товар,
| ПРЕДСТАВЛЕНИЕССЫЛКИ(СвободныеОстатки.Номенклатура) КАК ТоварПредставление,
| ПРЕДСТАВЛЕНИЕССЫЛКИ(СвободныеОстатки.Склад) КАК СкладПредставление,
| -СвободныеОстатки.КоличествоОстаток КАК НедостающееКоличество
|ИЗ
| РегистрНакопления.СвободныеОстатки.Остатки(
| &Период,
| (Номенклатура, Склад) В
| (ВЫБРАТЬ
| ТоварыДокумента.Товар КАК Товар,
| ТоварыДокумента.Склад КАК Склад
| ИЗ
| ТоварыДокумента КАК ТоварыДокумента)) КАК СвободныеОстатки
|ГДЕ
| СвободныеОстатки.КоличествоОстаток< 0";
РезультатЗапроса=Запрос.Выполнить();
Вариант 1:
Если не требуется перебирать результаты, то согласно рекомендациям для разработчиков на сайте ИТС официальный 1С:
Правильно:
Если НеРезультатЗапроса.Пустой()Тогда
// код, выполняемый, если результат запроса не "пустой"
Иначе
// код, выполняемый в противном случае
КонецЕсли;
Неправильно (ОШИБКА ВЫПОЛНЕНИЯ ЗАПРОСА):
Выборка =РезультатЗапроса.Выбрать();
ЕслиВыборка.Количество()Тогда
// код, выполняемый, если результат запроса не "пустой"
Иначе
// код, выполняемый в противном случае
КонецЕсли;
И совсем плохо:
ТаблЗнач=РезультатЗапроса.Выгрузить();
ЕслиТаблЗнач.Количество()Тогда
// код, выполняемый, если результат запроса не "пустой"
Иначе
// код, выполняемый в противном случае
КонецЕсли;
Вариант 2:
Если требуется перебирать результаты, то согласно рекомендациям с сайта 1С 8.3, о которых речь шла выше:
Правильно:
Выборка =РезультатЗапроса.Выбрать();
//перебор результатов запроса
Сообщение =НовыйСообщениеПользователю;
ПокаВыборка.Следующий()Цикл
Сообщение.Текст="На складе """+Выборка.СкладПредставление
+""" не хватает товара """+Выборка.ТоварПредставление
+""" в количестве "+Выборка.НедостающееКоличество+" ед.";
Сообщение.Сообщить();
КонецЦикла;
// код после перебора результатов запроса
Неправильно:
ЕслиНеРезультатЗапроса.Пустой()Тогда
//перебор результатов запроса
Выборка =РезультатЗапроса.Выбрать();
Сообщение =НовыйСообщениеПользователю;
ПокаВыборка.Следующий()Цикл
Сообщение.Текст="На складе """+Выборка.СкладПредставление
+""" не хватает товара """+Выборка.ТоварПредставление
+""" в количестве "+Выборка.НедостающееКоличество+" ед.";
Сообщение.Сообщить();
КонецЦикла;
// код после перебора результатов запроса
КонецЕсли;
То есть если Вам требуется выполнять какие-либо действия, перебирая результат и время выполнения запроса, тогда несмотря на то, что результат выполнения может оказаться "пустым", предварительно проверять это не рекомендуется. Следует сразу выбрать, какой писать код, чтобы использовал схему перебора результата выполнения запроса при работе с версиями программы 1С.
Специалист компании ООО «Кодерлайн»
Аскер Жансуев