1. 定义一个pl/sql块，向屏幕输出hello world！。
1 declare
2 begin
3 dbms_'hello world!')
4* end;
sql> /
hello world!
pl/sql 过程已成功完成。
2. 定义一个pl/sql块，将输入的字符串中大小写相互转换后向屏幕输出。例如，输入abdce，输出abdce
declare
str1 varchar2(20):=str1';
str2 varchar2(2);
str3 varchar2(20);
len number(10);
leng number(10);
beginlen:=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_end;
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_
20* end;
sql> /
输入 str1 的值： dfaerertdfdedf
原值 2: str1 varchar2(20):=str1';
新值 2: str1 varchar2(20):=dfaerertdfdedf';
dfaerertdfdedf
pl/sql 过程已成功完成。
3. 定义一个pl/sql块，完成如下功能：输入一个3位数，输出其各个数位上的数字。
declare
abc number(20):=abc;
a number(4);
b number(4);
c number(4);
begina:=floor(abc/100);
b:=mod(floor(abc/10),10);
c:=mod(abc,10);
dbms_dbms_
dbms_end;
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_
11 dbms_
12 dbms_
13* end;
sql> /
输入 abc 的值： 346
原值 2: abc number(20):=abc;
新值 2: abc number(20):=346;
pl/sql 过程已成功完成。
4. 编写pl/sql程序，程序的功能是：输入员工号，输出该员工经理的姓名。
1 declare
2 v_empno '&v_emp';
3 v_ename
4 begin
5 select ename
6 into v_ename
7 from emp
8 where empno in(select mgr from emp where empno=v_empno);
9 dbms_' manager is '|v_ename);
10* end;
sql> /
输入 v_emp 的值： 7369
原值 2: v_empno '&v_emp';
新值 2: v_empno '7369';
7369 manager is ford
pl/sql 过程已成功完成。
sql> /
输入 v_emp 的值： 7566
原值 2: v_empno '&v_emp';
新值 2: v_empno '7566';
7566 manager is king
pl/sql 过程已成功完成。
5. 编写pl/sql程序，根据输入的员工号，若职务是‘clerk’提高工资1%。
工作为’clerk’
1 declare
2 v_empno '&v_emp';
3 v_sal
4 begin
5 select sal into v_sal from emp where empno=v_empno;
6 dbms_'old sal is'||v_sal);
7 update emp
8 set sal=sal*1.01
9 where job='clerk' and empno=v_empno;
10 select sal into v_sal from emp where empno=v_empno;
11 dbms_'new sal is'||v_sal);
12* end;
输入 v_emp 的值： 7934
原值 2: v_empno '&v_emp';
新值 2: v_empno '7934';
old sal is1300
new sal is1313
pl/sql 过程已成功完成。
工作不是’clerk’
1 declare
2 v_empno '&v_emp';
3 v_sal
4 begin
5 select sal into v_sal from emp where empno=v_empno;
6 dbms_'old sal is'||v_sal);
7 update emp
8 set sal=sal*1.01
9 where job='clerk' and empno=v_empno;
10 select sal into v_sal from emp where empno=v_empno;
11 dbms_'new sal is'||v_sal);
12* end;
输入 v_emp 的值： 7566
第四次定时作业
2006年秋九年级第四次定时作业历史部分。温馨提示 1 端正思想，规范答题。2 注意书写工整，保持卷面整洁。一 单项选择题 共30分 在下列各题的四个选项中，只有一项是符合题意的，请选出并将其字母标号填在相应的空格内。每小题2分，共30分 一位游客在美国卢浮博物馆听讲解员指着一历史文物说 石柱上的法...
西经第四次作业
西经第四次作业理论联系实际题。目的 案例分析是检测对西方经济理论理解 运用的方法之一。通过对经济案例的分析，既可以训练学生加深对西方主要经济理论的理解与把握，同时也可以使学生理解我国社会主义市场经济建设过程中实施的各项政策。本案例分析题让学生理清通货膨胀理论 财政理论 货币理论等基本内容，在理清理论...
西经第四次作业
理论联系实际题。目的 案例分析是检测对西方经济理论理解 运用的方法之一。通过对经济案例的分析，既可以训练学生加深对西方主要经济理论的理解与把握，同时也可以使学生理解我国社会主义市场经济建设过程中实施的各项政策。本案例分析题让学生理清通货膨胀理论 财政理论 货币理论等基本内容，在理清理论的同时，能够对...