2014년 5월 19일 월요일

[오라클 PL/SQL, 테이블타입]PLSQL Table Type예제

[오라클 PL/SQL, 테이블타입]PLSQL Table Type예제

create or replace procedure tabletypeexam
is
type emp_table_type is table of emp%ROWTYPE index by binary_integer;
        emp_table emp_table_type;

cursor emp_cursor is
        select * from emp;

        i number := 0;

begin
DBMS_OUTPUT.PUT_LINE('사번'||' 이름' || '급여' );
        DBMS_OUTPUT.PUT_LINE('------------------------');

open emp_cursor;
loop
                i := i + 1;
fetch emp_cursor into emp_table(i);
  exit  when emp_cursor%notfound;
end loop;
close emp_cursor;

for i in emp_table.first..emp_table.last loop
DBMS_OUTPUT.PUT_LINE(emp_table(i).empno||' '||emp_table(i).ename||' '||emp_table(i).sal) ;
end loop;
end;
/

[결과]

사번 이름급여
------------------------
7369 SMITH 800
7499 ALLEN 1600
7521 WARD 1250
7566 JONES 2975
7654 MARTIN 1250
7698 BLAKE 2850
7782 CLARK 2450
7788 SCOTT 3000
7839 KING 5000
7844 TURNER 1500
7876 ADAMS 1100
7900 JAMES 950
7902 FORD 3000
7934 MILLER 1300

댓글 없음:

댓글 쓰기