DECLARE v_date DATE := TO_DATE ('12/31/1995', 'MM/DD/YYYY'); BEGIN LOOP v_date := v_date + 1; INSERT INTO Application_Dates (the_date ,mmddyyyy ,yyyymmdd ,mm ,mon ,month ,d ,dd ,ddd ,day ,dy ,ddspth ,yyyy ,year ,quarter ,ww ,w ,julian ,holiday ,business_day ,remark ) VALUES (v_date ,LTRIM (RTRIM (TO_CHAR (v_date, 'MM/DD/YYYY'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'YYYY/MM/DD'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'MM'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'MON'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'MONTH'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'D'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'DD'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'DDD'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'DAY'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'DY'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'DDSPTH'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'YYYY'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'YEAR'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'Q'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'WW'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'W'))) ,LTRIM (RTRIM (TO_CHAR (v_date, 'J'))) ,'N' ,'N' ,'' ); EXIT WHEN TO_CHAR (v_date, 'MM/DD/YYYY') = '12/31/2010'; END LOOP; COMMIT; UPDATE Application_Dates SET business_day = 'Y' WHERE day IN ('MONDAY', 'TUESDAY', 'WEDNESDAY', 'THURSDAY', 'FRIDAY'); COMMIT; END;