SQLWKS> DECLARE
2> YEARS INTEGER := 10;
3> PRIOR_YEAR DATE := SYSDATE;
4>
5> BEGIN
6> LOOP
7> SELECT TRUNC(TRUNC(TO_DATE(PRIOR_YEAR),'YEAR') ,'YEAR') YR_BEGIN
8> INTO PRIOR_YEAR
9> FROM DUAL;
10>
11> EXIT WHEN YEARS = 0;
12> YEARS := YEARS - 1;
13> DBMS_OUTPUT.put_line(PRIOR_YEAR);
14> PRIOR_YEAR := PRIOR_YEAR - 1;
15> END LOOP;
16> END;
17>
Statement processed.
01-JAN-00
01-JAN-99
01-JAN-98
01-JAN-97
01-JAN-96
01-JAN-95
01-JAN-94
01-JAN-93
01-JAN-92
01-JAN-91
Received on Mon Mar 06 2000 - 00:00:00 CST
