Имя: Пароль:
1C
1C 7.7
v7: результат запроса пустой
0 арах
 
12.03.12
12:26
Народ напомните плиз как в 77 проверить пустой ли результат запроса?

типа также как 8.2:
РезультатЗапроса = Запрос.Выполнить();

Если РезультатЗапроса.Пустой() Тогда
1 Wobland
 
12.03.12
12:27
как в 8.1 подсказать?
2 арах
 
12.03.12
12:28
нее как в 77 я забыл уже просто  семерку напрочь:)
3 aka AMIGO
 
12.03.12
12:30
Ост = СоздатьОбъект("Запрос");
   ТекстЗапроса = "//{{ЗАПРОС(Ост)
   |Товар = Регистр.ОстаткиТоваров.Товар;
   .....
   |"//}}ЗАПРОС
   ;
   Если Ост.Выполнить(ТекстЗапроса)=0 Тогда
       Сообщить("Не выполнился Ост!");
       Возврат;
   КонецЕсли;
4 арах
 
12.03.12
12:31
(3)нето это проверка отработал запрос или нет, а как проверить что в результате нихрена нет?:)
5 aka AMIGO
 
12.03.12
12:32
ТЗС = СоздатьОбъект("ТаблицаЗначений");
   Ост.Выгрузить(ТЗС,3,0);
Если ТЗС.КоличествоСтрок()=0 Тогда
   Сообщить ("Ба! а запрос-то пустой!")
КонецЕсли;
6 арах
 
12.03.12
12:33
(5) а без тз  никак?
7 Ork
 
12.03.12
12:34
(0) Самое простое включить в запрос функцию Счётчик(). Потом его проверить.
8 Ork
 
12.03.12
12:35
+(7) Примерно так :

Ост = СоздатьОбъект("Запрос");
ТекстЗапроса = "//{{ЗАПРОС(Ост)

   |Товар = Регистр.ОстаткиТоваров.Товар;
   |Функция Счётчик = Счётчик();
   .....
   |"//}}ЗАПРОС

   ;
   Если Ост.Выполнить(ТекстЗапроса)=0 Тогда
       Сообщить("Не выполнился Ост!");
       Возврат;
   КонецЕсли;
Если Запрос.Счётчик = 0 Тогда
   ...
КонецЕсли;
9 арах
 
12.03.12
12:36
(8) мдя жесть... какже всетаки в 8  проще:)
10 aka AMIGO
 
12.03.12
12:37
Если Ост.Группировка(1)=0 Тогда
Сообщить ("Все равно пустой..");
КонецЕсли;
11 aka AMIGO
 
12.03.12
12:37
(9)переходите на 8-ку, там всё реализовано © :)
12 Ork
 
12.03.12
12:38
(10) +100500
13 арах
 
12.03.12
12:39
(11) таки давно уже там, потому и интересуюсь что в 77 уже 4 года не лазил и все забыл:)
14 aka AMIGO
 
12.03.12
12:40
в (11) шютка :)