0
MistaEr
15.10.13
✎
10:10
|
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьПланСчетов(ОсновнойПланСчетов());
Ит.ИспользоватьСубконто(,, 1);
Ит.ВыполнитьЗапрос(, ТекущийДокумент(), "58.1.1, 58.1.2, 58.2, 58.4, 76.59, 008.01, 008.02",,, 1,, "СК");
Ит.ВыбратьСчета();
Пока Ит.ПолучитьСчет() = 1 Цикл
Ит.ВыбратьСубконто(1);
Пока Ит.ПолучитьСубконто(1) = 1 Цикл
Если Ит.Счет.КоличествоСубконто() > 1 Тогда
Ит.ВыбратьСубконто(2); //здесь выдает ошибку Число фильтров субконто превысило допустимое значение!
Пока Ит.ПолучитьСубконто(2) = 1 Цикл
Если Ит.Счет.КоличествоСубконто() > 2 Тогда
Ит.ВыбратьСубконто(3);
Пока Ит.ПолучитьСубконто(3) = 1 Цикл
ДобавитьСтроку(Ит, 3);
КонецЦикла;
Иначе
ДобавитьСтроку(Ит, 2);
КонецЕсли;
КонецЦикла;
Иначе
ДобавитьСтроку(Ит, 1);
КонецЕсли;
КонецЦикла;
КонецЦикла;
Выдает ошибку Число фильтров субконто превысило допустимое значение!
Не пойму в чем проблема
|
|
1
Kreont
15.10.13
✎
10:17
|
по коду:
Ит.ИспользоватьСубконто(,, 1); один раз, а
Ит.ВыбратьСубконто 3 раза встречается.
|
|
5
zak555
15.10.13
✎
10:37
|
Ит.ИспользоватьСубконто(,, 1);
Ит.ИспользоватьСубконто(,, 1);
Ит.ИспользоватьСубконто(,, 1);
|
|