练习九 组函数应用

1 表数据

SQL> select * from contract_kangjia;

         1 VIVI                 10-10月-14     1                          1000  
         2 VIVI                 10-9月 -14     2                          1000  
         3 VIVI                 10-10月-14     3                          1000  
         4 LILI                 10-10月-14     1                          1000  
         5 LILI                 10-9月 -14     2                          1000  
         6 LILI                 10-10月-14     3                          1000  

已选择6行。

2 查询vivi九月与十月销售差额

效率高

create or replace procedure TEST_KANGJIA2(Name_bi in VARCHAR2,
                                          v_date1 in date,
                                          v_date2 in date) is
  /***************************************************************
  *NAME : BATCH_INSERT_TABLEA_P
  *PURPOSE : --统计某个员工两个月份销售金额差额
  *IMPUT : --  表名子
  *OUTPUT : -- N/A
  *Author : -- CICI
  *CreateDate : -- 2014、10、17
  *UpdateDate : --
  ************************************************************/
  V_diff_money NUMBER(10, 5);
  v_timer2     date;
  v_timer1     date;
  ----V_diff_timer= 6000
begin
  select sysdate into v_timer1 from dual;

  for control_val in 0 .. 111111 loop
    select STDDEV(sell_money)
      into V_diff_money
      from (select busiman_name, sell_money, sell_date
              from CONTRACT_KANGJIA
             where (sell_date = v_date1 or sell_date = v_date2)
               and busiman_name = Name_bi)
     group by busiman_name;
   -- dbms_output.put_line('V_busiman_name= ' || Name_bi);
   -- dbms_output.put_line('V_sell_money=' || V_diff_money);
   -- dbms_output.put_line('date1 =' || v_date1);
   -- dbms_output.put_line('date2 =' || v_date2);
  end loop;
  select sysdate into v_timer2 from dual;
  --计算毫秒级别时间差V_diff_timer= 6000

  dbms_output.put_line('V_diff_timer= ' ||
                       ROUND(TO_NUMBER(v_timer2 - v_timer1) * 24 * 60 * 60 * 1000));
end TEST_KANGJIA2;

  /* call
  TEST_KANGJIA2
  ('VIVI',TO_DATE('2014/09/10','YYYY/MM/DD'),TO_DATE('2014/10/10','YYYY/MM/DD'));*/

效率低

create or replace procedure diff_money_kangjia(name_business in varchar2,
                                               v_date1       in date,
                                               v_date2       in date) as
  v_diff_money varchar2(20);
  v_timer1     date;
  v_timer2     date;
begin
  select sysdate into v_timer1 from dual;

  for control_val in 0 .. 111111 loop
    select abs(a.s10 - b.s09) into v_diff_money
      from (select sum(sell_money) as s10
              from contract_kangjia
             where busiman_name = name_business
               and to_char(sell_date, 'yyyy/mm') =
                   to_char(v_date1, 'yyyy/mm')) a,
           (select sum(sell_money) as s09
              from contract_kangjia
             where busiman_name = name_business
               AND to_char(sell_date, 'yyyy/mm') =
                   to_char(v_date2, 'yyyy/mm')) b;
  end loop;
  select sysdate into v_timer2 from dual;
  --计算毫秒级别时间差V_diff_timer= 10000
  dbms_output.put_line('V_diff_timer= ' ||
                       ROUND(TO_NUMBER(v_timer2 - v_timer1) * 24 * 60 * 60 * 1000));
end diff_money_kangjia;
  /* call
  diff_money_kangjia
  ('VIVI',TO_DATE('2014/09/10','YYYY/MM/DD'),TO_DATE('2014/10/10','YYYY/MM/DD'));*/

3 查询vivi九月与十月销售差值比例

create or replace procedure TEST_KANGJIA3(Name_bi in VARCHAR2,
                                          v_date1 in date,
                                          v_date2 in date) is
  /*统计某个员工两个月份销售金额差值百分比*/
  V_diff_money VARCHAR2(20);

begin
   select   round((GREATEST (a.s,b.s)-least(a.s,b.s))/GREATEST (a.s,b.s), 2) * 100 || '%' into V_diff_money
     from (select sum(sell_money) s
             from contract_kangjia
            where busiman_name = Name_bi
              AND SELL_DATE = (To_date(v_date1, 'yyyy/mm/dd'))) a,
           (select sum(sell_money) s
                     from contract_kangjia
                    where busiman_name = Name_bi
                      AND SELL_DATE = (To_date(v_date2, 'yyyy/mm/dd'))) b;

  dbms_output.put_line('V_diff_money= ' || V_diff_money);
end TEST_KANGJIA3;

/*
call
TEST_KANGJIA3
('VIVI',TO_DATE('2014/09/10','YYYY/MM/DD'),TO_DATE('2014/10/10','YYYY/MM/DD'));
*/

 ORA-01861文字与格式字符串不匹配