使用ORACLE存储过程实现制作日期遍历表

日期遍历表结构

---

实现语句

–`创建表

CREATE OR REPLACE PROCEDURE CREATE_DATE(
START_DATE IN STRING, --生成日期的起始日期
END_DATE IN STRING)--生成日期截至日期
AS
v_date DATE;      --日期变量
v_year VARCHAR2(10); --日期对应的年份
v_month VARCHAR2(10);--日期对应的月份
v_day  VARCHAR2(10); --日期对应的天
v_id   NUMBER; --循环计数器
v_count NUMBER;--表DATE_DEM的数据量

BEGIN
  SELECT COUNT(*) INTO v_count FROM date_dem;

  IF v_count >0
    THEN
      DELETE FROM  date_dem;
      COMMIT;
  END IF;
  v_date := TO_DATE(START_DATE,'YYYY-MM-DD'); --给变量赋初始值
  v_id :=1;--给计数器赋初始值
  LOOP
    v_year := SUBSTR(TO_CHAR(v_date,'YYYY-MM-DD'),1,4);
    v_month :=SUBSTR(TO_CHAR(v_date,'YYYY-MM-DD'),6,2);
    v_day :=SUBSTR(TO_CHAR(v_date,'YYYY-MM-DD'),9,2);
    INSERT INTO date_dem VALUES(v_id,v_year,v_month,v_day,v_date);
    v_date := v_date +1;
    v_id := v_id +1;
    --当日期大于END_DATE的时候推出循环
    EXIT WHEN v_date > TO_DATE(END_DATE,'YYYY-MM-DD');
  END LOOP;
  COMMIT;
END;



--调用存储过程
BEGIN
  CREATE_DATE('1994-01-01', '2030-12-31');
END;
--查看表
SELECT DATE_ID,D_YEAR,D_MONTH,D_DAY,DATE_VALUE FROM DATE_DEM; UE FROM DATE_DEM;