Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / [игнор отключен] [закрыт для гостей] / Выборка по бухитогам / 2 сообщений из 2, страница 1 из 1
18.09.2009, 07:26
    #36203050
supervk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выборка по бухитогам
Помогите, пожалуйста, разобраться с бухитогами.
Надо получить итоговую сумму по проводкам
62.1 - 90.1.1
за заданный период, по заданным контрагентам, договорам, подразделениям, и ставкам НДС без суммы НДС.
У меня проблема возникла в получении итоговой суммы по каждой ставке : в пошаговом режиме прохожу по циклу, смотрю - пока иду через ВыбратьСчета(), ПолучитьСчет(), ПолучитьКорСубконто(), всё нормально - мБухИтоги.ДО() выдаёт ту сумму, которая и должна быть, как только прохожу через ПолучитьКорСубконто(2) - сумма мБухИтоги.ДО() меняется на какую-то другую, не могу даже понять, откуда она берётся.

Видимо, я не правильно обхожу выборку, подскажите, пожалуйста, что не так.
Вот как я делаю:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
мБухИтоги.ИспользоватьСубконто(ВидыСубконто.Контрагенты, СписокКонтрагентов,  2 );
мБухИтоги.ИспользоватьСубконто(ВидыСубконто.Договоры, СписокДоговоров,  2 );
мБухИтоги.ИспользоватьКорСубконто(ВидыСубконто.Подразделения, СписокПодразделений,  2 ); 
мБухИтоги.ИспользоватьКорСубконто(ВидыСубконто.СтавкиНДС, СписокСтатейНДС);
мБухИтоги.ВыполнитьЗапрос(ДатаНачала, ДатаОкончания, "62.1", "90.1.1", ,  2 , , "С");
Если мБухИтоги.ВыбратьСчета() =  1  Тогда
	Пока мБухИтоги.ПолучитьСчет() =  1  Цикл
		Если мБухИтоги.ВыбратьКорСубконто( 2 ) =  1  Тогда
			Пока мБухИтоги.ПолучитьКорСубконто( 2 ) =  1  Цикл
				СтавкаНДС = мБухИтоги.КорСубконто(ВидыСубконто.СтавкиНДС).Ставка;
				Сумма = Сумма +  100  * мБухИтоги.ДО() / (СтавкаНДС +  100 );
			КонецЦикла;
		КонецЕсли;
	КонецЦикла;
КонецЕсли;
...
Рейтинг: 0 / 0
19.09.2009, 05:39
    #36205505
supervk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выборка по бухитогам
Ужасные бухитоги...

Надо было использовать мБухИтоги.КорДО() вместо мБухИтоги.ДО().

В итоге получилось:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
мБухИтоги.ИспользоватьСубконто(ВидыСубконто.Контрагенты, СписокКонтрагентов,  2 );
мБухИтоги.ИспользоватьСубконто(ВидыСубконто.Договоры, СписокДоговоров,  2 );
мБухИтоги.ИспользоватьКорСубконто(ВидыСубконто.Подразделения, СписокПодразделений,  2 ); 
мБухИтоги.ИспользоватьКорСубконто(ВидыСубконто.СтавкиНДС, СписокСтатейНДС);
мБухИтоги.ВыполнитьЗапрос(ДатаНачала, ДатаОкончания, "62.1", "90.1.1", ,  2 , , "С");
Если мБухИтоги.ВыбратьСчета() =  1  Тогда
    Пока мБухИтоги.ПолучитьСчет() =  1  Цикл
        Если мБухИтоги.ВыбратьКорСубконто( 2 ) =  1  Тогда
            Пока мБухИтоги.ПолучитьКорСубконто( 2 ) =  1  Цикл
                СтавкаНДС   = мБухИтоги.КорСубконто(ВидыСубконто.СтавкиНДС).Ставка;
                СуммаБезНалогов = СуммаБезНалогов +  100  * мБухИтоги.КорДО() / (СтавкаНДС +  100 );
            КонецЦикла;
        КонецЕсли;
    КонецЦикла;
КонецЕсли;
...
Рейтинг: 0 / 0
Форумы / [игнор отключен] [закрыт для гостей] / Выборка по бухитогам / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]