Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Комплексная 4.5.9 Больная рекурсия в док.РегламентныеОперацииПоНалоговомуУчету

Nickstep
читатель
офлайн
Дата регистрации: 07.06.2002
Сообщений: 34
Пост №1
 
26.10.2005 12:01

"Процедура ЗакрытиеСчета(Счет, БухИт, НомерВыбираемогоСубконто = 0)<br>                   <br> Иначе<br> НомерВыбираемогоСубконто = НомерВыбираемогоСубконто + 1;<br> <br> // Итоги не разворачиваются по оборотным субконто.<br> Если Счет.ТолькоОбороты(НомерВыбираемогоСубконто) = 0 Тогда // не оборотное субконто<br> БухИт.ВыбратьСубконто(НомерВыбираемогоСубконто);<br> ВремНомер = НомерВыбираемогоСубконто; // лечим рекурсию<br> Пока БухИт.ПолучитьСубконто(ВремНомер) = 1 Цикл // лечим рекурсию - было НомерВыбираемогоСубконто<br> ЗакрытиеСчета(Счет, БухИт, НомерВыбираемогоСубконто)<br> КонецЦикла;<br> НомерВыбираемогоСубконто = ВремНомер; // лечим рекурсию<br> Иначе<br> ЗакрытиеСчета(Счет, БухИт, НомерВыбираемогоСубконто)<br> КонецЕсли;<br> КонецЕсли;<br> <br>КонецПроцедуры // ЗакрытиеСчета()<br><br>"

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация