Вопрос № 27885: Здравствуйте! Спасибо за то, что так быстро ответили на мой предыдущий вопрос. Вы все объясняете просто и доступно.
И вот у меня назрел еще один вопросик:в регламентированных отчетах есть справка о дебиторах, которая заполняется вручную,а нужно ...
Вопрос № 27.885
Здравствуйте! Спасибо за то, что так быстро ответили на мой предыдущий вопрос. Вы все объясняете просто и доступно.
И вот у меня назрел еще один вопросик:в регламентированных отчетах есть справка о дебиторах, которая заполняется вручную,а нужно сделать так, чтобы эта справка заполнялась автоматически из бух. баланса(строки 240, 625, 621) . Вот. Подскажите пожалуйста или хотя бы направьте в правильном направлении. Заранее благодарна.
Отвечает: Шахрайчук Владимир Анатольевич
Здравствуйте, Емельянова Ольга Алексеевна!
Живу на Украине, не знаю формы этого отчета и Вашего плана счетов.
Ответ в общих чертах таков
БИ=СоздатьОбъект("БухгалтерскиеИтоги");
БИ.ИспользоватьРазделительУчета(Фирма) если есть в плане счетов разделитель по фирме
БИ.ИспользоватьСубконто(ВидыСубконто.Контрагенты,);или как там у Вас называется это субконто
БИ.ИспользоватьСубконто(ВидыСубконто.Договора,)если в плане счетов есть 2 субконто по этому счету
БИ.ВыполнитьЗапрос(НачДата,КонДата,"240,625,621",,,,,)Вот теперь дебиторы-кредиторы рассчитаны, рекоммендую рассчитывать каждый счет отдельно - будет больше информации в отчете, дебиторы по каждому счету. В примере все три счета в сбиты в кучу
БИ.ВыбратьСубконто(1)Первым у нас было использоватьСубконто контрагенты
Пока БИ.ПолучитьСубконто(1)=1 Цикл
Контрик=БИ.Субконто(1),
Дебетовая задолженностьна конец КонДата=БИ.СКД(1)
Дебетовая задолженностьна начало НачДата=БИ.СНД(1)
Кредитовая задолженностьна начало НачДата=БИ.СНК(1)
Кредитовая задолженностьна конец КонДата=БИ.СКД(1)
Если есть учет по договорам (Счетам-фактурам, и т.д.) и нужна информация в разрезе договоров то внутри этого цикла делаем еще 1 цикл
БИ.ВыбратьСубконто(2)Первым у нас было использоватьСубконто контрагенты
Пока БИ.ПолучитьСубконто(2)=1 Цикл
Договор=БИ.Субконто(2),
Дебетовая задолженностьна конец КонДата=БИ.СКД(1)(по этому контрагенту конкретно и по этому договору)
Дебетовая задолженностьна начало НачДата=БИ.СНД(1)
Кредитовая задолженностьна начало НачДата=БИ.СНК(1)
Кредитовая задолженностьна конец КонДата=БИ.СКД(1)
НашихОплат/продажТовара за период =БИ.ДО(1)
НамОплачено/НамОтгруженоТовара=БИ.КО(1)
Конеццикла;
КонецЦикла;
Ну вот и все. В переменные Вы положили информацию, выводите ее на печать как хотите, сбивайте и накапливайте суммы как хотите