Имя: Пароль:
1C
1C 7.7
v7: Остатки по счету.
,
0 bestuzhev
 
12.01.12
18:46
Блин 100 лет не писал на 7ке а тут понадобилось:
Нужно выбрать остатки по 41 счету с субконто Номенклатура и вывести это дело в таблицу. Вывести я могу а вот как выбрать остатки на определенную дату что-то не получается, так сильно привык к 8ке (как там все легко кажется). Помогите плиз. Конфа бухгалтерия.
1 Amra
 
12.01.12
18:47
Восьмерошники полезли в семерку))) Что, денег не хватает?)))
2 Sereja
 
12.01.12
18:48
(0) Читай про "БухгалтерскиеИтоги"
3 bestuzhev
 
12.01.12
18:50
(2) Прочитал не могу слепить в кучу, вот что получается

   БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги");
   БухИтоги.ВыполнитьЗапрос(,,"41");
В Выполнить запрос еще дату поставлю, а что дальше делать как-то не догоняю, как перебрать все что получил запрос.
4 Godofsin
 
12.01.12
18:52
ВыбратьСчета()
ПолучитьСчет()
Субконто
5 Godofsin
 
12.01.12
18:52
как то так, точно не помню, СП в помощь
6 Джордж1
 
12.01.12
18:55
БухИтоги.ИспользоватьСубконто
БухИтоги.ВыбратьСубконто
7 bestuzhev
 
12.01.12
18:59
Помню начал 1С с 7ки, потом перешел на 8ку почти сразу, казалось все так сложно, а теперь наоборот, 7ка пипец какой-то.
8 Джордж1
 
12.01.12
18:59
(7)у меня наоборот.
Разобрался и полностью код написать?
9 Sereja
 
12.01.12
19:03
(7)  БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги");
    БухИтоги.ИспользоватьСубконто(ВидыСубконто.Номенклатура);
    БухИтоги.ВыбратьСубконто();
    Пока БухИтоги.ПолучитьСубконто() = 1 Цикл
      ....и погнал
10 bestuzhev
 
12.01.12
19:03
(8)Напиши если не сложно у меня получается пока так, мне надо остатки по 2м счетам можно вместе по 41 и 004 я пишу так:
11 bestuzhev
 
12.01.12
19:03
БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги");
   БухИтоги.ИспользоватьСубконто(ВидыСубконто.Номенклатура);
   БухИтоги.ВыполнитьЗапрос(,,"41,004");
12 Джордж1
 
12.01.12
19:05
Конфигурация какая?
13 bestuzhev
 
12.01.12
19:05
(9) а как по счету определенному
14 bestuzhev
 
12.01.12
19:06
(12) Вообще УСН
15 bestuzhev
 
12.01.12
19:06
(12)УСН
16 Джордж1
 
12.01.12
19:08
БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги");
   БухИтоги.ИспользоватьСубконто(ВидыСубконто.Номенклатура);
   БухИтоги.ВыполнитьЗапрос(НужнаяДата,,"41,004",,,); - в каком то еще Параметре указываем "КС"
БухИтоги.ВыбратьСубконто(1);
Пока БухИтоги.ПолучитьСубконто(1)=1 Цикл

Товар = БИ.Субокнто(1);
ОстС= БИ.СНД();
ОстК= БИ.СНД("К");
17 zak555
 
12.01.12
21:29
(0) анализ субконто наше всё