Имя: Пароль:
1C
1C 7.7
v7: Помогите сделать запрос
0 Death_eye
 
26.07.11
13:04
В 7.7 не силен. Но нужно написать запрос, чтобы выбирал из документа цену товара. Известен номер документа, его дата и номенклатура.
Набросал запрос. Но перебирает доки с начала учета.

НомерПрихода = Запрос.Поставка.ПриходныйДокумент.НомерДок;
ТекНоменклатура = Запрос.Номенклатура;
ЗапросЦены = СоздатьОбъект ("Запрос");
ТекстЗапросаЦены =
"//{{Запрос(ЗапросЦены)
|НомерДок = Документ.ПоступлениеТМЦ.НомерДок;
|Номенклатура = Документ.ПоступлениеТМЦ.Номенклатура;
|Цена = Документ.ПоступлениеТМЦ.Цена;
|Условие(НомерДок = НомерПрихода);
|Условие(Номенклатура= ТекНоменклатура);
|"//}}ЗАПРОС

Помогите оптимизировать.

И еще - нет ли Консоли запросов для 7.7?
1 aka MIK
 
26.07.11
13:05
Период с НачДата;
2 Cthulhu
 
26.07.11
13:06
Блин. а что мешает БЕЗ запроса - просто получить нужные данные???
3 palpetrovich
 
26.07.11
13:07
(2) +100500
4 fedoss
 
26.07.11
13:08
(2) Восьмерочники привыкли все получать запросами ;) Даже данные текущего документа
5 catena
 
26.07.11
13:08
(0)А в условие дату добавить?
Есть конструктор запроса.
6 Cthulhu
 
26.07.11
13:11
(4): блин, да задолбали они лезть в семерку...
7 Cthulhu
 
26.07.11
13:12
(0): не надо. семерка отстой. работай себе в восьмерке.
8 fedoss
 
26.07.11
13:15
Док = СоздатьОбъект("Документ.ПоступлениеТМЦ");
Если Док.НайтиПоНомеру(НомерДок, ДатаДок) <> 1 Тогда
 Сообщить("Фигня вышла");
Иначе
 Док.ВыбратьСтроки();
 Пока Док.ПолучитьСтроку() = 1 Цикл
   Если Док.Номенклатура = ТекНоменклатура Тогда
     Цена = Док.Цена;
     Прервать;
   КонецЕсли;
 КонецЦикла;
КонецЕсли;
9 Death_eye
 
26.07.11
13:21
(8) Спасибо огромное
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.