SQL:插入日历数据

oracle.sql

declare
  i int;
  now date;
  date1 date;
  week int;
begin
  now := trunc(sysdate);
  for i in 0..2000 loop
    date1 := now + i;
    week := to_number(to_char(date1 - 1, 'd'));
    insert into sys_calendar(id, date_name, Week_Name, Week_Type, cal_name, cal_type, Am_Begin, am_end, pm_begin, pm_end)
      values(create_table_id('sys_calendar'),
        date1,
        '星期' || decode(week, 1, '一', 2, '二', 3, '三', 4, '四', 5, '五', 6, '六', 7, '天'),
        week,
        case when week in (6, 7) then '节假日' else '工作日' end,
        case when week in (6, 7) then 1 else 0 end,
        to_date(to_char(date1, 'yyyy-mm-dd') || ' 08:00:00', 'yyyy-mm-dd hh24:mi:ss'),
        to_date(to_char(date1, 'yyyy-mm-dd') || ' 12:00:00', 'yyyy-mm-dd hh24:mi:ss'),
        to_date(to_char(date1, 'yyyy-mm-dd') || ' 14:00:00', 'yyyy-mm-dd hh24:mi:ss'),
        to_date(to_char(date1, 'yyyy-mm-dd') || ' 18:00:00', 'yyyy-mm-dd hh24:mi:ss'));
  end loop;
end;