|
v7: выполнить запрос |
☑ |
0
Hugy
22.11.12
✎
15:58
|
Сч60 = СчетПоКоду("60");
Сч18 = СчетПоКоду("18.3");
Ит=СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто("Контрагенты");
Ит.ВыполнитьЗапрос (ДатаНач, ДатаКон, "60, 18.3",);
Ит.ВыбратьСчета();
Пока Ит.ПолучитьСчет() = 1 Цикл
Ит.ВыбратьСубконто(1);
Пока Ит.ПолучитьСубконто(1) = 1 Цикл
Если Ит.Счет.Код = Сч60.Код Тогда
Берёт только счёт 18.3. Пробовал в 2 запроса выдаёт ошибку "Данная операция допустима только в режиме запроса по аналитике".
|
|
1
vladko
22.11.12
✎
16:34
|
Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты,,1);
|
|
2
Hugy
22.11.12
✎
16:45
|
Все равно выдаёт ошибку о запросе о аналитике.
|
|
3
Hugy
22.11.12
✎
17:49
|
Ит=СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты,1);
Ит.ВыполнитьЗапрос (ДатаНач, ДатаКон, "60");
Ит.ВыполнитьЗапрос (ДатаНач, ДатаКон, "18.3");
Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты,1);
Ит.ВыбратьСчета();
Пока Ит.ПолучитьСчет() = 1 Цикл
Ит.ВыбратьСубконто(1);
Пока Ит.ПолучитьСубконто(1) = 1 Цикл
Если Ит.Счет.Код = Сч60.Код Тогда
ТЗ.НоваяСтрока();
ТЗ.Код = Ит.Субконто(1).Код;
ТЗ.ДЕБЕТ = Ит.СНД(Число(Сч60));
ТЗ.КРЕДИТ = Ит.СНК(Число(Сч60));
КонецЕсли;
Если Ит.Счет.Код = Сч18.Код Тогда
ТЗ.ДЕБЕТНДС = Ит.СНД(Число(Сч18));
ТЗ.КРЕДИТНДС = Ит.СНК(Число(Сч18));
КонецЕсли;
|
|
4
vladko
22.11.12
✎
17:56
|
какая-то фигня, ты хоть отладчиком пройдись по коду хотя бы раз.
А вообще, в твоём случае надо воспользоваться конструктором бух.итогов. Как только добьёшься нужный тебе цифр на экране, уже переходи к заполнению ТЗ
|
|
5
zak555
22.11.12
✎
17:56
|
что такое 18.3 ?
|
|
6
vladko
22.11.12
✎
17:57
|
у белорусов вроде бы аналог нашего российского 19.3
|
|