PLSQL基础学习

/*
简单plsql语句 
set serveroutput on
*/
declare 
  pnumber number(7,2);
  pname varchar2(20);
  pdate date;
begin
  pnumber:=1;
  dbms_output.put_line('数字:'||pnumber);
  
  pname:='飞鸟与蝉';
  dbms_output.put_line(pname);
  
  pdate:=sysdate;
  dbms_output.put_line(pdate);
  
  dbms_output.put_line(pdate+1);
end;
/
--使用引用型变量
declare 
  pjgdm tb_djd_yyxt_yjxx_sj.jgdm%type;
  pjgmc tb_djd_yyxt_yjxx_sj.jgmc%type;
begin
  select jgdm,jgmc into pjgdm,pjgmc from tb_djd_yyxt_yjxx_sj  where tb_djd_yyxt_yjxx_sj.id=1080754;
  dbms_output.put_line(pjgdm||'的名称是:'||pjgmc);
end;
/
--使用记录型变量
declare 
  --定义记录型变量:注意代表一行
  prow tb_djd_yyxt_yjxx_sj%rowtype;
begin
  select * into prow from tb_djd_yyxt_yjxx_sj where tb_djd_yyxt_yjxx_sj.id=1080754;
  dbms_output.put_line(prow.jgdm||'的名称是:'||prow.jgmc);
end;
/

/*
判断用户从键盘输入的数字
1.如何使用if语句
2.接收一个键盘输入(字符串)
set serveroutput on
accept num prompt'请输入一个数字';
*/
declare
  pnum number:=#--num:地址值,含义是该地址上保存输入的值。类似C++
begin
  if pnum=0 then dbms_output.put_line('您输入的数字是0');
   elsif pnum=1 then dbms_output.put_line('您输入的数字是1');
   elsif pnum=2 then dbms_output.put_line('您输入的数字是2');
   else dbms_output.put_line('您输入的数字是'||pnum);
  end if;
end;
/
--使用while循环
declare 
  pnum number:=1;
begin
  while pnum<=5 loop
    dbms_output.put_line('while:'||pnum);
    pnum:=pnum+1;
  end loop;
end;
/
  
--loop循环
declare 
  pnum number:=1;
begin
loop
  exit when pnum>5;
  dbms_output.put_line('loop:'||pnum);
  pnum:=pnum+1;
end loop;
end;
/
--for循环
declare 
begin
  for pnum in 1..5 loop
    dbms_output.put_line('for:'||pnum);
  end loop;
end;
/


--cursor光标(结果集)
declare 
  cursor cs is select jgdm,jgmc from tb_djd_yyxt_yjxx_sj  where tb_djd_yyxt_yjxx_sj.id in (1080754,1080755);
  pjgdm tb_djd_yyxt_yjxx_sj.jgdm%type;
  pjgmc tb_djd_yyxt_yjxx_sj.jgmc%type;
  
begin
  --打开光标
  open cs;
  loop
    fetch cs into pjgdm,pjgmc;
  exit when cs%notfound;
    dbms_output.put_line(pjgdm||'的名称是:'||pjgmc);
  end loop;
  --关闭光标
  close cs;
end;


--带参数的光标
declare 
  cursor cs(pid number) is select yjhm,product from tb_djd_xyd_yjxx_sj_his  where tb_djd_xyd_yjxx_sj_his.id=pid ;
  yjhm varchar2(50);
  product varchar2(50);
  
begin
  --打开光标
  open cs(71854991);
  loop
    fetch cs into yjhm,product;
  exit when cs%notfound;
    dbms_output.put_line(yjhm||'的名称是:'||product);
  end loop;
  --关闭光标
  close cs;
end;
/

--例外,then相当于大括号,可以写多条语句
declare 
  pnum number;
begin
  pnum:='哈哈';
exception
  when value_error then dbms_output.put_line('算数或转换异常');
  when others then dbms_output.put_line('其他异常');
end;
/

--自定义例外
declare 
  cursor cs(pid number) is select yjhm,product from tb_djd_xyd_yjxx_sj_his  where tb_djd_xyd_yjxx_sj_his.id=pid ;
  yjhm varchar2(50);
  product varchar2(50);
  not_found exception;
  
begin
  --打开光标
  open cs(1);
  fetch cs into yjhm,product;
  if cs%notfound then
    raise not_found;
  end if;
  --关闭光标
  close cs;
  exception 
    when not_found then dbms_output.put_line('未找到数据');
    when others then dbms_output.put_line('其他例外');
end;
/

    
    
    






    
    
    





    




最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 204,921评论 6 478
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 87,635评论 2 381
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 151,393评论 0 338
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 54,836评论 1 277
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 63,833评论 5 368
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 48,685评论 1 281
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 38,043评论 3 399
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 36,694评论 0 258
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 42,671评论 1 300
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 35,670评论 2 321
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 37,779评论 1 332
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 33,424评论 4 321
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 39,027评论 3 307
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 29,984评论 0 19
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 31,214评论 1 260
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 45,108评论 2 351
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 42,517评论 2 343