Oracle PL/SQL - Returning an implicit cursor into a record


Using the %ROWTYPE Clause on the Table Name


SQL> drop table emp;

Table dropped.-- www .  j a v a2 s. co m
SQL> create table emp(
  2    empno    number(4,0),
  3    ename    varchar2(10),
  4    job      varchar2(9),
  5    mgr      number(4,0),
  6    hiredate date,
  7    sal      number(7,2),
  8    comm     number(7,2),
  9    deptno   number(2,0)
 10  );

Table created.

SQL> insert into emp values(7839, 'KING', 'PRESIDENT', null, to_date('17-11-1981','dd-mm-yyyy'), 5000, null, 10);
SQL> insert into emp values(7698, 'BLAKE', 'MANAGER', 7839,to_date('1-5-1981','dd-mm-yyyy'), 2850, null, 30);
SQL> insert into emp values(7782, 'CLARK', 'MANAGER', 7839,to_date('9-6-1981','dd-mm-yyyy'), 2450, null, 10);
SQL> insert into emp values(7566, 'JONES', 'MANAGER', 7839,to_date('2-4-1981','dd-mm-yyyy'), 2975, null, 20);
SQL> drop table dept;

Table dropped.

Elapsed: 00:00:00.02
SQL> create table dept(
  2    deptno number(2,0),
  3    dname  varchar2(14),
  4    loc    varchar2(13),
  5    constraint pk_dept primary key (deptno)
  6  );

Table created.

SQL> insert into dept values(10, 'ACCOUNTING', 'NEW YORK');
SQL> insert into dept values(20, 'RESEARCH', 'DALLAS');
SQL> insert into dept values(30, 'SALES', 'CHICAGO');
SQL> insert into dept values(40, 'OPERATIONS', 'BOSTON');
SQL> declare
  2        r_emp emp%ROWTYPE;
  3  begin
  4        select emp.* into r_emp
  5        from emp, dept
  6        where emp.deptNo = dept.deptNo
  7        and   emp.deptNo = 20
  8        and emp.job = 'MANAGER';
  9        DBMS_OUTPUT.put_line('Dept 20 Manager is:'||r_emp.eName);
 10  end;
 11  /
Dept 20 Manager is:JONES

PL/SQL procedure successfully completed.

Related Topic