Имя: Пароль:
1C
1C 7.7
v7: Запрос по остаткам ТМЦ
0 Масянька
 
02.08.12
10:54
День добрый!
Подскажите, пожалуйста, где ошибка:

Процедура ПоКнопкеОстатки()

   СпрСклад = СоздатьОбъект("Справочник.Склады");
   СпрСклад.НайтиПоКоду("00004");
   Материалы = СпрСклад.ТекущийЭлемент();
   
   ДатаКонца = ДатаДок;
   Запрос = СоздатьОбъект("Запрос");

   ТекстЗапроса =
   "//{{ЗАПРОС(Сформировать)
   |Период с ДатаКонца по ДатаКонца;
   |Фирма            = Регистр.ОстаткиТМЦ.Фирма;
   |УпрАналитика    = Регистр.ОстаткиТМЦ.Фирма.УпрАналитика;
   |ЮрЛицо        = Регистр.ОстаткиТМЦ.Фирма.ЮрЛицо;
   |Номенклатура    = Регистр.ОстаткиТМЦ.Номенклатура;
   |Склад            = Регистр.ОстаткиТМЦ.Склад;  
   |Количество = Регистр.ОстаткиТМЦ.Количество;
   |Группировка Номенклатура Без Групп;
   |Условие (Склад = Материалы);";  
   
   Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
       Предупреждение("Нет остатков.");
       Возврат;
   Иначе
       Пока (Запрос.Группировка("Номенклатура") = 1) Цикл
Сообщить("1 - " + Запрос.Номенклатура + " - " + Запрос.Количество);            
       КонецЦикла;

   КонецЕсли;  
   
КонецПроцедуры    // ПоКнопкеОстатки

Сообщить - ничего не выводит:(((
Спасибо.
1 Ёпрст
 
гуру
02.08.12
10:56
(0) воткни и наслаждайся
|Функция Останки = КонОст(Количество);
2 Ork
 
02.08.12
10:57
|Количество = Регистр.ОстаткиТМЦ.Количество;
|//Вставить сюда
|Функция КонОст = КонОст(Количество);
|//Конец вставки
|Группировка Номенклатура Без Групп;

Это заменить на :
Сообщить("1 - " + Запрос.Номенклатура + " - " + Запрос.Количество);

Сообщить("1 - " + Запрос.Номенклатура + " - " + Запрос.КонОст);
3 Масянька
 
02.08.12
11:02
Мужчины! Вы - лучшие из лучших! СПАСИБО!
4 Злопчинский
 
02.08.12
15:15
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
       Предупреждение("Нет остатков.");
       Возврат;
.
Выполнить(<?>)
Синтаксис:
Выполнить(<ТекстЗапроса>)
Назначение:
Выполнить запрос.
Возвращает: 1 - если запрос выполнен, 0 - иначе.
Параметры:
.
когда нет остатков - это тоже РЕЗУЛЬТАТ, то есть =1, а вот если 0 - 'nj ,zrf d pfghjct