SQL块结构,条件循环语句的使用.docVIP

XXXX 数计学院实验报告 专业 XXX 实验室 XXXX 实验课程 大型数据库系统 实验名称 PL/SQL块结构，条件、循环语句的使用 姓名 XXX 学号 XXX 实验日期 XXXX 【】 …into…语句返回一行数据。 练习在PL/SQL中使用DML语句和动态SQL语句。 熟练掌握PL/SQL中的选择和循环语句的使用。 【】begin dbms_output.put_line(Hello world); end; set serveroutput on 定义一个PL/SQL块，将输入的字符串转换后向屏幕输出。declare str1 varchar2(20):=str1; str2 varchar2(2); str3 varchar2(20); len number(10); leng number(10); begin len:=1; leng:=length(str1); while len=leng loop str2:=substr(str1,len,1); if str2=a and str2=z then str3:=str3||upper(str2); elsif str2=A and str2=Z then str3:=str3||lower(str2); end if; len:=len+1; end loop; dbms_output.put_line(str3); end; 定义一个PL/SQL块，完成如下功能：输入一个3位数，输出其各个数位上的数字。 declare s number(20):=s; x number(4); y number(4); z number(4); begin x:=floor(s/100); y:=mod(floor(s/10),10); z:=mod(s,10); dbms_output.put_line(x); dbms_output.put_line(y); dbms_output.put_line(z); end; 编写PL/SQL程序，程序的功能是：输入员工号，输出该员工经理的姓名。 declare v_empno emp.empno%type:=v_emp; v_ename emp.ename%type; begin select ename into v_ename from emp where empno in (select mgr from emp where empno=v_empno); dbms_output.put_line(v_empno|| mgr is ||v_ename); end; 编写PL/SQL程序，根据输入的员工号，若职务是‘CLERK’提高工资1%。 declare v_empno emp.empno%type:=v_emp; v_sal emp.sal%type; begin select sal into v_sal from emp where empno=v_empno; dbms_output.put_line(old sal is||v_sal); update emp set sal=sal*1.01 where job=CLERK and empno=v_empno; select sal into v_sal from emp where empno=v_empno; dbms_output.put_line(new sal is||v_sal); end; 编写PL/SQL程序，程序的功能是：输入员工号，如果该员工工龄在20年之上，工资提高10%。 declare v_empno emp.empno%type:=v_emp; v_sal emp.sal%type; v_age number(4,2); begin select sal into v_sal from emp where empno=v_empno; dbms_output.put_line(Old sal is ||v_sal||.); update emp set sal=sal*1.1 where empno=v_empno and (sysdate-hiredate)/36520; select sal,(sysdate-hiredate)/365 age into v_sal,v_age from emp where empn