Имя: Пароль:
1C
 
Как получить все дни в месяце(периоде)?
0 sergei123654
 
01.10.09
14:51
Здравствуйте! задача такая. нужно вывести в отчет все дни за период. пример:
ДатаНачала -
ДатаКонца - 31.07.09
нажимаю сформировать и строится отчет:
01.07.09
02.07.09
03.07.09
....
30.07.09
31.07.09

Как такое можно сделать?
1 Vitello
 
01.10.09
14:52
ТекущийДень = ДатаНачала + 1;
2 zak555
 
01.10.09
14:52
+ (1) проверка на конецМесяца
3 sergei123654
 
01.10.09
14:52
(1) (2) спасибо
4 Ёпрст
 
гуру
01.10.09
14:57
(0) Группировка День; + Все ВошедшиеВЗапрос, если нужен разворот вправо..+ ПрисоединитьСекцию()
5 Chieftain
 
01.10.09
15:13
Для ТекДата=НачДата По КонДата Цикл
КонецЦикла
6 sergei123654
 
01.10.09
15:14
(4) спасибо, сделал так:
   ЧислоДня = ДатаНачала; цкл = 0;
   Для Д=1 По (КоличествоДней + 1) Цикл
       Если цкл = 0 Тогда
           ЧислоДня = ДатаНачала;
       Иначе
           ЧислоДня = ЧислоДня + 1;
       КонецЕсли;
       цкл=цкл+1;
       Сообщить(ЧислоДня);
   КонецЦикла;

вполне возможно что все через Ж.. но работает)))
7 Guk
 
01.10.09
15:15
(6) да, (4) так и предлагал ;)...
8 zak555
 
01.10.09
15:16
(6) в точку
9 sergei123654
 
01.10.09
15:17
всем спс
10 Ёпрст
 
гуру
01.10.09
15:17
(6) Тебе просто все даты ме-ду двумя датами просто надо было ?
Тогда так:

Для  к = НачДата По КонДата Цикл
  Сообщить(к);
КонецЦикла;
11 sergei123654
 
01.10.09
15:24
(10) действительно, работает, спасибо!
12 Chieftain
 
01.10.09
15:27
(6) Это канеш суперкруто ;)
(11) А я что в (5) писал?
13 Ёпрст
 
гуру
01.10.09
15:30
(12) не осилил автор, без подсветки кода понимашь..
;)
14 sergei123654
 
01.10.09
15:33
(12) а я (6) отправил, и как то мимо глаз (5) ушло(
;)
15 AndreYAN
 
01.10.09
16:01
Я конечно все понял, но где ОТЧЕТ то?! С каких пор окно сообщений считается отчетом?
16 Конец1с
 
01.10.09
16:11
(15)

Для  к = НачДата По КонДата Цикл    
     Таб.ВывестиСекцию("К");
   КонецЦикла;
   Таб.ТолькоПросмотр(1);
   Таб.Показать("Сформировать", "");
17 zak555
 
01.10.09
16:16
(16) может AttachSection("К") ?
18 1Сергей
 
01.10.09
16:17
(15),(16),(17) Чую - скоро пятница
19 zak555
 
01.10.09
16:19
(18) уже
20 Конец1с
 
01.10.09
16:21
(17) а зачем?
21 zak555
 
01.10.09
16:49
(20) как вариант подумал ))
22 Конец1с
 
01.10.09
16:56
(21)аааа, предупреждать надо, а то я всю голову сломал, чем мой способ хуже))))