Oracl数据库实验-PLSQL块结构,条件、循环语句的使用.docVIP

Oracle数据库基础 实验4 PL/SQL块结构，条件、循环语句的使用 【实验学时】 2学时 【实验目的】 学习匿名PL/SQL块的基本结构。 了解PL/SQL的基本数据类型。 掌握PL/SQL中变量和常量的定义方法。 学会在PL/SQL程序中使用复合数据类型：记录和集合。 学会使用select…into…语句返回一行数据。 练习在PL/SQL中使用DML语句和动态SQL语句。 熟练掌握PL/SQL中的选择和循环语句的使用。 【实验内容】 定义一个PL/SQL块，向屏幕输出hello world！。 SQL ed 已写入文件 afiedt.buf 1 declare 2 begin 3 dbms_output.put_line(hello,world); 4 exception 5 when others then 6 dbms_output.put_line(error); 7 raise; 8* end; SQL / hello,world PL/SQL 过程已成功完成。 定义一个PL/SQL块，将输入的字符串中大小写相互转换后向屏幕输出。例如，输入abDCe，输出ABdcE SQL ed 已写入文件 afiedt.buf 1 declare 2 str1 varchar2(20):=str1; 3 str2 varchar2(2); 4 str3 varchar2(20); 5 len number(10); 6 leng number(10); 7 begin 8 len:=1; 9 leng:=length(str1); 10 while len=leng loop 11 str2:=substr(str1,len,1); 12 if str2=a and str2=z then 13 str3:=str3||upper(str2); 14 elsif str2=A and str2=Z then 15 str3:=str3||lower(str2); 16 end if; 17 len:=len+1; 18 end loop; 19 dbms_output.put_line(str3); 20* end; SQL / 输入 str1 的值: ehhrfEdsd 原值 2: str1 varchar2(20):=str1; 新值 2: str1 varchar2(20):=ehhrfEdsd; EHHRFeDSD PL/SQL 过程已成功完成。 定义一个PL/SQL块，完成如下功能：输入一个3位数，输出其各个数位上的数字。 SQL ed 已写入文件 afiedt.buf 1 declare 2 abc number(20):=abc; 3 a number(4); 4 b number(4); 5 c number(4); 6 begin 7 a:=floor(abc/100); 8 b:=mod(floor(abc/10),10); 9 c:=mod(abc,10); 10 dbms_output.put_line(a); 11 dbms_output.put_line(b); 12 dbms_output.put_line(c); 13* end; SQL / 输入 abc 的值: 463 原值 2: abc number(20):=abc; 新值 2: abc number(20):=463; 4 6 3 PL/SQL 过程已成功完成。 编写PL/SQL程序，程序的功能是：输入员工号，输出该员工经理的姓名。 SQL ed 已写入文件 afiedt.buf 1 declare 2 v_empno emp.empno%type:=v_emp; 3 v_ename emp.ename%type; 4 begin 5 select ename 6 into v_ename 7 from emp 8 where empno in(select mgr from emp 9 where empno=v_empno); 10 dbms_output.put_line(v_empno||manager is||v_ename); 11* end; SQL / 输入