Имя: Пароль:
1C
1C 7.7
v7: ВыполнитьЗапрос
0 gabatel
 
04.09.12
12:03
Мне нужно исключить два Корр.Счета.Почему если таким методом работает
<1C>
СписокСчетов.ДобавитьЗначение(СчетПоКоду("33.3"));
СписокСчетов.ДобавитьЗначение(СчетПоКоду("37.7.3"));
Ит = СоздатьОбъект("БухгалтерскиеИтоги");      
Ит.ИспользоватьСубконто(ВидыСубконто.РахункиБанк,, 1);
Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода,"31.1",СписокСчетов,, 2, "Месяц", "С");
</1C>
А вот если нужно перебрать все счета и исключить ненужные выводит все КоррСчета
<1C>
СписокСчетов = СоздатьОбъект("СписокЗначений");
Счет = СоздатьОбъект("Счет");
Счет.ВыбратьСчета();
Пока Счет.ПолучитьСчет() = 1 Цикл        
Если (Счет.Код = "50.1") ИЛИ (Счет.Код = "60.1") Тогда
   Продолжить;
КонецЕсли;
СписокСчетов.ДобавитьЗначение(Счет.Код);
</1C>
А если Записать КодСубсчета "50.1" тогда работает. Подскажите новичку пожалуйста,в чем проблема
1 dusn
 
04.09.12
12:08
Не совсем понятно. В первом случае ты в список добавляешь счета, а во втором случае - строковые значения. А вот "А если Записать КодСубсчета "50.1" тогда работ" - вообще не ясно.
2 gabatel
 
04.09.12
12:29
(1)
<1C>
СписокСчетов = СоздатьОбъект("СписокЗначений");
Счет = СоздатьОбъект("Счет");
Счет.ВыбратьСчета();
Пока Счет.ПолучитьСчет() = 1 Цикл
   Если Счет.ЭтоГруппа() = 1 Тогда    
       Если (Счет.Код = "50") ИЛИ (Счет.Код = "60") Тогда
           Продолжить;
       КонецЕсли;
   КонецЕсли;
СписокСчетов.ДобавитьЗначение(Счет.Код);
</1C>
А нужно так СписокСчетов.ДобавитьЗначение(СчетПоКоду(Счет.Код));
3 gabatel
 
04.09.12
12:44
Как мне передать счета в цикле в СписокЗначений?
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший