DATE functions - Weekly report

Question

Please take a look at this loop that sort of plays with dates.
The values returned are as follows
lv_wreport_end_date = 04-APR-04
lv_wreport_start_date = 03-APR-04
I was expecting to get the first week of April ie, 01APR04 to 04Apr04.
IF (To_Char(lv_process_date, 'FMDAY')='SUNDAY') OR (TRUNC(lv_process_date) = TRUNC(LAST_DAY(lv_process_date))) THEN
    lv_wreport_end_date := trunc(lv_process_date);
    FOR i in 0..6 LOOP   
      lv_wreport_start_date:=lv_wreport_end_date-1;  -- day stepping back
      exit when to_char(lv_wreport_start_date,'FMDAY') = 'MONDAY' ; -- not beyond monday
      exit when to_char(lv_wreport_start_date,'DD' ) = '01'     ; -- not beyond day 1 of month    
    END LOOP;
    -- Produce weekly billable report
    Pck_Reports.weekly_billable_trans(TRUNC(lv_wreport_start_date), TRUNC(lv_wreport_end_date), lv_invoice_quarter);   
  END IF;thanks FOR your help

Answer 1

alter session set nls_date_language=american;
with c as
(select to_date('03-APR-04','DD-MON-YY') lv_wreport_start_date
, to_date('04-APR-04','DD-MON-YY') lv_wreport_end_date
from dual
select dt, to_char(dt,'Day') Week_name
from
(select next_day(lv_wreport_start_date - 7,'monday')-1 /* start is monday */
+rownum dt
from c
connect by rownum <=
next_day(lv_wreport_end_date - 1,'sunday') /* end is sunday */
next_day(lv_wreport_start_date - 7,'monday') /* start is monday */
+1
order by dt
Examples (monday->sunday)
DT       TO_CHAR(DT,'D
29/03/04 Monday
30/03/04 Tuesday
31/03/04 Wednesday
01/04/04 Thursday
02/04/04 Friday
03/04/04 Saturday
04/04/04 Sunday
7 rows selected.
Examples (sunday->saturday)
DT       TO_CHAR(DT,'D
28/03/04 Sunday
29/03/04 Monday
30/03/04 Tuesday
31/03/04 Wednesday
01/04/04 Thursday
02/04/04 Friday
03/04/04 Saturday
04/04/04 Sunday
05/04/04 Monday
06/04/04 Tuesday
07/04/04 Wednesday
08/04/04 Thursday
09/04/04 Friday
10/04/04 Saturday
14 rows selected.