|
SQL>
SQL> create or replace type employeeType is object (
2 empNo NUMBER,
3 eName VARCHAR2(10),
4 job VARCHAR2(9),
5 hireDate DATE,
6 sal NUMBER,
7 comm NUMBER,
8 member procedure p_changeName (i_newName_tx VARCHAR2),
9 member function f_getIncome_nr return VARCHAR2
10 )
11 /
SP2-0816: Type created with compilation warnings
SQL>
SQL> create or replace type body employeeType as
2 member function f_getIncome_nr return VARCHAR2 is
3 begin
4 return sal+comm;
5 end f_getIncome_nr;
6
7 member procedure p_changeName (i_newName_tx VARCHAR2) is
8 begin
9 eName:=i_newName_tx;
10 end p_changeName;
11 end;
12 /
SP2-0818: Type Body created with compilation warnings
SQL>
SQL> desc employeeType
Name Null? Type
---------------------------------
EMPNO NUMBER
ENAME VARCHAR2(10)
JOB VARCHAR2(9)
HIREDATE DATE
SAL NUMBER
COMM NUMBER
METHOD
------
MEMBER PROCEDURE P_CHANGENAME
Argument Name Type In/Out Default?
------------------------------ ----------------------- ------ --------
I_NEWNAME_TX VARCHAR2 IN
METHOD
------
MEMBER FUNCTION F_GETINCOME_NR RETURNS VARCHAR2
SQL> /
SP2-0818: Type Body created with compilation warnings
SQL>
SQL> drop type employeeType;
Type dropped.
SQL>
SQL>
|