PLSQL语言基础

《PLSQL语言基础》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、Oracle11g源代码第9章PL/SQL语言基础9.1顺序结构【9-1】setserveroutputondeclareaint:=100;bint:=200;cnumber;beginc:=(a+b)/(a-b);dbms_output.put_line(c);exceptionwhenzero_dividethendbms_output.put_line('除数不许为零!');end;/【9-2】setserveroutputondeclarevar_name专业.专业名%type;--声明与“专业名”列类型相同的变量var_job专业.学

2、制%type;--声明与“学制”列类型相同的变量beginselect专业名,学制intovar_name,var_jobfrom专业where专业号='001';--检索数据，并保存在变量中dbms_output.put_line('“'

3、

4、var_name

5、

6、'”专业的学制是：'

7、

8、var_job);--输出变量的值end;/【9-3】setserveroutputondeclaretypeemp_typeisrecord--声明record类型emp_type(var_enamechar(8),--定义字段/成员变量var_jobvarch

9、ar(10),var_salnumber);empinfoemp_type;--定义变量beginselect姓名,职务,工资--检索数据intoempinfofrom教工where职工号='81001';dbms_output.put_line('教工“'

10、

11、trim(empinfo.var_ename)

12、

13、'”的职务是：'

14、

15、empinfo.var_job

16、

17、'，工资是：'

18、

19、empinfo.var_sal);/*输出雇员信息*/end;【9-4】setserveroutputondeclarerowVar_emp部门%rowtype;--定

20、义能够存储emp表中一行数据的变量rowVar_empbeginselect*intorowVar_empfrom部门where部门号='01';--检索数据dbms_output.put_line('部门号：'

21、

22、rowVar_emp.部门号

23、

24、'，部门名：'

25、

26、rowVar_emp.部门名

27、

28、'，办公地点：'

29、

30、rowVar_emp.办公地点

31、

32、'，办公电话：'

33、

34、rowVar_emp.办公电话);end;/6.2分支结构【9-5】setserveroutputondeclarevar_name1varchar2(50);--定义两个字符串变

35、量var_name2varchar2(50);beginvar_name1:='East';--给两个字符串变量赋值var_name2:='xiaoke';iflength(var_name1)

36、

37、var_name1

38、

39、'”的长度比字符串“'

40、

41、var_name2

42、

43、'”的长度小');endif;end;/--执行代码【9-6】setserveroutputondeclareageint:=55;-

44、-定义整形变量并赋值beginifage>=56then--比较年龄是否大于56岁dbms_output.put_line('您可以申请退休了！');--输出可以退休信息elsedbms_output.put_line('您小于56岁，不可以申请退休了！');--输出不可退休信息endif;end;/【9-7】setserveroutputondeclaremonthint:=10;--定义整形变量并赋值beginifmonth>=0andmonth<=3then--判断春季dbms_output.put_line('这是春季');elsifmo

45、nth>=4andmonth<=6then--判断夏季dbms_output.put_line('这是夏季');elsifmonth>=7andmonth<=9then--判断秋季dbms_output.put_line('这是秋季');elsifmonth>=10andmonth<=12then--判断冬季dbms_output.put_line('这是冬季');elsedbms_output.put_line('对不起，月份不合法！');endif;end;/【9-8】setserveroutputondeclareseasonint:=3;

46、--定义整形变量并赋值aboutInfovarchar2(50);--存储月份信息begincaseseason--判断季度when1t