|
SQL> -- create demo table
SQL> create table Employee(
2 empno Number(3) NOT NULL, -- Employee ID
3 ename VARCHAR2(10 BYTE), -- Employee Name
4 hireDate DATE, -- Date Employee Hired
5 orig_salary Number(8,2), -- Orignal Salary
6 curr_salary Number(8,2), -- Current Salary
7 region VARCHAR2(1 BYTE) -- Region where employeed
8 )
9 /
Table created.
SQL>
SQL> -- prepare data for employee table
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(122,'Alison',to_date('19960321','YYYYMMDD'), 45000, 48000, 'E')
3 /
1 row created.
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(123, 'James',to_date('19781212','YYYYMMDD'), 23000, 32000, 'W')
3 /
1 row created.
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(104,'Celia',to_date('19821024','YYYYMMDD'), 53000, 58000, 'E')
3 /
1 row created.
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(105,'Robert',to_date('19840115','YYYYMMDD'), 31000, 36000, 'W')
3 /
1 row created.
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(116,'Linda', to_date('19870730','YYYYMMDD'), 43000, 53000, 'E')
3 /
1 row created.
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(117,'David', to_date('19901231','YYYYMMDD'), 78000, 85000, 'W')
3 /
1 row created.
SQL> insert into Employee(empno, ename, hireDate, orig_salary, curr_salary, region)
2 values(108,'Jode', to_date('19960917','YYYYMMDD'), 21000, 29000, 'E')
3 /
1 row created.
SQL>
SQL>
SQL> create table job(
2 empno Number(3) NOT NULL, -- Employee ID
3 jobtitle VARCHAR2(10 BYTE) -- Employee job title
4 )
5 /
Table created.
SQL>
SQL> -- prepare data for job table
SQL>
SQL> insert into job(empno, jobtitle)
2 values(101, 'Painter');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(122, 'Tester');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(123, 'Dediator');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(104, 'Chemist');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(105, 'Accountant');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(116, 'Manager');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(117, 'Programmer');
1 row created.
SQL>
SQL> insert into job(empno, jobtitle)
2 values(108, 'Developer');
1 row created.
SQL>
SQL>
SQL> -- display data in the table
SQL> select * from Employee
2 /
EMPNO ENAME HIREDATE ORIG_SALARY CURR_SALARY R
---------- ---------- --------- ----------- ----------- -
122 Alison 21-MAR-96 45000 48000 E
123 James 12-DEC-78 23000 32000 W
104 Celia 24-OCT-82 53000 58000 E
105 Robert 15-JAN-84 31000 36000 W
116 Linda 30-JUL-87 43000 53000 E
117 David 31-DEC-90 78000 85000 W
108 Jode 17-SEP-96 21000 29000 E
7 rows selected.
SQL>
SQL> select * from job;
EMPNO JOBTITLE
---------- ----------
101 Painter
122 Tester
123 Dediator
104 Chemist
105 Accountant
116 Manager
117 Programmer
108 Developer
8 rows selected.
SQL>
SQL>
SQL>
SQL>
SQL> -- Cursors with subqueries
SQL>
SQL> -- A subquery in the FROM clause of a cursor within a cursor FOR loop:
SQL>
SQL> BEGIN
2 /* The FROM Clause of the SELECT statement contains a
3 subquery that select the total number of employees
4 enrolled in each dept */
5
6 FOR job_record IN
7 (SELECT jobtitle FROM job where empno = (SELECT empno FROM employee where ename='James')
8 )
9 LOOP
10
11 DBMS_OUTPUT.PUT_LINE(job_record.jobtitle);
12 END LOOP;
13 END;
14 /
Dediator
PL/SQL procedure successfully completed.
SQL>
SQL>
SQL>
SQL>
SQL> drop table job;
Table dropped.
SQL>
SQL> -- clean the table
SQL> drop table Employee
2 /
Table dropped.
SQL>
SQL>
SQL>
|