| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Что это 8-(??? [D6, Win2k]

}|{yk ©   (2004-09-14 12:46:00) 


SELECT (TO_DATE ('01.08.2004', 'dd.mm.yyyy') + ROWNUM - 1) plat_date
 FROM all_objects
WHERE ROWNUM <=
         EXTRACT (DAY FROM (TRUNC (LAST_DAY (TO_DATE ('01.08.2004',
                                                      'dd.mm.yyyy'
                                                     )
                                            )
                                  )
                           )
                 )

не равнозначно

begin
declare
  CURSOR allmonthday (DAT VARCHAR2)
  IS
     SELECT (TO_DATE (DAT, 'dd.mm.yyyy') + ROWNUM - 1) plat_date
       FROM all_objects
      WHERE ROWNUM <=
               EXTRACT (DAY FROM (TRUNC (LAST_DAY (TO_DATE (DAT,
                                                            'dd.mm.yyyy')
                                                  )
                                        )
                                 )
                       );

  current_day   VARCHAR2 (12);
BEGIN
  FOR day_idx IN allmonthday ('01.08.2004')
  LOOP
     FETCH allmonthday
      INTO current_day;

     dbms_output.put_line('date='||current_day);
  END LOOP;
end;  
end;


---

Sergey13   (2004-09-14 13:10:00) [1]

фетчить не надо?

---

}|{yk   (2004-09-14 13:06:00) [2]

Все, снимается

---

DiamondShark   (2004-09-14 13:00:00) [3]

А чем именно не равнозначно?

---

Наверх