Question

pl/sql中如何实现对数据的快速增删改

若以下回答无法解决问题，邀请你更新回答

Answer 1

  --创建表
create table music(
id  number  primary key,--歌曲id
name  varchar2(10),--歌曲名称
singer varchar2(10),--歌手名称
album varchar2(10),--所在专辑
time varchar2(10)--年份
);

---drop table music;

---------------------------------
--创建序列
create or sequence seq_music  increment  by 1 start  with 1  nomaxvalue nocycle;
----------------------------------------------------------------------------

----------------------------------------------------------------------------------修改进程
create  or   replace procedure update_music(v_id music.id%type) is  
begin
    update music  set name='笑哈哈',singer='赵本山',album='sowhat',time= '2016'  where id=v_id;
end;
--   exec update_music(3);

---show error




----------------------------------------------------------------------------------插入进程
create  or   replace procedure insert_music(insert_num number) is  
    v_num  number:=0;
begin
loop
v_num:=v_num+1;
insert into music  values(seq_music.nextval,'呵呵哒','周星','what','2015');
dbms_output.put_line('恭喜插入');
exit when  v_num=insert_num;
end loop;
end;
--   exec insert_music(3);
---show error

-----------------------------------------------------------------查询 进程
create  or   replace procedure query_music is  ----(query_num number)先不带参数，
--定义变量接受数据
v_name music.name%type;
v_singer music.singer%type;
v_album music.album%type;
v_time music.time%type;
v_id  music.id%type;
begin  --查询数据
select    name,singer,album,time,id into  v_name,v_singer,v_album,v_time,v_id      from music where id=&v_id;--获取输入
dbms_output.put_line(v_id||'    '||v_name||'     '||v_singer||'    '||v_album||'    '||v_time);
end;

--   exec query_music;
---show error
---------别忘了      commit;
--------------------------------------------
-----------------------------------------------------------------查询多条的 进程  分页

create  or   replace procedure query_music(v_minnum  music.id%type ,v_maxnum  music.id%type ) is  ----(query_num number)先不带参数，
    --定义变量接受数据
    v_name music.name%type;
v_singer music.singer%type;
v_album music.album%type;
v_time music.time%type;
v_id   music.id%type;


cursor cursor_music is
   select *from 
   (  select rownum  rn,a.* from
         (select  id eid,name ename  from music    order  by id  ) a
   )where rn>= v_minnum and rn<= v_maxnum;
v_onemusic cursor_music%rowtype;
begin
--获取数据
open cursor_music;
--遍历获取数据
loop
--遍历游标
fetch  cursor_music  into v_onemusic;
exit when cursor_music%notfound;
--打印数据
dbms_output.put_line(v_onemusic.rn||'    '||v_onemusic.eid||'    '||v_onemusic.ename||'    '||v_onemusic.ename||'    '||v_onemusic.ename);
end loop;
end;
------------>>>>   exec query_music(4 ,7 ) ;
---show error;
---------别忘了      commit;
-----------------------------------------------------------------删除 进程------------
create  or   replace procedure delete_music(v_id music.id%type)  is
   --定义变量
   begin
   --删除数据
   delete from music where id=v_id;
--输出
dbms_output.put_line('恭喜删除');
end;
-- exec delete_music(47);

---show error