07_PLSQL编程

《07_PLSQL编程》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、PL/SQL编程Oracle中的高级编程——PL/SQLSQL语句上的一个分支，但是PL/SQL只适合于oracleSQL语句没什么区别：按固定格式编写即可：declare变量begin执行SQL语句，也可以执行任何的输出代码end;/默认情况下，Oracle中的系统输出是关闭的，即，没有任何内容显示在屏幕上declareinumber;begin--输出ii:=10;dbms_output.put_line('i='

2、

3、i);end;/setserveroutputonà打开系统输出完成以下功能：要求用户可以自己输入雇员

4、ID，同时打印出个人全部信息在Oracle中使用&可以完成信息的输入select*fromempwhereempno=&empno;希望编写一个PL/SQL块，PLSQL块之中编写用户输入信息的提示，同时，查找数据，要求输入一个雇员编号，将雇员的名字打印出来。declareenonumber;namevarchar(20);begindbms_output.put_line('请输入雇员编号：');--输出ieno:=&empno;E-Mail：mldnqa@163.com--最终结果要的是将名字取出，同时打印SELECT

5、enameINTOnameFROMempWHEREempno=eno;dbms_output.put_line('姓名是='

6、

7、name);end;/在PLSQL之中如果没有合适的数据，则默认情况下会产生错误，与java没加try块一样declareBeginexceptionEnd;/declareenonumber;namevarchar(20);begindbms_output.put_line('请输入雇员编号：');--输出ieno:=&empno;--最终结果要的是将名字取出，同时打印SELECTenameIN

8、TOnameFROMempWHEREempno=eno;dbms_output.put_line('姓名是='

9、

10、name);exception--匹配错误WHENno_data_foundTHENdbms_output.put_line('没有这个员工');end;/在PL/SQL之中同样包含了程序的控制语言：循环、条件判断循环·循环的初始条件·循环的结束条件·循环条件的变更LOOP循环的主体（语句）ExitWHEN条件;E-Mail：mldnqa@163.com修改条件ENDLOOP;现在打印1~10declarein

11、umber;begini:=1;loopdbms_output.put_line('i='

12、

13、i);exitwheni>=10;i:=i+1;endloop;end;/问题？给所有的员工工资增加10%。à游标如果只用循环，只能确定循环的个数–》count函数LOOP..ENDLOOP循环至少执行了一次，先执行再判断WHILE…LOOP先判断再执行declareinumber;begini:=1;while(i<=10)loopdbms_output.put_line('i='

14、

15、i);i:=i+1;endloop;end;

16、/每次都要手工修改条件，比较麻烦，通过for循环，所以在PL/SQL之中提供了专门的for循环操作for变量in最小值..最大值loopendloop;declareinumber;E-Mail：mldnqa@163.combegini:=1;foriin1..10loopdbms_output.put_line('i='

17、

18、i);endloop;end;/条件判断：If条件then语句Endif;求出总记录数，之后判断记录数是否大于10，如果大于10，则打印记录多余10条declareinumber;beginselec

19、tcount(empno)INTOifromemp;ifi>=10thendbms_output.put_line('记录大于10条。');endif;end;/If…else..endifdeclareinumber;beginselectcount(empno)INTOifromemp;ifi<=10thendbms_output.put_line('记录小于10条。');elsedbms_output.put_line('记录大于10条。');endif;end;/多条件分支Ifthen..elsifthen…els

20、if…else…endif;declareinumber;E-Mail：mldnqa@163.combeginselectcount(empno)INTOifromemp;ifi<=10thendbms_output.put_line('记录小于10条。');elsifi>10andi<=20thend