Имя: Пароль:
1C
1С v8
Не получается получить ВключатьСубсчета(1) по Оле
0 Popkorm
 
03.09.12
10:52
ПоДоговору=v7.CreateObject("БухгалтерскиеИтоги");
   ПоДоговору.ИспользоватьСубконто(v7.EvalExpr("ВидыСубконто.Контрагенты"));
   ПоДоговору.ИспользоватьСубконто(v7.EvalExpr("ВидыСубконто.Договоры"));
   ПоДоговору.ВключатьСубсчета(1);
   Если ПоДоговору.ВыполнитьЗапрос(ДатаПереноса2, ДатаПереноса2) = 0 Тогда
       Предупреждение("Запрос не выполнен!");
   КонецЕсли;
   
   ПоДоговору.ВыбратьСчета();
   Пока ПоДоговору.ПолучитьСчет() = 1 Цикл
       Если ПоДоговору.Счет.ЭтоГруппа()=0 Тогда
           Продолжить;
       КонецЕсли;
       
       ПоДоговору.ВыбратьСубконто(1);
       Пока ПоДоговору.ПолучитьСубконто(1) = 1 Цикл // Контрагенты
           ПоДоговору.ВыбратьСубконто(2);
           Пока ПоДоговору.ПолучитьСубконто(2) = 1 Цикл //Договора
1 Cube
 
03.09.12
10:53
1). Почему тема в v8?
2). А в ВыполнитьЗапрос() не нужно что-ли счет указывать?
2 Popkorm
 
03.09.12
11:05
(1)в 8-ку переношу,
Если ПоДоговору.ВыполнитьЗапрос(ДатаПереноса2, ДатаПереноса2)
так по всем счетам Контрагента получаю,в данном случаи ПоДоговору.ВключатьСубсчета(1); не отрабатывает
3 Cube
 
03.09.12
11:07
(2) В 8-ке нет такого синтаксиса. Это синтаксис 7-ки...
4 Popkorm
 
03.09.12
11:07
можно в ветку 7.7 перенести
Закон Брукера: Даже маленькая практика стоит большой теории.