- 1
- 2
- 3
- 4
- 5
Для й = 1 По КонДата-НачДата+1 Цикл
ТекДата = НачДата+й-1;
ДокТ.ВыбратьДокументы(ТекДата, ТекДата);
Пока ДокТ.ПолучитьДокумент() = 1 Цикл
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−119.4
Для й = 1 По КонДата-НачДата+1 Цикл
ТекДата = НачДата+й-1;
ДокТ.ВыбратьДокументы(ТекДата, ТекДата);
Пока ДокТ.ПолучитьДокумент() = 1 Цикл
Копаясь в самописной конфе, с которой сейчас работаю, дописываю, и усердно исправляю чей-то быдлокод, временами нахожу просто уникальные творения.
Пожалуй это творение - вершина извращенной фантазии)
Думаю комментарии излишни)) автор перебирает дни, а потом отдельно по каждому дню делает выборку событий
guest 31.03.2010 20:24 # +0.6
У меня оптимизирующий интерпретатор 1С.
guest 01.04.2010 14:01 # −1
Много может быть причин так делать...
guest 04.04.2010 01:34 # −2
guest 04.04.2010 10:44 # 0
guest 02.06.2010 11:12 # −1
guest 04.04.2010 21:12 # −0.2
guest 06.04.2010 23:57 # +0.4
guest 28.04.2010 09:01 # −1
имхо - запостивший его сюда - не в теме
guest 02.06.2010 13:58 # 0
это откомментивший выше - не в теме)))