图解使用RALE存储过程创建时间维表.doc

在使用ORACLE的过程屮，可能需要判断某一天是某个月的第几周，某一天是某一年的第几周。本人使用tl定义函数，调用 ORACLE存储过程创建时间维表，解决了该问题。 首先，在数据库内创建维度表的表结构。建表语句如下: CREATE TABLE TIME_DIM DAY- KEY CHAR(8) DAY 一 DATE DATE, DAY_ YEAR CHAR(4), DAY_ .QUARTER CHAR(l), DAY— MONTH CHAR(2)z WEEK_INMONTH CHAR(l), WEEK ；_INYEAR CHAR(2)z DAY. ■INMONTH CHAR(2) NOT NULL, 64K 64K 1 UNLIMITED 0 ) TABLESPACE USERS PCTUSED 0 PCTFREE 10 INITRANS 1 MAXTRANS 255 STORAGE ( INITIAL MINEXTENTS MAXEXTENTS PCTINCREASE BUFFER POOL DEFAULT LOGGING NOCOMPRESS NOCACHE NOPARALLEL MONITORING; comment on table TIME_DIM is ’卩、j?间维表 comment on column TIME_DIM.DAY_KEY is ’时间，； comment on column TIME_DIM.DAY_DATE is 1 H1; comment on column TIME_DIM.DAY_YEAR is 1 年份，； comment on column TIME_DIM. DAY_QUARTER is * 季度 1 ; comment on column TIME_DIM.DAY_MONTH is ’月份，； comment on column TIME_DIM. WEEK_INMONTH is ’只份的第儿周■; comment on column TIME_DIM. WEEK_INYEAR is ’ 年份的第几周*; comment on column TIME_DIM.DAY_INMONTH is 1H 1 ; 接着，定义函数get_week_month，用于计算某一口期在当月的第几周，定义如下: create or replace function get_week_month(datel in CHAR) return integer is result integer; startday char(8); xingqi char(9); /*本月第一天是星期几*/ week—num number; 广本月的第一周一共有几天*/ day_num number; /* datel是这个月的第几天*/ day_num2 number; begin if substr(datel,7,2)=1011 then result:=1; else startday:=substr(datel,1,6)丨 I 1011; select to_char(to_date(startdayyyyymmdd?), 1 day 1) into xingqi from dual; select (case xingqi when 星期一1 then 7 when ffi期二1 then 6 when * 星期三 * then 5 when * 星期四1 then 4 when 1 星期五1 then 3 when 星期六1 then 2 when ?星期then 1 end )into week num from dual; select to_date(datel, select to_date(datel,1yyyymmdd1)-to_date(startdayz 1yyyymmdd1)+1 into day_num from dual; if day_num=week_num then result:=1; else day_num2:=day_num-week_num; select ceil(day_num2/7)+1 into result from dual; end if; end if; return (result); end; 接着，定义函数get_week_year，用于计算某一日期在当年的第几周，定义如下： create or replace function get_week_year(datel in CHAR) return integer is result integer; startday char (8); xingqi char (9); 本年第一天是星期几*/ wee