LANGCHI_数仓作业_2

最新推荐文章于 2024-06-15 21:40:09 发布
最新推荐文章于 2024-06-15 21:40:09 发布
阅读量129 收藏
点赞数
文章标签： 数据库 sql linq
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/B_planzp/article/details/127882995
版权

 6、DWD层加工SQL    

6、DWD层加工SQL	

赋予权限
grant all privileges to STG；
grant all privileges to ODS；
grant all privileges to DWD；
grant all privileges to DWA；
grant all privileges to DM ；
grant all privileges to DIM；
-- Create table		
--相关字段			
create table DWD_D_USE_BASE_INFO					
(					
  date_id           VARCHAR2(8),					
  area_id           VARCHAR2(10),					
  area_desc         VARCHAR2(100),					
  user_id           VARCHAR2(20),					
  device_number     VARCHAR2(11),					
  service_type      VARCHAR2(8),					
  service_type_desc VARCHAR2(100),					
  innet_date        VARCHAR2(8),					
  innet_months      NUMBER					
  					
)					
TABLESPACE TBS_DWD					
partition by range (DATE_ID)					
subpartition by list (AREA_ID)					
(					
  partition PART_20190401 values less than ('20190402')					
    tablespace TBS_DWD					
    pctfree 10					
    initrans 1					
    maxtrans 255					
  (					
    subpartition PART_20190401_SUBPART_01 values ('01') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_02 values ('02') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_03 values ('03') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_04 values ('04') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_05 values ('05') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_06 values ('06') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_07 values ('07') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_08 values ('08') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_09 values ('09') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_10 values ('10') tablespace TBS_DWD,					
    subpartition PART_20190401_SUBPART_11 values ('11') tablespace TBS_DWD					
  )					
);					
-- Add comments to the table 					
comment on table DWD_D_USE_BASE_INFO					
  is '用户基础信息';					
-- Add comments to the columns 					
comment on column DWD_D_USE_BASE_INFO.date_id					
  is '日期ID';					
comment on column DWD_D_USE_BASE_INFO.area_id					
  is '地市ID';					
comment on column DWD_D_USE_BASE_INFO.area_desc					
  is '地市描述';					
comment on column DWD_D_USE_BASE_INFO.user_id					
  is '用户ID';					
comment on column DWD_D_USE_BASE_INFO.device_number					
  is '手机号码';					
comment on column DWD_D_USE_BASE_INFO.service_type					
  is '业务类型';					
comment on column DWD_D_USE_BASE_INFO.innet_date					
  is '入网日期';					
comment on column DWD_D_USE_BASE_INFO.innet_months					
  is '在网时长';					
comment on column DWD_D_USE_BASE_INFO.service_type_desc					
  is '业务类型描述';					
-- Create/Recreate indexes 					
create index IDX_DDUBI_AREA_ID on DWD_D_USE_BASE_INFO (AREA_ID)					
  tablespace TBS_DWD					
  pctfree 10					
  initrans 2					
  maxtrans 255					
  storage					
  (					
    initial 64K					
    next 1M					
    minextents 1					
    maxextents unlimited					
  );					
create index IDX_DDUBI_DATE_ID on DWD_D_USE_BASE_INFO (DATE_ID)					
  tablespace TBS_DWD					
  pctfree 10					
  initrans 2					
  maxtrans 255					
  storage					
  (					
    initial 64K					
    next 1M					
    minextents 1					
    maxextents unlimited					
  );					
create index IDX_DDUBI_DN on DWD_D_USE_BASE_INFO (DEVICE_NUMBER)					
  tablespace TBS_DWD					
  pctfree 10					
  initrans 2					
  maxtrans 255					
  storage					
  (					
    initial 64K					
    next 1M					
    minextents 1					
    maxextents unlimited					
  );					
create index IDX_DDUBI_ST on DWD_D_USE_BASE_INFO (SERVICE_TYPE)					
  tablespace TBS_DWD					
  pctfree 10					
  initrans 2					
  maxtrans 255					
  storage					
  (					
    initial 64K					
    next 1M					
    minextents 1					
    maxextents unlimited					
  );					
create index IDX_DDUBI_USER_ID on DWD_D_USE_BASE_INFO (USER_ID)					
  tablespace TBS_DWD					
  pctfree 10					
  initrans 2					
  maxtrans 255					
  storage					
  (					
    initial 64K					
    next 1M					
    minextents 1					
    maxextents unlimited					
  );					
					
CREATE OR REPLACE PROCEDURE P_DWD_D_USE_BASE_INFO(					
       V_DATE   IN  VARCHAR2,					
       V_AREA   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DWD_D_USE_BASE_INFO					
  *功能描述 --%@COMMENT:用户基础信息（维度关联）					
  *执行周期 --%@PERIOD:日					
  *参数 --%@PARAM:V_DATE 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-19					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(30);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
        V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
        V_DATE_A1      VARCHAR2(8);					
BEGIN					
        V_PKG        := 'DWD_D_USE_BASE_INFO';                    -- 分类名称					
        V_TAB        := 'DWD_D_USE_BASE_INFO';       -- 表名					
        V_PROCNAME   := 'P_DWD_D_USE_BASE_INFO';     -- 过程名称					
        V_DATE_A1 :=TO_CHAR(TO_DATE(V_DATE,'YYYYMMDD')+1,'YYYYMMDD');					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_DATE,					
             V_AREA,					
             'DWD',					
             V_PROCNAME,					
             'V_DATE='|| V_DATE ||';V_PROV='|| V_AREA,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_DATE,					
             V_PKG,					
             V_PROCNAME,					
             V_AREA,					
             SYSDATE,					
             V_TAB);					
        -- 条件判断1  原始分区是否存在					
        EXECUTE IMMEDIATE '					
        SELECT   count(1)					
        FROM     ALL_TAB_SUBPARTITIONS					
        WHERE    table_name = ''DWD_D_USE_BASE_INFO''					
        AND      table_owner = ''DWD''					
        AND      partition_name = ''PART_'||V_DATE||'''' INTO V_COUNT;					
					
        IF V_COUNT != 11 THEN					
        V_SQL := 'ALTER TABLE DWD.DWD_D_USE_BASE_INFO ADD PARTITION  PART_'||V_DATE||' VALUES LESS THAN ('''||V_DATE_A1||''')					
                 TABLESPACE TBS_DWD					
                 (					
                  subpartition PART_'||V_DATE||'_SUBPART_01 values (''01'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_02 values (''02'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_03 values (''03'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_04 values (''04'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_05 values (''05'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_06 values (''06'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_07 values (''07'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_08 values (''08'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_09 values (''09'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_10 values (''10'') tablespace TBS_DWD,					
                  subpartition PART_'||V_DATE||'_SUBPART_11 values (''11'') tablespace TBS_DWD					
 )					
  ';					
        EXECUTE IMMEDIATE V_SQL;					
        END IF;					
					
        -- 条件判断2 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
        SELECT SUM(CNT) FROM					
        (					
        SELECT   count(1) CNT					
        FROM     ODS.ODS_D_USE_BASE_INFO					
        WHERE    date_id ='''|| V_DATE ||'''					
        AND      area_id ='''|| V_AREA ||'''					
        AND      rownum < 2					
        union all					
        SELECT   count(1)					
        FROM     DIM.DIM_AREA_ID					
        WHERE    rownum < 2					
        union all					
        SELECT   count(1)					
        FROM     DIM.DIM_SERVICE_TYPE					
        WHERE    rownum < 2					
        )					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 3					
					
THEN					
        V_SQL := 'ALTER TABLE DWD.DWD_D_USE_BASE_INFO TRUNCATE SUBPARTITION PART_'|| V_DATE ||'_SUBPART_'|| V_AREA ;					
        EXECUTE IMMEDIATE V_SQL;					
        V_SQL := 'INSERT INTO  DWD.DWD_D_USE_BASE_INFO NOLOGGING					
                  SELECT T0.DATE_ID,					
                         T0.AREA_ID,					
                         T1.AREA_DESC, 					
                         T0.USER_ID,					
                         T0.DEVICE_NUMBER,					
                         T0.SERVICE_TYPE,					
                         T2.SERVICE_TYPE_DESC, 					
                         T0.INNET_DATE,					
                         T0.INNET_MONTHS					
                  FROM   ODS.ODS_D_USE_BASE_INFO T0,					
                         DIM.DIM_AREA_ID T1,					
                         DIM.DIM_SERVICE_TYPE T2					
                  WHERE  T0.AREA_ID=T1.AREA_ID(+)					
                  AND  T0.SERVICE_TYPE= T2.SERVICE_TYPE(+)					
                  AND  T0.DATE_ID='''|| V_DATE ||'''					
                  AND  T0.AREA_ID='''|| V_AREA ||'''';					
					
      EXECUTE IMMEDIATE V_SQL;					
					
         V_ROWLINE := SQL%ROWCOUNT;					
         COMMIT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                V_AREA,					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                V_AREA,					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;			

select date_id,count(*) from dwd.dwd_d_use_base_info group by date_id;
-- 修改列的数据类型大小
alter table dwd.dwd_d_use_base_info modify user_id varchar2(32);

--调用  DWD   存储过程
declare
         v_date varchar2(8);
         v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         i number;
begin
          for t in 1..11 loop
          v_area:= to_char(t);
          i := length(v_area);
          if i = 1 then
          v_area :='0'||v_area;
          end if;
          DWD.P_DWD_D_USE_BASE_INFO('20190401',v_area,v_retcode,v_retinfo);
          DWD.P_DWD_D_USE_BASE_INFO('20190402',v_area,v_retcode,v_retinfo);
          DWD.P_DWD_D_USE_BASE_INFO('20200301',v_area,v_retcode,v_retinfo);
          DWD.P_DWD_D_USE_BASE_INFO('20200302',v_area,v_retcode,v_retinfo);
          DWD.P_DWD_D_USE_BASE_INFO('20200401',v_area,v_retcode,v_retinfo);
          DWD.P_DWD_D_USE_BASE_INFO('20200402',v_area,v_retcode,v_retinfo);
          end loop;
          dbms_output.put_line(v_retinfo);
end;

select * from ods.ods_execute_log;
select * from ods.ods_execute_log where procname = 'P_ODS_D_USE_BASE_INFO';
select * from ods.ods_execute_log_his;

7、DWA层加工SQL        -- 新建表和对应存储过程（    数据汇总） 

7、DWA层加工SQL		-- 新建表和对应存储过程（	数据汇总		计算日同比，日环比） 
-- 		
					
-- Create table					
create table DWA_SX_CITY_D_NEW_USERS					
(					
date_id	varchar2(8),				
area_id	varchar2(10),				
area_desc varchar2(100) ,					
add_user_cnt	number				
)					
TABLESPACE TBS_DWA					
partition by range (DATE_ID)					
(					
  partition PART_20190401 values less than ('20190402')					
    tablespace TBS_DWA					
    pctfree 10					
    initrans 1					
    maxtrans 255					
);					
-- Add comments to the table 					
comment on table DWA_SX_CITY_D_NEW_USERS					
  is '山西各地市日新增用户数';					
-- Add comments to the columns 					
comment on column DWA_SX_CITY_D_NEW_USERS.date_id					
  is '日期ID';					
comment on column DWA_SX_CITY_D_NEW_USERS.area_id					
  is '地市ID';					
comment on column DWA_SX_CITY_D_NEW_USERS.area_desc					
  is '地市描述';					
comment on column DWA_SX_CITY_D_NEW_USERS.add_user_cnt					
  is '新增用户数';					
					
CREATE OR REPLACE PROCEDURE P_DWA_SX_CITY_D_NEW_USERS(					
       V_DATE   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DWA_SX_CITY_D_NEW_USERS					
  *功能描述 --%@COMMENT:用户基础信息（维度关联）					
  *执行周期 --%@PERIOD:日					
  *参数 --%@PARAM:V_DATE 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-19					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(30);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
        V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
        V_DATE_A1      VARCHAR2(8);					
BEGIN					
        V_PKG        := 'DWA_SX_CITY_D_NEW_USERS';                    -- 分类名称					
        V_TAB        := 'DWA_SX_CITY_D_NEW_USERS';       -- 表名					
        V_PROCNAME   := 'P_DWA_SX_CITY_D_NEW_USERS';     -- 过程名称					
        V_DATE_A1 :=TO_CHAR(TO_DATE(V_DATE,'YYYYMMDD')+1,'YYYYMMDD');					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_DATE,					
             'ALL_CITY',					
             'DWD',					
             V_PROCNAME,					
             'V_DATE='|| V_DATE,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_DATE,					
             V_PKG,					
             V_PROCNAME,					
             'ALL_CITY',					
             SYSDATE,					
             V_TAB);					
        -- 条件判断1  原始分区是否存在					
        EXECUTE IMMEDIATE '					
        SELECT   count(1)					
        FROM     ALL_TAB_PARTITIONS					
        WHERE    table_name = ''DWA_SX_CITY_D_NEW_USERS''					
        AND      table_owner = ''DWA''					
        AND      partition_name = ''PART_'||V_DATE||'''' INTO V_COUNT;					
					
        IF V_COUNT != 1 THEN					
        V_SQL := 'ALTER TABLE DWA.DWA_SX_CITY_D_NEW_USERS ADD PARTITION  PART_'||V_DATE||' VALUES LESS THAN ('''||V_DATE_A1||''')					
                 TABLESPACE TBS_DWA';					
        EXECUTE IMMEDIATE V_SQL;					
        END IF;					
					
        -- 条件判断2 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
        SELECT   COUNT(*) 					
        FROM     DWD.DWD_D_USE_BASE_INFO					
        WHERE    date_id ='''|| V_DATE ||'''					
        AND      rownum < 2					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 1					
					
THEN					
        V_SQL := 'ALTER TABLE DWA.DWA_SX_CITY_D_NEW_USERS TRUNCATE PARTITION PART_'|| V_DATE ;					
        EXECUTE IMMEDIATE V_SQL;					
        V_SQL := 'INSERT INTO  DWA.DWA_SX_CITY_D_NEW_USERS NOLOGGING					
                        SELECT DATE_ID,					
                               AREA_ID,					
                               (SELECT MAX(AREA_DESC)					
                                  FROM DIM.DIM_AREA_ID					
                                 WHERE AREA_ID = A.AREA_ID) AREA_DESC,					
                               COUNT(CASE					
                                       WHEN INNET_DATE = '||V_DATE||' THEN					
1					
                                       ELSE					
                                        NULL					
                                     END) ADD_USER_CNT --新增用户数					
                          FROM DWD.DWD_D_USE_BASE_INFO A					
                          WHERE DATE_ID='''|| V_DATE ||'''					
                          GROUP BY DATE_ID,					
                               AREA_ID';					
					
      EXECUTE IMMEDIATE V_SQL;					
					
         V_ROWLINE := SQL%ROWCOUNT;					
         COMMIT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;					


select * from dwa.dwa_sx_city_d_new_users  ;

--调用  DWA   存储过程
declare
         v_date varchar2(8);
        --v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         --i number;
begin
          
          
          DWA.P_DWA_SX_CITY_D_NEW_USERS('20190401',v_retcode,v_retinfo);
          DWA.P_DWA_SX_CITY_D_NEW_USERS('20190402',v_retcode,v_retinfo);
          DWA.P_DWA_SX_CITY_D_NEW_USERS('20200301',v_retcode,v_retinfo);
          DWA.P_DWA_SX_CITY_D_NEW_USERS('20200302',v_retcode,v_retinfo);
          DWA.P_DWA_SX_CITY_D_NEW_USERS('20200401',v_retcode,v_retinfo);
          DWA.P_DWA_SX_CITY_D_NEW_USERS('20200402',v_retcode,v_retinfo);
        
          dbms_output.put_line(v_retinfo);
end;

8.1        -- 新建表和对应存储过程（    数据汇总        计算日同比，日环比）     

8.1		-- 新建表和对应存储过程（	数据汇总		计算日同比，日环比） 	
create table DWA_D_SX_ADD_USER_TREND					
(					
date_id  varchar2(8),					
ADD_USER_CNT_TD  NUMBER,					
D_HB_RATIO  NUMBER ,					
D_TB_RATIO  NUMBER					
)					
TABLESPACE TBS_DWA;					
-- Add comments to the table 					
comment on table DWA_D_SX_ADD_USER_TREND					
  is '山西日新增用户趋势';					
-- Add comments to the columns 					
comment on column DWA_D_SX_ADD_USER_TREND.date_id					
  is '日期ID';					
comment on column DWA_D_SX_ADD_USER_TREND.ADD_USER_CNT_TD					
  is '日新增用户';					
comment on column DWA_D_SX_ADD_USER_TREND.D_HB_RATIO					
  is '日环比';					
comment on column DWA_D_SX_ADD_USER_TREND.D_TB_RATIO					
  is '日同比';					
					
CREATE OR REPLACE PROCEDURE P_DWA_D_SX_ADD_USER_TREND(					
       V_DATE   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DWA_D_SX_ADD_USER_TREND					
  *功能描述 --%@COMMENT:山西各地市日新增用户趋势分析					
  *执行周期 --%@PERIOD:日					
  *参数 --%@PARAM:V_DATE 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-24					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(30);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
        --V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
BEGIN					
        V_PKG        := 'DWA_D_SX_ADD_USER_TREND';                    -- 分类名称					
        V_TAB        := 'DWA_D_SX_ADD_USER_TREND';       -- 表名					
        V_PROCNAME   := 'P_DWA_D_SX_ADD_USER_TREND';     -- 过程名称					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_DATE,					
             'ALL_CITY',					
             'DWA',					
             V_PROCNAME,					
             'V_DATE='|| V_DATE,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_DATE,					
             V_PKG,					
             V_PROCNAME,					
             'ALL_CITY',					
             SYSDATE,					
             V_TAB);					
             					
        -- 条件判断1 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
        SELECT   count(1) CNT					
        FROM     DWA.DWA_SX_CITY_D_NEW_USERS					
        WHERE    date_id ='''|| V_DATE ||'''					
        AND      rownum < 2					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 1					
					
THEN					
        EXECUTE IMMEDIATE 'DELETE FROM DWA_D_SX_ADD_USER_TREND WHERE DATE_ID='||V_DATE;					
        --EXECUTE IMMEDIATE V_SQL;					
        EXECUTE IMMEDIATE 'INSERT INTO   DWA.DWA_D_SX_ADD_USER_TREND NOLOGGING					
                        SELECT '''||V_DATE||''',					
                               ADD_USER_CNT_TD,  --日新增用户					
                               CASE WHEN ADD_USER_CNT_LD <>0 THEN  ROUND(( ADD_USER_CNT_TD- ADD_USER_CNT_LD)/ADD_USER_CNT_LD,2) ELSE NULL END					
                               D_HB_RATIO, --日环比					
                               CASE WHEN ADD_USER_CNT_LM <>0 THEN  ROUND(( ADD_USER_CNT_TD- ADD_USER_CNT_LM)/ADD_USER_CNT_LM,2) ELSE NULL END					
                               D_TB_RATIO --日同比					
                          FROM (SELECT SUM(CASE WHEN DATE_ID='||V_DATE||'THEN ADD_USER_CNT ELSE 0 END )					
                                       ADD_USER_CNT_TD, --日新增用户					
                                       SUM(CASE WHEN DATE_ID=TO_CHAR(TO_DATE('||V_DATE||', ''YYYYMMDD'') - 1, ''YYYYMMDD'') THEN ADD_USER_CNT ELSE 0 END )					
                                       ADD_USER_CNT_LD, --昨日新增用户					
                                       SUM(CASE WHEN DATE_ID=TO_CHAR(ADD_MONTHS(TO_DATE('||V_DATE||', ''YYYYMMDD''), -1),''YYYYMMDD'') THEN					
                                       ADD_USER_CNT ELSE 0 END) ADD_USER_CNT_LM --上月新增用户					
                                  FROM DWA.DWA_SX_CITY_D_NEW_USERS					
                                 WHERE DATE_ID BETWEEN TO_CHAR(ADD_MONTHS(TO_DATE('||V_DATE||', ''YYYYMMDD''), -1),''YYYYMMDD'') AND '||V_DATE||')';					
					
      --EXECUTE IMMEDIATE V_SQL;					
					
         V_ROWLINE := SQL%ROWCOUNT;					
         COMMIT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;					
	
select * from dwa.dwa_sx_city_d_new_users  ;
	
--调用  DWA   存储过程
declare
         v_date varchar2(8);
        --v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         --i number;
begin
          
          
          dwa.P_DWA_D_SX_ADD_USER_TREND('20190401',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20190402',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200301',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200302',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200401',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200402',v_retcode,v_retinfo);
        
          dbms_output.put_line(v_retinfo);
end;

8.2		-- 新建表和对应存储过程（	数据汇总		计算月同比，月环比）
-- Create table					
create table DWA_M_SX_ADD_USER_TREND					
(					
MONTH_ID  varchar2(6),					
ADD_USER_CNT_TM  NUMBER,					
M_HB_RATIO  NUMBER ,					
M_TB_RATIO  NUMBER					
)					
TABLESPACE TBS_DWA;					
-- Add comments to the table 					
comment on table DWA_M_SX_ADD_USER_TREND					
  is '山西月新增用户趋势';					
-- Add comments to the columns 					
comment on column DWA_M_SX_ADD_USER_TREND.MONTH_ID					
  is '月份ID';					
comment on column DWA_M_SX_ADD_USER_TREND.ADD_USER_CNT_TM					
  is '月新增用户';					
comment on column DWA_M_SX_ADD_USER_TREND.M_HB_RATIO					
  is '月环比';					
comment on column DWA_M_SX_ADD_USER_TREND.M_TB_RATIO					
  is '月同比';					
					
CREATE OR REPLACE PROCEDURE DWA.P_DWA_M_SX_ADD_USER_TREND(					
       V_MONTH   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DWA_M_SX_ADD_USER_TREND					
  *功能描述 --%@COMMENT:山西各地市月新增用户趋势分析					
  *执行周期 --%@PERIOD:月					
  *参数 --%@PARAM:V_MONTH 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-24					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(30);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
        --V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
BEGIN					
        V_PKG        := 'DWA_M_SX_ADD_USER_TREND';                    -- 分类名称					
        V_TAB        := 'DWA_M_SX_ADD_USER_TREND';       -- 表名					
        V_PROCNAME   := 'P_DWA_M_SX_ADD_USER_TREND';     -- 过程名称					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_MONTH,					
             'ALL_CITY',					
             'DWA',					
             V_PROCNAME,					
             'V_MONTH='|| V_MONTH,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_MONTH,					
             V_PKG,					
             V_PROCNAME,					
             'ALL_CITY',					
             SYSDATE,					
             V_TAB);					
					
        -- 条件判断1 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
        SELECT   count(1) CNT					
        FROM     DWA.DWA_SX_CITY_D_NEW_USERS					
        WHERE    SUBSTR(DATE_ID,1,6) ='''|| V_MONTH ||'''					
        AND      rownum < 2					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 1					
					
THEN					
        EXECUTE IMMEDIATE 'DELETE FROM DWA_M_SX_ADD_USER_TREND WHERE MONTH_ID='||V_MONTH;					
        --EXECUTE IMMEDIATE V_SQL;					
        EXECUTE IMMEDIATE 'INSERT INTO   DWA.DWA_M_SX_ADD_USER_TREND NOLOGGING					
                        SELECT '''||V_MONTH||''',					
                               ADD_USER_CNT_TM,  --月新增用户					
                               CASE WHEN ADD_USER_CNT_LM <>0 THEN  ROUND(( ADD_USER_CNT_TM- ADD_USER_CNT_LM)/ADD_USER_CNT_LM,2) ELSE NULL END					
                               D_HB_RATIO, --月环比					
                               CASE WHEN ADD_USER_CNT_LM <>0 THEN  ROUND(( ADD_USER_CNT_TM- ADD_USER_CNT_LY)/ADD_USER_CNT_LY,2) ELSE NULL END					
                               D_TB_RATIO --月同比					
                          FROM (SELECT SUM(CASE WHEN SUBSTR(DATE_ID,1,6)='||V_MONTH||'THEN ADD_USER_CNT ELSE 0 END )					
                                       ADD_USER_CNT_TM, --当月新增用户					
                                       SUM(CASE WHEN SUBSTR(DATE_ID,1,6)=TO_CHAR(ADD_MONTHS(TO_DATE('||V_MONTH||', ''YYYYMM''), -1),''YYYYMM'') THEN ADD_USER_CNT ELSE 0 END )					
                                       ADD_USER_CNT_LM, --上月新增用户					
                                       SUM(CASE WHEN SUBSTR(DATE_ID,1,6)=TO_CHAR(ADD_MONTHS(TO_DATE('||V_MONTH||', ''YYYYMM''), -12),''YYYYMM'') THEN					
                                       ADD_USER_CNT ELSE 0 END) ADD_USER_CNT_LY --上年新增用户					
                                  FROM DWA.DWA_SX_CITY_D_NEW_USERS					
                                 WHERE SUBSTR(DATE_ID,1,6)  BETWEEN TO_CHAR(ADD_MONTHS(TO_DATE('||V_MONTH||', ''YYYYMM''), -12),''YYYYMM'') AND '||V_MONTH||')';					
					
     -- EXECUTE IMMEDIATE V_SQL;					
					
         V_ROWLINE := SQL%ROWCOUNT;					
         COMMIT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_MONTH,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_MONTH,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;					
		
---------------------------------
declare
         v_date varchar2(8);
        --v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         --i number;
begin
          
          
          DWA.P_DWA_M_SX_ADD_USER_TREND('201904',v_retcode,v_retinfo);
          --DWA.P_DWA_M_SX_ADD_USER_TREND('201904',v_retcode,v_retinfo);
          DWA.P_DWA_M_SX_ADD_USER_TREND('202003',v_retcode,v_retinfo);
          --DWA.P_DWA_M_SX_ADD_USER_TREND('202003',v_retcode,v_retinfo);
          DWA.P_DWA_M_SX_ADD_USER_TREND('202004',v_retcode,v_retinfo);
          --DWA.P_DWA_M_SX_ADD_USER_TREND('202004',v_retcode,v_retinfo);
        
          dbms_output.put_line(v_retinfo);
end;	

select * from 		DWA_M_SX_ADD_USER_TREND;	


8.3		-- 新建表和对应存储过程（	数据汇总		计算地市日同比，地市日环比）
-- CREATE TABLE					
CREATE TABLE DWA_D_SX_CITY_ADD_USER_TREND					
(					
DATE_ID  VARCHAR2(8),					
AREA_ID  VARCHAR2(10),					
AREA_DESC VARCHAR2(100), 					
ADD_USER_CNT_TD  NUMBER,					
D_HB_RATIO  NUMBER ,					
D_TB_RATIO  NUMBER					
)					
TABLESPACE TBS_DWA;					
-- ADD COMMENTS TO THE TABLE 					
COMMENT ON TABLE DWA_D_SX_ADD_USER_TREND					
  IS '山西地市日新增用户趋势';					
-- ADD COMMENTS TO THE COLUMNS 					
COMMENT ON COLUMN DWA_D_SX_CITY_ADD_USER_TREND.DATE_ID					
  IS '日期ID';					
COMMENT ON COLUMN DWA_D_SX_CITY_ADD_USER_TREND.AREA_ID					
  IS '地市ID';					
COMMENT ON COLUMN DWA_D_SX_CITY_ADD_USER_TREND.AREA_DESC					
  IS '地市描述';  					
COMMENT ON COLUMN DWA_D_SX_CITY_ADD_USER_TREND.ADD_USER_CNT_TD					
  IS '日新增用户';					
COMMENT ON COLUMN DWA_D_SX_ADD_USER_TREND.D_HB_RATIO					
  IS '日环比';					
COMMENT ON COLUMN DWA_D_SX_CITY_ADD_USER_TREND.D_TB_RATIO					
  IS '日同比';					
					
CREATE OR REPLACE PROCEDURE DWA.P_DWA_D_SX_CITY_ADD_USER_TREND(					
       V_DATE   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DWA_D_SX_CITY_ADD_USER_TREND					
  *功能描述 --%@COMMENT:山西各地市日新增用户趋势分析					
  *执行周期 --%@PERIOD:日					
  *参数 --%@PARAM:V_DATE 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-24					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(30);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
        --V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
BEGIN					
        V_PKG        := 'DWA_D_SX_CITY_ADD_USER_TREND';                    -- 分类名称					
        V_TAB        := 'DWA_D_SX_CITY_ADD_USER_TREND';       -- 表名					
        V_PROCNAME   := 'P_DWA_D_SX_CITY_ADD_USER_TREND';     -- 过程名称					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_DATE,					
             'ALL_CITY',					
             'DWA',					
             V_PROCNAME,					
             'V_DATE='|| V_DATE,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_DATE,					
             V_PKG,					
             V_PROCNAME,					
             'ALL_CITY',					
             SYSDATE,					
             V_TAB);					
					
        -- 条件判断1 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
        SELECT   count(1) CNT					
        FROM     DWA.DWA_SX_CITY_D_NEW_USERS					
        WHERE    date_id ='''|| V_DATE ||'''					
        AND      rownum < 2					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 1					
					
THEN					
        EXECUTE IMMEDIATE 'DELETE FROM DWA_D_SX_CITY_ADD_USER_TREND WHERE DATE_ID='||V_DATE;					
        --EXECUTE IMMEDIATE V_SQL;					
        EXECUTE IMMEDIATE'INSERT INTO   DWA.DWA_D_SX_CITY_ADD_USER_TREND NOLOGGING					
                        SELECT DATE_ID,					
                               AREA_ID,					
                               (SELECT MAX(AREA_DESC)					
                                 FROM DIM.DIM_AREA_ID					
                                WHERE AREA_ID = A.AREA_ID) AREA_DESC,					
                               ADD_USER_CNT_TD,  --日新增用户					
                               CASE WHEN ADD_USER_CNT_LD <>0 THEN  ROUND(( ADD_USER_CNT_TD- ADD_USER_CNT_LD)/ADD_USER_CNT_LD,2) ELSE NULL END					
                               D_HB_RATIO, --日环比					
                               CASE WHEN ADD_USER_CNT_LM <>0 THEN  ROUND(( ADD_USER_CNT_TD- ADD_USER_CNT_LM)/ADD_USER_CNT_LM,2) ELSE NULL END					
                               D_TB_RATIO --日同比					
                          FROM (SELECT '||V_DATE||' DATE_ID,					
                                       AREA_ID,					
                                       SUM(CASE WHEN DATE_ID='||V_DATE||'THEN ADD_USER_CNT ELSE 0 END )					
                                       ADD_USER_CNT_TD, --日新增用户					
                                       SUM(CASE WHEN DATE_ID=TO_CHAR(TO_DATE('||V_DATE||', ''YYYYMMDD'') - 1, ''YYYYMMDD'') THEN ADD_USER_CNT ELSE 0 END )					
                                       ADD_USER_CNT_LD, --昨日新增用户					
                                       SUM(CASE WHEN DATE_ID=TO_CHAR(ADD_MONTHS(TO_DATE('||V_DATE||', ''YYYYMMDD''), -1),''YYYYMMDD'') THEN					
                                       ADD_USER_CNT ELSE 0 END) ADD_USER_CNT_LM --上月新增用户					
                                  FROM DWA.DWA_SX_CITY_D_NEW_USERS					
                                 WHERE DATE_ID BETWEEN TO_CHAR(ADD_MONTHS(TO_DATE('||V_DATE||', ''YYYYMMDD''), -1),''YYYYMMDD'') AND '||V_DATE||'					
                                 GROUP BY '||V_DATE||',AREA_ID) A					
                          ';					
					
     -- EXECUTE IMMEDIATE V_SQL;					
					
         V_ROWLINE := SQL%ROWCOUNT;					
         COMMIT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;					

--调用  DWA   存储过程
declare
         v_date varchar2(8);
        --v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         --i number;
begin
          
          
          dwa.P_DWA_D_SX_ADD_USER_TREND('20190401',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20190402',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200301',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200302',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200401',v_retcode,v_retinfo);
          dwa.P_DWA_D_SX_ADD_USER_TREND('20200402',v_retcode,v_retinfo);
        
          dbms_output.put_line(v_retinfo);
end;

select * from 	DWA_D_SX_CITY_ADD_USER_TREND;

9.1、DM层加工SQL    新建对应存储过程，生成视图

9.1、DM层加工SQL	新建对应存储过程，生成视图	（高	度汇总的数据，可以生成月同比，月环比）		
					
CREATE OR REPLACE PROCEDURE P_DM_VW_M_SX_ADD_USER(					
       V_MONTH   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DM_VW_M_SX_ADD_USER					
  *功能描述 --%@COMMENT:山西月新增用户趋势视图					
  *执行周期 --%@PERIOD:月					
  *参数 --%@PARAM:V_MONTH 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-25					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(30);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
       -- V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
BEGIN					
        V_PKG        := 'DM_VW_SX_ADD_USER_'||V_MONTH||'';                    -- 分类名称					
        V_TAB        := 'DM_VW_SX_ADD_USER_'||V_MONTH||'';       -- 表名					
        V_PROCNAME   := 'P_DM_VW_M_SX_ADD_USER';     -- 过程名称					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_MONTH,					
             'ALL_CITY',					
             'DM',					
             V_PROCNAME,					
             'V_MONTH='|| V_MONTH,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_MONTH,					
             V_PKG,					
             V_PROCNAME,					
             'ALL_CITY',					
             SYSDATE,					
             V_TAB);					
					
        -- 条件判断1 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
                SELECT   COUNT(1) CNT					
                FROM     DWA.DWA_M_SX_ADD_USER_TREND					
                WHERE    MONTH_ID ='''|| V_MONTH ||'''					
                AND      ROWNUM < 2					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 1					
					
THEN					
       EXECUTE IMMEDIATE 'CREATE OR REPLACE VIEW DM_VW_SX_ADD_USER_'||V_MONTH||' AS					
                  SELECT  MONTH_ID,					
                          ADD_USER_CNT_TM,					
                          M_HB_RATIO,					
                          M_TB_RATIO					
                     FROM DWA.DWA_M_SX_ADD_USER_TREND					
                   WHERE  MONTH_ID ='''|| V_MONTH ||''' WITH READ ONLY					
                          ';					
					
     -- EXECUTE IMMEDIATE V_SQL;					
      EXECUTE IMMEDIATE'SELECT COUNT(*) FROM DM_VW_SX_ADD_USER_'||V_MONTH||'' INTO V_ROWLINE;					
					
    --     V_ROWLINE := SQL%ROWCOUNT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_MONTH,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_MONTH,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;	

select * from ods.ods_execute_log;

--调用  DM   存储过程
declare
         v_date varchar2(8);
        --v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         --i number;
begin
          
          
          P_DM_VW_M_SX_ADD_USER('20190401',v_retcode,v_retinfo);
          --P_DM_VW_M_SX_ADD_USER('20190402',v_retcode,v_retinfo);
          P_DM_VW_M_SX_ADD_USER('20200301',v_retcode,v_retinfo);
         -- P_DM_VW_M_SX_ADD_USER('20200302',v_retcode,v_retinfo);
          P_DM_VW_M_SX_ADD_USER('20200401',v_retcode,v_retinfo);
         -- P_DM_VW_M_SX_ADD_USER('20200402',v_retcode,v_retinfo);
        
          dbms_output.put_line(v_retinfo);
end;				
select * from ods.ods_execute_log WHERE PROCNAME = 'P_DM_VW_M_SX_ADD_USER'	
9.2、DM层加工SQL	新建对应存储过程，生成视图	（高	度汇总的数据，可以生成日同比，日环比）		
CREATE OR REPLACE PROCEDURE P_DM_VW_D_SX_ADD_USER(					
       V_DATE   IN  VARCHAR2,					
       V_RETCODE OUT VARCHAR2,					
       V_RETINFO OUT VARCHAR2) AS					
					
  /*@					
  ****************************************************************					
  *名称 --%@NAME:   P_DM_VW_D_SX_ADD_USER					
  *功能描述 --%@COMMENT:山西日新增用户趋势视图、山西日地市新增用户趋势视图					
  *执行周期 --%@PERIOD:日					
  *参数 --%@PARAM:V_DATE 日期,格式YYYYMM					
  *参数 --%@PARAM:V_RETCODE  过程运行结束成功与否标志					
  *参数 --%@PARAM:V_RETINFO  过程运行结束成功与否描述					
  *创建人 --%@CREATOR:  liston					
  *创建时间 --%@CREATED_TIME:2021-11-25					
  *备注 --%@REMARK:					
  *修改记录 --%@MODIFY:					
  *来源表 --%@FROM:					
  *目标表 --%@TO:					
  *修改记录 --%@MODIFY:					
  ******************************************************************					
  @*/					
					
        V_PKG          VARCHAR2(300);					
        V_TAB          VARCHAR2(300);					
        V_PROCNAME     VARCHAR2(300);					
        V_ROWLINE      NUMBER;					
        V_COUNT        NUMBER;					
        --V_SQL          CLOB;					
        V_LOG_SN       NUMBER;					
BEGIN					
        V_PKG        := 'DM_VW_SX_ADD_USER_'||V_DATE||';DM_VW_SX_CT_ADD_USER_'||V_DATE;                    -- 分类名称					
        V_TAB        := 'DM_VW_SX_ADD_USER_'||V_DATE||';DM_VW_SX_CT_ADD_USER_'||V_DATE;       -- 表名					
        V_PROCNAME   := 'P_DM_VW_D_SX_ADD_USER';     -- 过程名称					
        SELECT ODS.SEQ_ODS_SQLPARSER.NEXTVAL					
        INTO V_LOG_SN                                   --运行日志序号					
        FROM DUAL;					
					
        -- 日志部分					
        ODS.P_INSERT_SQLPARSER_LOG_GENERAL(					
             V_LOG_SN,					
             V_DATE,					
             'ALL_CITY',					
             'DM',					
             V_PROCNAME,					
             'V_DATE='|| V_DATE,					
             SYSDATE,					
             V_TAB);					
					
        ODS.P_INSERT_LOG(					
             V_DATE,					
             V_PKG,					
             V_PROCNAME,					
             'ALL_CITY',					
             SYSDATE,					
             V_TAB);					
					
        -- 条件判断1 - 原始数据是否存在					
        EXECUTE IMMEDIATE  '					
        SELECT SUM(CNT)					
          FROM					
              (					
                SELECT   COUNT(1) CNT					
                FROM     DWA.DWA_D_SX_ADD_USER_TREND					
                WHERE    DATE_ID ='''|| V_DATE ||'''					
                AND      ROWNUM < 2					
                UNION ALL					
                SELECT   COUNT(1) CNT					
                FROM     DWA.DWA_D_SX_CITY_ADD_USER_TREND					
                WHERE    DATE_ID ='''|| V_DATE ||'''					
                AND      ROWNUM < 2					
               )					
        '					
        into					
        V_COUNT;					
					
IF V_COUNT = 2					
					
THEN					
        EXECUTE IMMEDIATE 'CREATE OR REPLACE VIEW DM_VW_SX_ADD_USER_'||V_DATE||' AS					
                  SELECT  DATE_ID,					
                          ADD_USER_CNT_TD,					
                          D_HB_RATIO,					
                          D_TB_RATIO					
                     FROM DWA.DWA_D_SX_ADD_USER_TREND					
                   WHERE  DATE_ID = '''||V_DATE||''' WITH READ ONLY					
                          ';					
					
      --EXECUTE IMMEDIATE V_SQL;					
					
        EXECUTE IMMEDIATE 'CREATE OR REPLACE VIEW DM_VW_SX_CT_ADD_USER_'||V_DATE||' AS					
                  SELECT  DATE_ID,					
                          AREA_DESC,					
                          ADD_USER_CNT_TD,					
                          D_HB_RATIO,					
                          D_TB_RATIO					
                     FROM DWA.DWA_D_SX_CITY_ADD_USER_TREND					
                   WHERE  DATE_ID = '''||V_DATE||'''   WITH READ ONLY ';					
        --EXECUTE IMMEDIATE V_SQL;					
        EXECUTE IMMEDIATE'					
                         SELECT SUM(CNT) FROM(					
                         SELECT COUNT(*) CNT FROM DM_VW_SX_ADD_USER_'||V_DATE||'					
                         UNION ALL					
                         SELECT COUNT(*) FROM DM_VW_SX_CT_ADD_USER_'||V_DATE||')					
                         ' INTO V_ROWLINE;					
       --  V_ROWLINE := SQL%ROWCOUNT;					
         V_RETCODE := 'SUCCESS';					
         V_RETINFO := '结束';					
					
ELSE					
         V_RETCODE := 'WAIT';					
         V_RETINFO := '等待数据';					
END IF;					
					
         -- 更新执行结果					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
					
EXCEPTION WHEN OTHERS THEN					
         V_RETCODE := 'FAIL';					
         V_RETINFO := SQLERRM;					
					
         ODS.P_UPDATE_LOG(					
                V_DATE,					
                V_PKG,					
                V_PROCNAME,					
                'ALL_CITY',					
                V_RETINFO,					
                V_RETCODE,					
                SYSDATE,					
                V_ROWLINE);					
					
         ODS.P_UPDATE_SQLPARSER_LOG_GENERAL(					
                V_LOG_SN,					
                V_RETCODE,					
                V_RETINFO);					
END;

alter table ODS.ODS_execute_log_his modify PKG_NAME varchar2(56);

select ACCT_MONTH,TABLE_NAME from ods.ods_execute_log WHERE PROCNAME = 'P_DM_VW_D_SX_ADD_USER'

select * from DM_VW_SX_ADD_USER_202003;
select * from DM_VW_SX_ADD_USER_202004;
select * from DM_VW_SX_ADD_USER_201904;
declare
         v_date varchar2(8);
        --v_area varchar2(2);
         v_retcode varchar2(100);
         v_retinfo varchar2(100);
         --i number;
begin
          
          
          P_DM_VW_D_SX_ADD_USER('20190401',v_retcode,v_retinfo);
          P_DM_VW_D_SX_ADD_USER('20190402',v_retcode,v_retinfo);
          P_DM_VW_D_SX_ADD_USER('20200301',v_retcode,v_retinfo);
          P_DM_VW_D_SX_ADD_USER('20200302',v_retcode,v_retinfo);
          P_DM_VW_D_SX_ADD_USER('20200401',v_retcode,v_retinfo);
          P_DM_VW_D_SX_ADD_USER('20200402',v_retcode,v_retinfo);
        
          dbms_output.put_line(v_retinfo);
end;

select * from DM_VW_SX_ADD_USER_20190401;DM_VW_SX_CT_ADD_USER_20190401
select * from DM_VW_SX_ADD_USER_20190402;DM_VW_SX_CT_ADD_USER_20190402
select * from DM_VW_SX_ADD_USER_20200301;DM_VW_SX_CT_ADD_USER_20200301
select * from DM_VW_SX_ADD_USER_20200302;DM_VW_SX_CT_ADD_USER_20200302
select * from DM_VW_SX_ADD_USER_20200401;DM_VW_SX_CT_ADD_USER_20200401
select * from DM_VW_SX_ADD_USER_20200402;DM_VW_SX_CT_ADD_USER_20200402

 

JUMPLANB
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
LANGCHI_数仓作业
B_planzp的博客
11-16 158
存储过程调用存储过程。
MemFire教程｜FastAPI+MemFire Cloud+LangChain开发ChatGPT应用-Part2
NimbleX_的博客
08-07 1252
上篇文章我们讲解了使用FastAPI+MemFire Cloud+LangChain进行GPT知识库开发的基本原理和关键路径的代码实现。使用FastAPI作为Web服务端框架完成了基本的Web服务端开发使用MemFire Cloud作为向量数据和个人文档数据存储使用LangChain进行AI应用开发，加载本地磁盘目录上的文档，计算embedding、存储到向量数据库使用OpenAI的GPT模型，完成问答功能的实现使用Next.js开发了一个简单的UI界面用于问答演示。
【Angular】路由跳转(代码跳转)
热门推荐
王如霜
11-27 3万+
【WHAT】      在Angular中，路由的作用就是建立URL路径和组件（页面，因为页面就是由组件构成）之间的对应关系，根据不同的URL路径匹配出相应的组件并渲染。 【HOW】 1. 定义路由配置 2. 创建根路由模块 3. 添加路由插座 (以上是基本且必须的三个步骤) 【示例：(文件如下)】                 1.在app.routes定义
The APR based Apache Tomcat Native library which allows optimal performance in production environmen...
diaojin6880的博客
09-10 300
The APR based Apache Tomcat Native library which allows optimal performance in production environments was not found on the java.library.path: [C:\Program Files\Java\jdk1.8.0_181\bin;C:\Windows\S...
windos下搭建 Nexus 版maven私库
lzy66666的博客
12-15 168
一：下载和安装 从官网下载对应windos版本的Nexus，下载后移动到安装目录，直接解压，找到bin目录，开启cmd窗口，输入nexus /run 启动 ， 浏览器访问http://127.0.0.1:8081/ 二：创建私库 三：配置setting.xml pom.xml配置的servers中Nexus账号密码 <server> <id>langchi-release</id> <username>..
2021年全球与中国洗胃行业市场规模及发展前景分析
麦田创投产业研究院的博客
11-09 157
2021年全球与中国洗胃行业市场规模及发展前景分析 本报告研究全球与中国市场洗胃的发展现状及未来发展趋势，分别从生产和消费的角度分析洗胃的主要生产地区、主要消费地区以及主要的生产商。重点分析全球与中国市场的主要厂商产品特点、产品规格、不同规格产品的价格、产量、产值及全球和中国市场主要生产商的市场份额。 主要生产商包括： Kantecare Wanrooe Medical Shanghai SMAF Yuewell Yangzhou Huike Comba Koden Nanjing Langchi Keli
canal应用
qq_33816292的博客
06-12 134
canal分享模块链接。
源码编译安装LAMP
潇的博客
06-12 862
LAMP 架构是目前成熟的企业网站应用模式之一，指的是协同工作的一整套系统和相关软件，能够提供动态Web站点服务及其应用开发环境。LAMP是一个缩写词，具体包括Linux操作系统、Apache网站服务器、MySQL数据库服务器、PHP(或Perl、Python)网页编程语言。本章将以源码编译的方式搭建LAMP环境，能够满足企业定制化的需求。在构建LAMP平台时，各组件的安装顺序依次为Linux、Apache、MySQL、PHP。其中Apache和MySQL的安装并没有严格的顺序；
C#操作MySQL从入门到精通(16)——使用子查询
qq_34059233的博客
06-09 153
我们在查询数据的过程中有时候查询的数据不是从数据库中来的，而是从另一个查询的结果来的，这时候就需要使用子查询，本文进行详细介绍！
Django UpdateView视图
人生苦短，何妨一试
06-11 426
UpdateView是Django中的一个通用视图，用于处理对象的更新操作。它允许用户更新一个已经存在的对象。UpdateView通常与一个模型表单一起使用，这样用户就可以看到当前对象的值，并可以修改它们。
SpringBoot+MyBatis批量插入数据的三种方式
pscool的博客
06-12 825
在开发过程中，我们经常会遇到往数据库表中插入大量数据的场景，比如excel批量导入数据。那么该如何快速地插入数据呢？我们可以考虑使用批量插入来实现，实测100000条数据添加，后附具体实现代码。用一个 for 循环，把数据一条一条地插入。/*** 第一种方案，用 for语句循环插入 10万 条数据*/i < count;i++) {user.setName("方案1测试" + i);user.setGender("男");user.setUsername("方案1测试");
liquibase做数据库版本管理
weixin_44554979的博客
06-10 203
通过这个配置就会自动启动liquibase。
springboot连接多个库
sunyingboaini的博客
06-11 192
一个SpringBoot项目，同时连接两个数据库：比如一个是Mysql数据库，一个是oracle数据库（啥数据库都一样，连接两个同为oracle的数据库，或两个不同的数据库，只需要更改对应的driver-class-name和jdbc-url等即可）注意：连接什么数据库，要引入对应数据库的包。
简单了解MySql以及一些简单的应用MySql
weixin_63323754的博客
06-14 1327
初始MySql，能够简单地使用MySql
场景设计题
大袤宏图
06-15 262
为什么要这样分表？跨库join如何解决？数据量突增怎么解决？ 如何解决线上问题？cpu狂飙怎么办？频繁minor gc怎么办？可能造成的原因是什么？如何避免？ 数据库 隔离级别，怎么实现的？当前读，快照读？MVCC？ 分库分表的设计？ 分布式事务出现过不一致吗？为什么？怎么解决？有什么方法避免？怎么监控？监控到怎么处理？什么时候需要人工接入 如何优雅的写代码？什么代码算做优雅？什么代码是规范？你们代码规范是什么样的？ 如何进行code review？ mysql innodb下，能不能不设置主键？主键
1）Java项目笔记搭建系统梳理相关知识
最新发布
WLKUYM的博客
06-15 520
工作有年头了，学到了很多技术，收获了很多。但是对与工作相关的专业技能知识的掌握杂而乱，不够全面系统。因此做了个项目笔记来辅助梳理所掌握内容，方便需要时拿出来看看，前面做的时候，反反复复重建过好几次，目前的笔记结构较为满意（看过很多资料，没有令我满意的，别人总结的再好，终究不是自己的）事先说明，咱不是卖书的，我搞得也是电子书。毕竟实体书太沉了，贵（或许买了就是块板砖，压箱底吃灰了，浪费钱），拿着也不方便，各位可以从脚本之家（宝藏哦）搜索对应书籍下载。
Qt项目天气预报(2) - 重写事件函数
mx_jun的博客
06-15 760
QMenu是Qt库中用于创建弹出式菜单的类，它通常出现在应用程序的顶部菜单栏、按钮的右键菜单或自定义上下文菜单中。//2.鼠标左键释放的时候获得鼠标当前值，对应的窗口位置也根据相对距离进行偏移。// 将窗口根据鼠标当前位置和偏移值进行移动(这个值是固定的，作为窗口移动的桥梁)//1.当鼠标左键被按下的时候记录鼠标/窗口当前值，还有鼠标与窗口的相对值。event->globalPos()-this->pos() - 作差求相对坐标。event->pos() -- 鼠标相对窗口的坐标 或者。
RAG：如何从0到1搭建一个RAG应用
Miao的博客
06-10 841
检索增强生成）是一种强大的工具，整合了从庞大知识库中检索到的相关信息，并以此为基础，指导大型语言模型生成更为精准的答案，从而显著提升了回答的准确性与深度。2020 年，Meta AI 研究人员提出了RAG的方法，用于提高 LLM 在特定任务上的性能。信息滞后：LLM 的知识是静态的，来源于当时训练时的数据，也就是 LLM 无法直接提供最新的信息。模型幻觉：实践表明，当前的生成式 AI 技术存在一定的幻觉，而在一些常见的业务应用中，我们是希望保证事实性的。私有数据匮乏。
数据库复习
never1624的博客
06-13 923
针对某一具体关系数据库的约束条件，反映某一具体应用所涉及的数据必须满足的语义要求关系模型应提供定义和检验这类完整性的机制，以便用统一的系统的方法处理它们，而不要由应用程序承担这一功能2关系代数。

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值