Oracle练习——建表、查询、过程、函数的使用

Oracle练习——建表、查询、过程、函数的使用

题目：
1.类型表 t_type
      id 商品类型编号 主键
      name 类型名称

2.商品信息表 p_product
      id 商品编号   主键
      name 商品名称
      pro_date 生产日期
      eff_date 有效期
      price 商品单价
      p_unit 商品单位
      t_id 商品类型编号 ->关联类型表的id

3.订单表 o_orders
      id 订单编号   主键
      dealtime 成交时间
      p_id 商品编号 ->关联商品表的id
      p_num 商品数量
      c_name 客户名称
      o_oper 业务员名称
      tatol 订单总额

插入数据练习
一、类型表数据
    1 食品类
    2 生活用品
    3 电器
    4 厨房用品
二、商品表数据
    1，傻小子 ，20160215， 60天， 2.5， 包，1
    2，海飞丝 ，20160614， 730天数， 18.8， 瓶，2
    3，辣条 ，20161112， 30天， 1.5， 包，1
    4，苏泊尔电饭煲 ，20150803， null， 389， 台，3
    5，威猛先生 ，20160621， 730天， 36.8， 瓶，4
三、订单信息表
    001 20160610 1 200 傻小子工厂 张三 400
    002 20161120 1 300 傻小子工厂 张三 500
    003 20160820 2 60 海飞丝生产线 王语嫣 840
    004 20161201 3 100 辣条生产商 段誉 100
    005 20160606 4 100 苏泊尔总经销商 乔峰 3500
    006 20160411 5 200 威猛总代理    阿朱 5000

要求：

1.创建以上表，添加外键，添加如上数据，类型表数据用插入方法添加。

--创建类型表
create table t_type
(
  id number(2) primary key,    --将id设置为主键
  name varchar2(20)
)
--创建商品信息表
create  table p_product
(
  id number(2) primary key,    --将id设置为主键
  name varchar2(20),
  pro_date date,
  eff_date varchar2(5),
  price number(5,1),
  p_unit varchar2(4),
  t_id number(2),              --将t_id设置为外键，与类型表id关联
  constraint FK_t_id foreign key (t_id) references t_type(id)
)
--创建订单表
create table o_orders
(
  id varchar2(3) primary key,  --将id设置为主键
  dealtime date,
  p_num number(4),
  c_name varchar2(20),
  o_oper varchar2(20),
  tatol number(10), 
  p_id number(2),              --将p_id设置为外键，与商品信息表的id关联 
  constraint FK_p_id foreign key (p_id) references p_product(id)
)
添加数据：
向类型表添加数据
insert into t_type(id,name) values(1,'食品类');
insert into t_type(id,name) values(2,'生活用品');
insert into t_type values(3,'电器');
insert into t_type values(4,'厨房用品');
用for update 方法向商品表和订单信息表中添加数据
select * from p_product for update;
select * from o_orders for update;

查询出添加数据成功后的三张表格如下：





2.执行如下查询语句：
  2.1：查询商品名称和商品价格，商品类型。

select p.name ,p.price,t.name from p_product p,t_type t where t.id = p.t_id;

结果：


  2.2：查询由业务员王语嫣签订的订单，显示订单的编号，订单价格，订单中商品名称，商品数量。

select o.id,o.tatol,p.name,o.p_num  from o_orders o,p_product p 
 where o_oper = '王语嫣' and p.id = o.p_id;

结果：


  2.3：查询订单总额在1000元以上的所有订单，显示订单编号，订单商品名称，最后根据价钱排序。

select o.id,p.name,p.price,o.tatol from o_orders o,p_product p
 where o.tatol >1000 and o.p_id = p.id
 order by p.price desc;

结果：


  2.4：根据商品类型分类，查询出每个类型的商品各下个多次订单。

select t.name,x.count from t_type t,
(select count(c.id) count ,t_id from 
(select o.*,p.t_id from o_orders o,p_product p 
where o.p_id = p.id) c  group by t_id) x
where t.id = x.t_id;

结果：


  2.5：找出订单中金额最高的订单，显示此订单当中的商品名称，单价，订单总额。

select  p.name ,p.price ,o.tatol   from 
(select max(tatol) tatol from o_orders ) ta,p_product p,o_orders o 
where  p.id = o.p_id and ta.tatol = o.tatol;

结果：


  2.6：查询类型是食品类的所有订单信息，显示订单编号，订单成交的时间。

select o.id,o.dealtime, t.name from o_orders o, t_type t,p_product p
where  t.name = '食品类' and p.t_id = t.id and o.p_id = p.id;

结果：


  2.7：查询张三的所有订单，但是订单的编号，订单成交的时间，显示订单中商品的名称。

select o.id,o.dealtime,o.o_oper,p.name from o_orders o,p_product p
where o.o_oper = '张三' and o.p_id = p.id;

结果：


3.建立一个函数，输入商品编号，查询出商品的名称，如果无此商品编号抛出异常。

create or replace function checked(pid number)
return  varchar2 
is
   pname varchar2(10);
begin
  select p.name into pname from p_product p where p.id =pid;
  return  pname; 
  Exception
    when no_data_found then
     return '无此商品！';
end;

--调用
select checked(2) from dual;
结果：


4.建立一个存储过程，输入订单编号，打印出订单的金额，商品的数据，商品的名称，如果无此订单编号抛出异常。

create or replace procedure pro_tatol
(oid o_orders.id%type,otatol out number,oname out varchar2,opnum out number)
is
begin
  select o.tatol,o.p_num,p.name into otatol,opnum,oname 
  from o_orders o,p_product p
  where oid = o.id and p.id = o.p_id;
  dbms_output.put_line('订单的金额: '||otatol||' 商品的名称: '||oname||' 商品的数据: '||opnum);
  Exception 
    when no_data_found then
      dbms_output.put_line('无此订单！');
end;

--调用
declare
      otatol number;
      opnum  number;
      oname  varchar2(10);
begin
      pro_tatol('001',otatol,oname,opnum);
end;

结果：


5.建立一个存储过程，查询所有的商品信息，将所有商品单价+1元，单价超过300的
不进行涨价。

create or replace procedure cInfo
is
   myproduct  p_product%rowtype;
   cursor cur_c is select * from p_product ;    
begin    
   open cur_c;
     loop
         fetch cur_c into myproduct;
         exit when cur_c%notfound;
         if myproduct.price < 300 then
            update  p_product price set price = price+1  where id=myproduct.id;
            dbms_output.put_line(myproduct.name||'涨价了1元 ');
         else 
            dbms_output.put_line(myproduct.name||'不涨价');
         end if; 
     end loop; 
  close cur_c;
end;

--调用
  begin
        cInfo;
  end;
结果：


--查看
select * from p_product for update;
结果：

评论

2 楼 Sunflower-13 2017-01-05  

Sun_TW 写道

写得真好，加油，

谢谢鼓励、你也加油！

1 楼 Sun_TW 2017-01-05  

写得真好，加油，