8.х Примеры запросов в цикле

Подскажите пожалуйста примеры запросов в цикле и как с ними бороться?

Запрос в цикле

Код:

Для каждого Cтрока Из ТЧ Цикл
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("ДатаДокумента", Дата);
   Запрос.УстановитьПараметр("ОбъектыПроката", Строка.Номенклатура);
   Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1
   |  ОстатокОбъектовОстатки.ОбъектыПроката
   |ИЗ
   |  РегистрНакопления.ОстатокОбъектов.Остатки(&ДатаДокумента, ) КАК
   |  ОстатокОбъектовОстатки
   |ГДЕ
   |  ОстатокОбъектовОстатки.ОбъектыПроката = &ОбъектыПроката
   |";
КонецЦикла;

Переделать его нужно так:

Код:

Массив = Новый Массив;

// Или создаем массив в цикле
Для каждого Строка Из ТЧ Цикл
   Массив.Добавить(Строка.Номенклатура);
КонецЦикла;

// Или выгружаем колонку ТЧ в массив
Массив = ТЧ.ВыгрузитьКолонку("Номенклатура");

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ДатаДокумента", Дата);
Запрос.УстановитьПараметр("ОбъектыПроката", Строка.Номенклатура);

Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1
|  ОстатокОбъектовОстатки.ОбъектыПроката
|ИЗ
|  РегистрНакопления.ОстатокОбъектов.Остатки(&ДатаДокумента, ) КАК
|  ОстатокОбъектовОстатки
|ГДЕ
| ОстатокОбъектовОстатки.ОбъектыПроката В (&ОбъектыПроката)
|";

Или так

Код:

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ДатаДокумента", Дата);
Запрос.УстановитьПараметр("ОбъектыПроката", Строка.Номенклатура);
Запрос.УстановитьПараметр("Ссылка", Ссылка);
Запрос.Текст = "ВЫБРАТЬ
|  ПриходнаяТЧ.Номенклатура КАК Номенклатура
|ПОМЕСТИТЬ ДокТЧ
|ИЗ
|  Документ.Приходная.ТЧ КАК ПриходнаяТЧ
|ГДЕ
|  ПриходнаяТЧ.Ссылка = &Ссылка
|;
|
|////////////////////////////////////////////////////////////
|
ВЫБРАТЬ ПЕРВЫЕ 1
|  ОстатокОбъектовОстатки.ОбъектыПроката
|ИЗ
|  РегистрНакопления.ОстатокОбъектов.Остатки(&ДатаДокумента, ) КАК
|  ОстатокОбъектовОстатки
|ГДЕ
| ОстатокОбъектовОстатки.ОбъектыПроката В (ВЫБРАТЬ ДокТЧ.Номенклатура
|  ИЗ ДокТЧ )
|";

Так правильно будет? Есть ли ошибки?

Правильно будет отбор по номенклатуре выполнить через параметры виртуальной таблицы, а не через ГДЕ.
Выбирать первые нет необходимости, т.к. это подразумевает сортировку таблицы перед собственно самим процессом выбора.
Параметр даты должен быть моментом времени, а не абсолютной датой.

Т.е. правильней будет переделать так?

Исходный:

Код:

Для каждого Cтрока Из ТЧ Цикл
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("ДатаДокумента",
      Новый Граница(Новый МоментВремени(Дата, Ссылка), ВидГраницы.Включая));
   Запрос.УстановитьПараметр("ОбъектыПроката", Строка.Номенклатура);
   Запрос.Текст = "ВЫБРАТЬ
   |  ОстатокОбъектовОстатки.ОбъектыПроката
   |ИЗ
   |  РегистрНакопления.ОстатокОбъектов.Остатки(&ДатаДокумента,
   |    ОбъектыПроката = &ОбъектыПроката) КАК ОстатокОбъектовОстатки";
КонецЦикла;

Первый вариант без запроса в цикле:

Код:

Массив = Новый Массив;

// Или создаем массив в цикле
Для каждого Строка Из ТЧ Цикл
   Массив.Добавить(Строка.Номенклатура);
КонецЦикла;

// Или выгружаем колонку ТЧ в массив
Массив = ТЧ.ВыгрузитьКолонку("Номенклатура");

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ДатаДокумента",
   Новый Граница(Новый МоментВремени(Дата, Ссылка), ВидГраницы.Включая));
Запрос.УстановитьПараметр("ОбъектыПроката", Строка.Номенклатура);

Запрос.Текст = "ВЫБРАТЬ
|  ОстатокОбъектовОстатки.ОбъектыПроката
|ИЗ
|  РегистрНакопления.ОстатокОбъектов.Остатки(&ДатаДокумента,
|    ОбъектыПроката В (&ОбъектыПроката)) КАК ОстатокОбъектовОстатки
|";

Второй вариант безе запроса в цикле:

Код:

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ДатаДокумента",
   Новый Граница(Новый МоментВремени(Дата, Ссылка), ВидГраницы.Включая));
Запрос.УстановитьПараметр("ОбъектыПроката", Строка.Номенклатура);
Запрос.УстановитьПараметр("Ссылка", Ссылка);
Запрос.Текст = "ВЫБРАТЬ
|  ПриходнаяТЧ.Номенклатура КАК Номенклатура
|ПОМЕСТИТЬ ДокТЧ
|ИЗ
|  Документ.Приходная.ТЧ КАК ПриходнаяТЧ
|ГДЕ
|  ПриходнаяТЧ.Ссылка = &Ссылка
|;
|
|////////////////////////////////////////////////////////////
|
|ВЫБРАТЬ
|  ОстатокОбъектовОстатки.ОбъектыПроката
|ИЗ
|  РегистрНакопления.ОстатокОбъектов.Остатки(&ДатаДокумента,
|     ОбъектыПроката В (ВЫБРАТЬ ДокТЧ.Номенклатура
|     ИЗ ДокТЧ )) КАК ОстатокОбъектовОстатки
|";

Исправьте меня пожалуйста если я опять где-то ошибок наделал

Добрый день!

Хочу перевести обычные формы в УФ
Подскажите как писать запросы в УФ?

Нужно, по окончании ввода по строке выполнять запрос, нужно ли запускать в режиме "Клиент -сервер" или не обязательно???

Код:

Процедура ТелАвтоПодбор()
   
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|    Документ1.Тел
|ИЗ
|    Документ.Документ1 КАК Документ1
|ГДЕ
|    Документ1.Тел = &Телефон";

Запрос.УстановитьПараметр("Телефон", "097");
Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать();

Пока Выборка.Следующий() Цикл
Сообщить(Выборка.Телефон);
КонецЦикла;
КонецПроцедуры