|
v7: Бухгалтерские итоги | ☑ | ||
---|---|---|---|---|
0
holyguest
04.09.14
✎
10:41
|
Добрый день! Помогите, пожалуйста, разобраться. Скорее всего я просто не понимаю чего-то в механизме формирования Бух. Итогов. Проблема такая: мне нужно получить бух итоги по счёту развернутые по одному субконто и отобранные по второму. Второе субконто - подразделения. В цикле, перебирая справочник подразделений, я пытаюсь получить итоги по всем подразделениям по очереди, но, в итоге, получаю только по первому. По остальным не выбирается. Код:
П р о ц е д у р а В ы п о л н и т ь ( ) Б у х г а л т е р с к и е И т о г и = С о з д а т ь О б ъ е к т ( " Б у х г а л т е р с к и е И т о г и " ) ; Б у х г а л т е р с к и е И т о г и . И с п о л ь з о в а т ь Р а з д е л и т е л ь У ч е т а ( " " ) ; Б у х г а л т е р с к и е И т о г и . В к л ю ч а т ь С у б с ч е т а ( 0 ) ; С ч е т = С ч е т П о К о д у ( " 4 4 . 1 " ) ; Е с л и С ч е т . К о л и ч е с т в о С у б к о н т о ( ) < > 2 Т о г д а С о о б щ и т ь ( " У с ч ё т а 4 4 . 1 и з м е н и л о с ь к о л и ч е с т в о с у б к о н т о . В н е с и т е с о о т в е т с т в у ю щ и е и з м е н е н и я в п р о ц е д у р у в ы г р у з к и " ) ; В о з в р а т ; И н а ч е Н а з н а ч и т ь С ч е т ( В и д С у б к о н т о 1 , С ч е т , 1 ) ; Н а з н а ч и т ь С ч е т ( В и д С у б к о н т о 2 , С ч е т , 2 ) ; К о н е ц Е с л и ; Б у х г а л т е р с к и е И т о г и . И с п о л ь з о в а т ь С у б к о н т о ( В и д С у б к о н т о 1 , , 1 , 0 ) ; С п р а в о ч н и к П о д р а з д е л е н и й = С о з д а т ь О б ъ е к т ( " С п р а в о ч н и к . П о д р а з д е л е н и я " ) ; Е с л и С п р а в о ч н и к П о д р а з д е л е н и й . В ы б р а т ь Э л е м е н т ы ( ) = 0 Т о г д а С о о б щ и т ь ( " О т с у т с т в у ю т э л е м е н т ы в с п р а в о ч н и к е п о д р а з д е л е н и й ! " ) ; В о з в р а т ; К о н е ц Е с л и ; П о к а С п р а в о ч н и к П о д р а з д е л е н и й . П о л у ч и т ь Э л е м е н т ( ) = 1 Ц и к л П о д р а з д е л е н и е = С п р а в о ч н и к П о д р а з д е л е н и й . Т е к у щ и й Э л е м е н т ( ) ; Е с л и ( П о д р а з д е л е н и е . П о м е т к а У д а л е н и я ( ) = 1 ) и л и ( П о д р а з д е л е н и е . К о д = " 1 4 " ) Т о г д а П р о д о л ж и т ь ; К о н е ц Е с л и ; С о о б щ и т ь ( П о д р а з д е л е н и е . Н а и м е н о в а н и е ) ; Б у х г а л т е р с к и е И т о г и . И с п о л ь з о в а т ь С у б к о н т о ( В и д С у б к о н т о 2 , П о д р а з д е л е н и е , 2 , 0 ) ; Е с л и Б у х г а л т е р с к и е И т о г и . В ы п о л н и т ь З а п р о с ( Н а ч а л о П е р и о д а , К о н е ц П е р и о д а , С ч е т ) = 0 Т о г д а В о з в р а т ; К о н е ц Е с л и ; Е с л и Б у х г а л т е р с к и е И т о г и . В ы б р а т ь С у б к о н т о ( 0 ) = 1 Т о г д а С о о б щ и т ь ( " Е с т ь э л е м е н т ы " ) ; И н а ч е С о о б щ и т ь ( " Н е т э л е м е н т о в " ) ; К о н е ц Е с л и ; ; П о к а Б у х г а л т е р с к и е И т о г и . П о л у ч и т ь С у б к о н т о ( ) = 1 Ц и к л С о о б щ и т ь ( Б у х г а л т е р с к и е И т о г и . П р е д с т а в л е н и е С у б к о н т о ( ) + " : " + Б у х г а л т е р с к и е И т о г и . Д О ( ) ) К о н е ц Ц и к л а ; К о н е ц Ц и к л а ; К о н е ц П р о ц е д у р ы Результаты: А д м и н и с т р а ц и я Е с т ь э л е м е н т ы А м о р т и з а ц и я о с н о в н ы х с р е д с т в : 0 А Р Е Н Д А : 2 1 0 0 0 0 Г С М и з а п ч а с т и н а а в т о м о б и л ь : 1 0 4 5 0 И Н К А С С А Ц И Я : 0 Н а л о г и и с б о р ы : 0 О Б О Р У Д О В А Н И Е : 0 О П Л А Т А Т Р У Д А : 2 7 3 3 4 6 . 3 8 О Р Г Т Е Х Н И К А : 4 5 6 0 О Х Р А Н А : 0 П о т е р и т о в а р о в и т е х н о л о г и ч е с к и е о т х о д ы : 0 П Р О Ч И Е Р А С Х О Д Ы : 1 3 2 0 Р а с х о д ы з а р е г и с т р а ц и ю а в т о м о б и л я : 0 Р а с х о д ы н а К О М А Н Д И Р О В К И : 0 Р а с х о д ы н а б е н з и н : 0 Р а с х о д ы н а К А Н Ц Е Л Я Р С К И Е т о в а р ы : 1 5 3 1 9 . 2 3 Р а с х о д ы н а м е б е л ь : 0 Р а с х о д ы н а о б с л у ж и в а н и е а в т о м о б и л я : 0 Р а с х о д ы н а п о д г о т о в к у и п е р е п о д г о т о в к у к а д р о в : 0 Р а с х о д ы н а П О Д П И С К У , к о н с у л ь т а н т : 1 1 9 7 9 . 5 Р а с х о д ы н а п о ч т о в ы е , т е л е ф о н н ы е , т е л е г р а ф н ы е у с , : 0 Р а с х о д ы н а р е м о н т о с н о в н ы х с р е д с т в а р е н д о в а н н ы х : 0 Р Е К Л А М А ( п о н о р м а т и в у ) : 1 1 2 5 0 Т р а н с п о р т н ы е р а с х о д ы : 0 У С Л У Г И С В Я З И : 5 2 6 4 . 0 8 Х О З . Н У Ж Д Ы : 7 3 2 7 . 1 1 Подразделение 2 Н е т э л е м е н т о в Подразделение 3 Н е т э л е м е н т о в Подразделение 4 Н е т э л е м е н т о в Подразделение 5 Н е т э л е м е н т о в Подразделение 6 Н е т э л е м е н т о в Подразделение 7 Н е т э л е м е н т о в Подразделение 8 Н е т э л е м е н т о в Подразделение 9 Н е т э л е м е н т о в Подразделение 10 Н е т э л е м е н т о в Подразделение 11 Н е т э л е м е н т о в Подразделение 12 Н е т э л е м е н т о в Подразделение 13 Н е т э л е м е н т о в Подразделение 14 Н е т э л е м е н т о в Подразделение 15 Н е т э л е м е н т о в P.S.: 1С v7.7 Сетевая (7.70.027) Бух. учёт, редакция 4.5 (7.70.479) |
|||
1
Ненавижу 1С
гуру
04.09.14
✎
10:43
|
Это че за ХУЛИСТИНГ?
|
|||
2
holyguest
04.09.14
✎
10:49
|
Пардон, подскажите как вставить код, чтобы отображался корректно
|
|||
3
holyguest
04.09.14
✎
13:10
|
Подскажите, как удалить тему или отредактировать сообщение? Действительно руко*опо вышло.
|
|||
4
zak555
04.09.14
✎
13:28
|
Е с л и Б у х г а л т е р с к и е И т о г и . В ы б р а т ь С у б к о н т о ( 1 ) = 1 Т о г д а
|
|||
5
Chai Nic
04.09.14
✎
13:31
|
Очень советую в методах ВыбратьСубконто и ПолучитьСубконто указывать не номер субконто, а вид (когда он явно определен). От многих ошибок избавляет.
|
|||
6
zak555
04.09.14
✎
13:32
|
(5) лучше цифры
|
|||
7
ADirks
04.09.14
✎
13:40
|
(6) кому лучше?
|
|||
8
Эльниньо
04.09.14
✎
14:50
|
Что за тег воткнул в начале?
Тоже так хочу. |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |