欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

指导写一个oracle存储过程

更新时间: 2014-01-05 02:13:42 责任编辑: Author_N1

 

求助指导写一个oracle存储过程
有两张表,分别是cust_info(客户信息表)和cust_dep_info(客户用盈利表)。
cust_info表中有三个字段,分别为cust_id(varchar2),cust_name(varchar2),cust_type(varchar2);
cust_dep_info表中有四个字段,分别是account_id(number),cust_id(varchar2),money(number),mounth(date)。

cust_info 中的cust_id 与cust_dep_info 中的cust_id关联。

存储过程实现:
给出一个日期,然后计算与日期对应的每个客户的money占总money的比例,根据计算出的这个比例,将客户划分成不同级别,然后将级别更新到cust_info表的cust_type字段中。

所占比例及对应的客户类型如下:
 [0 - 20%] 核心客户
(20% - 80%]战略客户
(80% - 100]普通客户

使用oracle中的存储过程实现。请大神赐教,菜鸟初入职场,能力有限,必定认真领会,感激不尽!

--参考方法--
只是大概思路,没有环境执行,不知道有没有语法错误:

merge into cust_info using
(select t1.cust_id,
case when t1.cust_tot/t2.tot_money<=0.2 then '核心客户'
when t1.cust_tot/t2.tot_money>0.2 and t1.cust_tot/t2.tot_money<=0.8 then '战略客户'
when t1.cust_tot/t2.tot_money>0.8 then '普通客户' 
end cals
from 
(select cust_id,sum(money) cust_tot where mounth=pi_dt group by cust_id) t1,
(select sum(money) tot_money from cust_dep_info where mounth=pi_dt) t2) t3
on (cust_info.cust_id=t3.id)
when matched then
update set cust_info.cust_type=t3.cals

--参考方法--

--建表和插入数据
create table cust_dep_info
(account_id number,
 cust_id varchar2(20), 
 money number, 
 month date);
 
create table cust_info (
 cust_id varchar2(20) primary key,
 cust_name varchar2(50),
 cust_type varchar2(20)
);


insert into cust_info select level, 'Name' 
--参考方法--
 to_char(level), null
from dual connect by level <= 100;
commit;

insert into cust_dep_info
select level, level, round(DBMS_RANDOM.VALUE(1,1000)), trunc(sysdate) - mod(level, 7)
from dual
connect by level <= 100;
commit;

--Merge,假设给定日期就是今天。
merge into cust_info
using (
  with all_cust as (
    select count(*) cust_count from cust_dep_info
    where month=trunc(sysdate)
  ),
  ranking (core, ordinary) as (
    select trunc(cust_count*0.2), trunc(cust_count * 0.8) 
    from all_cust
  )
  select t2.*,
    case 
    when t2.rn <= ranking.core then '核心客户'
    when (t2.rn >ranking.core and t2.rn <= ranking.ordinary) then '战略客户'
    when t2.rn > ranking.ordinary then '普通客户' 
    end lev
    from 
    (
    select t1.*, rownum rn  from (
      select cust_id, money,round(ratio_to_report(sum(money)) over(),3) ratio 
      from cust_dep_info
      where month=trunc(sysdate)
      group by cust_id, money
      order by ratio desc
    ) t1
  ) t2, ranking
) src
on (cust_info.cust_id = src.cust_id)
when matched then 
update set cust_type=src.lev;
commit;
select * from cust_info;


我的理解是:
先按比例从大到小排序,排名在前20%是核心客户,20%(不包含)-80%(包含)是战略客户,依此类推。
请楼主给分。
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 02:13:42
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/7205/
本文WWW.DOC100.NET DOC100.NET版权所有。