Имя: Пароль:
1C
1C 7.7
v7: Не получается получить ВключатьСубсчета(1) по Оле
0 Popkorm
 
03.09.12
11:17
ПоДоговору=v7.CreateObject("БухгалтерскиеИтоги");
   ПоДоговору.ИспользоватьСубконто(v7.EvalExpr("ВидыСубконто.Контрагенты"));
   ПоДоговору.ИспользоватьСубконто(v7.EvalExpr("ВидыСубконто.Договоры"));
   ПоДоговору.ВключатьСубсчета(1);
   Если ПоДоговору.ВыполнитьЗапрос(ДатаПереноса2, ДатаПереноса2) = 0 Тогда
       Предупреждение("Запрос не выполнен!");
   КонецЕсли;
   
   ПоДоговору.ВыбратьСчета();
   Пока ПоДоговору.ПолучитьСчет() = 1 Цикл
       Если ПоДоговору.Счет.ЭтоГруппа()=0 Тогда
           Продолжить;
       КонецЕсли;
       
       ПоДоговору.ВыбратьСубконто(1);
       Пока ПоДоговору.ПолучитьСубконто(1) = 1 Цикл // Контрагенты

           ПоДоговору.ВыбратьСубконто(2);
           Пока ПоДоговору.ПолучитьСубконто(2) = 1 Цикл //Договора
1 Cube
 
03.09.12
11:18
2 Popkorm
 
03.09.12
11:20
(1)просил там перенести в ветку 7.7...........
3 Cube
 
03.09.12
11:22
(2) И что? Перенесут, когда увидят... Тут некоммерческий ресурс, денег на модераторов 24/7 нет. Требовать оперативности в пределах минуты не стоит, а то можно и в бан улететь...
4 Popkorm
 
03.09.12
11:24
(3)да я понял,что ругаться сразу!!!!!!!!!!!!
5 Popkorm
 
03.09.12
12:07
разобрался,тему закрываем
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.