Имя: Пароль:
1C
1C 7.7
v7: Бухгалтерский запрос
0 Sasha_uu
 
24.10.11
13:30
Код обработки:
   Ит = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит.ИспользоватьСубконто(ВидыСубконто.ОсновныеСредства);
   Ит.ВключатьСубсчета(1);
   Ит.ВыполнитьЗапрос(, РабочаяДата(), СчетПоКоду("01"),,,,"Проводка");
   
   СпрОС = СоздатьОбъект("Справочник.ОсновныеСредства");
   СпрОС.ВыбратьЭлементы();
   Пока СпрОС.ПолучитьЭлемент()=1 Цикл
       
       Если СпрОС.ЭтоГруппа()= 1 Тогда
           Продолжить;
       КонецЕсли;
       
       Если Ит.ПолучитьСубконто(1,,СпрОС.ТекущийЭлемент())=1 Тогда
           Сообщить(Ит.СКД("С"));
           
           Ит.ВыбратьПериоды();
           Пока Ит.ПолучитьПериод()= 1 Цикл
               Сообщить("Есть документ");
           КонецЦикла;
       КонецЕсли;
       
   КонецЦикла;

Код не выводит документы которые делали движения по счету 01.1.
1 vicof
 
24.10.11
13:34
Ит.ВыбратьСубконто() нет
2 Sasha_uu
 
24.10.11
13:36
я получаю субконто поиском
3 vicof
 
24.10.11
13:37
ну получай дальше
4 Sasha_uu
 
24.10.11
13:39
Добавил выбратьсубокнто(1), код не выводит доки
5 Попытка1С
 
24.10.11
13:40
(1) Мимо.
6 KishMish
 
24.10.11
13:43
Ит.ВыполнитьЗапрос(, РабочаяДата(), СчетПоКоду("01"),,,,"Проводка");
зачем тут слово проводка? тыж остатки получаешь
7 vicof
 
24.10.11
13:44
(0) Начальную дату задай
8 KishMish
 
24.10.11
13:44
+(6) а наоборот. укажи ПЕРИОД с ... по ...  тогда будут тебе документы
9 Попытка1С
 
24.10.11
13:49
(7) +1

Ну и сообщи Ит.Операция.Документ
10 Sasha_uu
 
24.10.11
14:12
Спасибо получилось