Имя: Пароль:
1C
1C 7.7
v7: Почему не показывает итоги?
,
0 patapum
 
21.12.12
15:37
1. Я не знаю почему... 100% (1)
2. Я знаю, почему! 0% (0)
3. Просто сегодня конец света! 0% (0)
Всего мнений: 1

Люди! Чувствую, разучился я на 7.7 писать, а надо из нее инфу выгрузить. Препарировал конвертацию, нашел кусок кода, который не работает. Остатки по счету 41.6 есть (как говорит ОСВ по счету), а запрос выдает пустой результат, даже на 1 уровень субконто не заходит. Итоги рассчитаны. Что это может быть???

Процедура Сформировать()
   Ит = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит.ИспользоватьСубконто(ВидыСубконто.Номенклатура,, 1);
   Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения,, 1);
   НП = Дата(2012,12,1);
   КП = Дата(2012,12,31);
   Ит.ВыполнитьЗапрос(НП, КП, "41.6",,,,,5);
   Ит.ВыбратьСубконто(1);
   Пока Ит.ПолучитьСубконто(1) = 1 Цикл
       СуммаНаСкладах = ИТ.СКД("С");
       Сообщить(СуммаНаСкладах);
   КонецЦикла;
КонецПроцедуры
1 Надсмотрщик
 
21.12.12
15:40
Сообщить(""+СуммаНаСкладах);
2 patapum
 
21.12.12
15:47
(1) не из-за этого, просто Сообщить(1) у меня отрабатывало.

Я не знаю почему...
3 ГдеСобака Зарыта
 
21.12.12
15:51
Запрос рабочий. У тебя с данными непорядок
4 patapum
 
21.12.12
15:52
(3) а где чего проверить? ОСВ по счету показывает, что остатки есть. итоги пересчитывал. что еще сделать?
5 borozavr
 
21.12.12
16:00
(0) Сообщить(Ит.Субконто(1))
   Сообщить(СКД(3))
   Сообщить(СКД(1))

Что показывает?
6 borozavr
 
21.12.12
16:01
УПС Опечатался..

   Сообщить(Ит.Субконто(1))
   Сообщить(Ит.СКД(3))
   Сообщить(Ит.СКД(1))
7 patapum
 
21.12.12
16:02
уже накодил. 1 - пусто, 2,3 - нуль
8 Надсмотрщик
 
21.12.12
16:10
А какие субконто у твоего счета?
9 пипец
 
21.12.12
16:11
Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Сформировать");
   Ит = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит.ИспользоватьПланСчетов(ОсновнойПланСчетов());
   Ит.ИспользоватьСубконто(,, 1);
   Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, ВыбСчет,,, 1,, "СК");
   Таб.ВывестиСекцию("Шапка");
   Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
   Ит.ВыбратьСубконто(1);
   Пока Ит.ПолучитьСубконто(1) = 1 Цикл
       Таб.ВывестиСекцию("Субконто1");
   КонецЦикла;
   Таб.ВывестиСекцию("Подвал");
   Таб.ТолькоПросмотр(1);
   Таб.Показать("Сформировать","");
10 borozavr
 
21.12.12
16:12
Может нестандартная аналитика на 41.6? (только обороты или что еще?)
11 patapum
 
21.12.12
16:15
(8), (10) ёшшшшшшшшшш... там только номенклатура в аналитике!
12 patapum
 
21.12.12
16:17
всем спасибо! снес Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения,, 1), все заработало
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший