database.sarang.net
UserID
Passwd
Database
DBMS
MySQL
PostgreSQL
Firebird
ㆍOracle
Informix
Sybase
MS-SQL
DB2
Cache
CUBRID
LDAP
ALTIBASE
Tibero
DB 문서들
스터디
Community
공지사항
자유게시판
구인|구직
DSN 갤러리
도움주신분들
Admin
운영게시판
최근게시물
Oracle Q&A 23991 게시물 읽기
No. 23991
[PL/SQL관련]고수님들! 한번 봐주세요...컴파일시 에러발생때문에요..
작성자
김병수
작성일
2005-09-07 17:06ⓒ
2005-09-07 17:30ⓜ
조회수
1,191

CREATE OR REPLACE PACKAGE SCOTT.PACKAGE_ORG_P100_COMMON AS
TYPE EMP_STRUCT_LIST IS REF CURSOR;

TYPE EMP_STRUCT_TYPE AS OBJECT
(
EMPNO NUMBER(5),
ENAME VARCHAR2(20),
JOB VARCHAR2(9),
MGR NUMBER(4),
HIREDATE DATE,
SAL NUMBER(7,2),
COMM NUMBER(7,2),
DEPTNO NUMBER(2)
);

TYPE EMP_STRUCT_LIST AS TABLE OF EMP_STRUCT_TYPE;

/* EMP를 가져오는 함수 */
FUNCTION GET_EMP_INFO_LIST(EMP_NO IN NUMBER)
RETURN EMP_STRUCT_LIST;

END;

 

CREATE OR REPLACE PACKAGE BODY SCOTT.PACKAGE_ORG_P100_COMMON
AS
/* EMP를 가져오는 함수 */
FUNCTION GET_EMP_INFO_LIST(EMPNO IN NUMBER)
RETURN EMP_STRUCT_LIST
IS
V_EMPNO EMP.EMPNO%TYPE;
V_ENAME EMP.ENAME%TYPE;
V_JOB EMP.JOB%TYPE;
V_MGR EMP.MGR%TYPE;
V_HIREDATE EMP.HIREDATE%TYPE;
V_SAL EMP.SAL%TYPE;
V_COMM EMP.COMM%TYPE;
V_DEPTNO EMP.DEPTNO%TYPE;

EMP_LIST_DATA EMP_STRUCT_LIST := EMP_STRUCT_LIST();

CURSOR CUR_EMP IS
SELECT EMPNO, ENAME, JOB, MGR, HIREDATE, SAL, COMM, DEPTNO
FROM EMP
WHERE EMPNO LIKE EMPNO||'%';

INDEX_COUNT INTEGER;
BEGIN

OPEN CUR_EMP;
INDEX_COUNT := 1;
LOOP
FETCH CUR_EMP INTO V_EMPNO,V_ENAME, V_JOB, V_MGR, V_HIREDATE, V_SAL, V_COMM, V_DEPTNO;
EXIT WHEN CUR_EMP%NOTFOUND;

EMP_LIST_DATA.EXTEND;
EMP_LIST_DATA(INDEX_COUNT) := EMP_STRUCT_TYPE(V_EMPNO,V_ENAME,V_JOB,V_MGR,V_HIREDATE,V_SAL,V_COMM,V_DEPTNO);
INDEX_COUNT := INDEX_COUNT + 1;
END LOOP;
CLOSE CUR_EMP;

RETURN EMP_LIST_DATA;

END GET_EMP_INFO_LIST;

END PACKAGE_ORG_P100_COMMON;

 

컴파일시 에러가 발생합니다.

내용은

######################################

PACKAGE BODY created with compilation errors.
15/29 PLS-00103: 심볼 "TABLE"를 만났습니다 다음 중 하나가 기대될 때: object
opaque

######################################

 

꼭 좀 부탁드리겠습니다. 감사합니다.

오늘도 좋은하루 보내세요~~~

이 글에 대한 댓글이 총 1건 있습니다.

CREATE OR REPLACE PACKAGE SCOTT.PACKAGE_ORG_P100_COMMON AS
TYPE EMP_STRUCT_LIST IS REF CURSOR;

TYPE EMP_STRUCT_TYPE AS OBJECT
(
EMPNO NUMBER(5),
ENAME VARCHAR2(20),
JOB VARCHAR2(9),
MGR NUMBER(4),
HIREDATE DATE,
SAL NUMBER(7,2),
COMM NUMBER(7,2),
DEPTNO NUMBER(2)
);

TYPE EMP_STRUCT_LIST AS TABLE OF EMP_STRUCT_TYPE;

/* EMP를 가져오는 함수 */
FUNCTION GET_EMP_INFO_LIST(EMP_NO IN NUMBER)
RETURN EMP_STRUCT_LIST;

END;

 

이거 중복 선언 된 듯..

김흥수(protokhs)님이 2005-09-07 18:57에 작성한 댓글입니다.
[Top]
No.
제목
작성자
작성일
조회
23994평균 구하기 쿼리 [1]
이인호
2005-09-07
2411
23993디비접속 에러인거 같은데... [3]
orangebal
2005-09-07
1149
23992쿼리문 수정부탁드립니다. [2]
궁금궁금
2005-09-07
819
23991[PL/SQL관련]고수님들! 한번 봐주세요...컴파일시 에러발생때문에요.. [1]
김병수
2005-09-07
1191
23990if else문 질문입니다~ [1]
초보
2005-09-07
1132
23989Redhat FC 3에서 오라클 9.2설치할때 아래와 같이 나옵니다. [3]
유상민
2005-09-07
1247
23988tablespace 관련 질문 [1]
2005-09-07
2105
Valid XHTML 1.0!
All about the DATABASE... Copyleft 1999-2024 DSN, All rights reserved.
작업시간: 0.018초, 이곳 서비스는
	PostgreSQL v16.2로 자료를 관리합니다