1. 程式人生 > >PL/SQL 上機練習(一)

PL/SQL 上機練習(一)

and 系列 begin dbm BE str2 合並 where sel

_(:_」∠)_ _(:_」∠)_ _(:_」∠)_騙訪問量系列_(:_」∠)_ _(:_」∠)_ _(:_」∠)_

題目描述:

對員工表中所有員工的姓名做如下處理:姓名的首字母在‘A‘到‘G‘ 之間,合並為第一個字符串,在‘H‘到‘O‘之間,合並為第二個字符串,在‘P‘到‘Z‘之間,合並為第三個字符串,姓名之間用空格相隔。

代碼:

DECLARE
str1 string(100);
str2 string(100);
str3 string(100);
CURSOR NAME_AG IS
SELECT ENAME FROM EMP WHERE substr(ENAME,0,1) BETWEEN A AND
G; name1 emp.ENAME%TYPE; CURSOR NAME_HO IS SELECT ENAME FROM EMP WHERE substr(ENAME,0,1) BETWEEN H AND O; name2 emp.ENAME%TYPE; CURSOR NAME_PZ IS SELECT ENAME FROM EMP WHERE substr(ENAME,0,1) BETWEEN P AND Z; name3 emp.ENAME%TYPE; BEGIN OPEN NAME_AG; OPEN NAME_HO; OPEN NAME_PZ; LOOP FETCH
NAME_AG INTO name1; EXIT WHEN NAME_AG%NOTFOUND; str1:=str1||name1|| ; END LOOP; LOOP FETCH NAME_HO INTO name2; EXIT WHEN NAME_HO%NOTFOUND; str2:=str2||name2|| ; END LOOP; LOOP FETCH NAME_PZ INTO name3; EXIT WHEN NAME_PZ%NOTFOUND; str3:=str3||name3|| ; END LOOP; dbms_output.put_line(str1); dbms_output.put_line(str2); dbms_output.put_line(str3);
END;

PL/SQL 上機練習(一)