面向對象編程簡稱OOP編程，實際上是對現(xiàn)實世界事物的一種抽象的過程。它的核心是把對象的定義和實現(xiàn)進行區(qū)分，讓定義部分對象所具有的結構，讓實現(xiàn)部分根據定義部分定義的具體結構進行具體的實現(xiàn)。

創(chuàng)新互聯(lián)是一家以網絡技術公司，為中小企業(yè)提供網站維護、成都網站制作、成都網站建設、外貿營銷網站建設、網站備案、服務器租用、主機域名、軟件開發(fā)、微信小程序等企業(yè)互聯(lián)網相關業(yè)務，是一家有著豐富的互聯(lián)網運營推廣經驗的科技公司，有著多年的網站建站經驗，致力于幫助中小企業(yè)在互聯(lián)網讓打出自已的品牌和口碑，讓企業(yè)在互聯(lián)網上打開一個面向全國乃至全球的業(yè)務窗口：建站歡迎咨詢：18982081108

用于生產玩具的模具叫做類，通常設計類的過程也可以稱為建模，當然這個模不是模具的模，而是對類的模型進行建模。所生產的玩具可以叫做對象，類是對象的抽象，而對象是類的具體實例。類是抽象的，不占用內存，而對象是具體的，占用存儲空間。類是用于創(chuàng)建對象的藍圖，它是一個定義包括在特定類型的對象中的方法和變量的軟件模版。

對類的定義是一組具有相同數(shù)據結構和相同操作的對象的集合，類的定義包括一組代表其特性的屬性。以及一組表示其執(zhí)行行為的方法，類定義可以看作是一個具有相似特性與共同行為的對象模版，可以用來產生對象，而每個對象都是類的實例，都可以使用類中提供的方法，對象的具體狀態(tài)包含在對象實例變量中。

封裝:也叫做信息封裝，確保對象不會以不可預期的方式改變其他對象的內部狀態(tài)。只有在那些提供了內部狀態(tài)改變方法的對象中，才可以訪問其他內部狀態(tài)。每類對象都提供一個與其他對象聯(lián)系的接口，并規(guī)定了其他對象進行調用的方法

多態(tài)性:對象的引用和類會涉及其他許多不同類型的對象，而且引用對象所產生的結果將依據實際調用的類型

繼承性:允許在現(xiàn)存的對象基礎上創(chuàng)建子類對象，統(tǒng)一并增強了多態(tài)性和封裝性。典型地來說就是用類來對對象進行分組，而且還可以定義新類為現(xiàn)存的類的擴展，這樣就可以將類組織成樹型或網狀結構，這體現(xiàn)了對象的通用性。

對象類型實際上就是在上一小節(jié)中介紹的類型，類的實例就是對象。對象的類型封裝了數(shù)據結構和用于操縱這些數(shù)據結構的過程和函數(shù)，這使得通過定義對象類型就可以封裝一些較復雜的代碼，提高應用開發(fā)的效率和速度?？梢栽谝粋€對象類型說明部分聲明屬性和方法，屬性不能是常數(shù)，異常，游標或類型，最大的屬性聲明數(shù)量是1000個，但是必須至少聲明一個屬性，而方法是可選的。屬性描述了對象的特性，方法則是對象類型具有的功能。在PLSQL中，方法就是一些子程序，可以是函數(shù)，也可以是過程，方法名稱不能和它的對象類型名稱和屬性名稱一樣，方法在實例級別或對象類型級別被調用。

PLSQL中對象的組成結構

PLSQL中的對象類型是一種自定義的符合類型，它的定義與包的定義非常相似

對象類型規(guī)范:是對象與應用的接口，它用于定義對象的公用屬性和方法

對象類型體:用于實現(xiàn)對象類型規(guī)范所定義的公用方法.

例如在定義員工對象類型時，先在對象類型規(guī)范中定義好了對象的所有屬性，以及對象可被調用的方法聲明，這些方法并沒有具體的實現(xiàn)部分，僅可供外部調用的方法簽名。而具體的方法體代碼實現(xiàn)則定義在對象類型體中。

在定義對象類型的屬性時，不能指定對象屬性的默認值，也不能指定NOT NULL選項。

PLSQL中可以定義的幾種類型的方法

1.構造方法:該方法類似于JAVA等語言中的構造函數(shù)，用來初始化一個對象類型并返回對象的實例

2.MEMBER方法:該方法允許對象的實例進行調用，在MEMBER方法中可以訪問對象實例的數(shù)據，通常稱為實例方法或成員方法

3.STATIC方法:該方法可以直接在對象類型上進行調用，它用于在對象類型上執(zhí)行全局操作，通常稱為靜態(tài)方法

4.MAP方法:用于在多個對象間排序的映射方法。

5.ORDER方法:用于在兩個對象實例間排序的排序方法。

定義對象類型

對象類型包含對象類型規(guī)范和對象類型體兩大部分，因此在定義時必須先定義對象類型規(guī)范，然后再定義對象類型體.

定義employee_obj對象規(guī)范

create or replace type employee_obj as object(

empno number(4)，

ename varchar2(20)，

job varchar2(20),

sal number(10,2),

comm number(10,2)，

deptno number(4),

MEMBER procedure change_sal(p_empno number，p_sal number)，

MEMBER procedure change_comm(p_empno number，p_comm number)，

MEMBER procedure change_deptno(p_empno number，p_deptno number),

MEMBER procedure get_sal(p_empno number) return number,

MEMBER procedure get_comm(p_empno number) return number,

MEMBER procedure get_deptno(p_empno number) return integer

)NOT FINAL;  --指定該類可以被繼承，如果指定FINAL,表示該類無法被繼承

定義對象體

create or replace type body employee_obj

as

member procedure chang_sal(p_empno number，p_sal number)

is

begin

update emp set sal=p_sal where empno=p_empno;

end;

member procedure chang_comm(p_empno number，p_sal number)

is

begin

update emp set comm=p_comm where empno=p_empno;

end;

member procedure chang_deptno(p_empno number，p_sal number)

is

begin

update emp set deptno=p_deptno where empno=p_empno;

end;

member function get_sal (p_empno number)

return number

is

v_sal number(10,2);

begin

select sal into v_sal from emp where empno=p_empno;

return v_sal;

end;

member function get_comm(p_empno number)

return number

is

v_comm number(10,2);

begin

select comm into v_comm from emp where empno=p_empno;

RETURN v_comm;

end;

member function get_deptno(p_empno number)

return integer

is

v_deptno int;

begin

select deptno into v_deptno from emp where empno=p_empno;

return v_deptno;

end;

end;

定義屬性

屬性是對象類型特性的定義，屬性聲明是一個對象必需的，也就是說一個對象類型至少要定義一個屬性。屬性的定義與變量的定義相似，也具有名稱和數(shù)據類型，在整個對象類型中，屬性的名稱必須是唯一的，但是在不同的對象類型之間，屬性的命名是可以重復的。

1.屬性的聲明必須在方法的聲明以前，也就是說在對象規(guī)范中create type下面的聲明必須最先是屬性的定義。

2.屬性的數(shù)據類型必須是oracle數(shù)據庫類型，不能是任何PLSQL類型或PLSQL自定義類型，但是排除了oracle中的rowid，urowid，long，log raw，nchar，nclob，nvarchar2類型。

3.在定義屬性時不能對屬性應用NOT NULL約束或使用default指定默認值。

4.在一個對象類型中至少要定義一個屬性，但是不能大于1000個屬性.

屬性的類型既可以是簡單的數(shù)據類型，也可以是對象類型的引用.

定義對象的屬性

create or replace type employee as object(

empno number(4),

ename varchar2(20),

job   varchar2(20),

sal   number(10,2),

comm  number(10,2),

deptno number(4)

)NOT FINAL;

在定義了該對象類型之后，就可以在PLSQL語句塊中通過實例化對象類型，讀取或寫入對象的屬性值了.

declare

v_emp  employee_property;

v_sal  v_emp.sal%TYPE;

begin

v_emp:=employee_property(7890,'趙五'，'銷售人員'，5000，200，20);

v_sal:=v_emp.sal;

dbms_output.put_line(v_emp.ename||'的薪資是:'||v_sal);

end;

定義方法

對象方法是在對象規(guī)范定義中使用MEMBER或STATIC聲明在對象說明部分的子程序，它們是在屬性聲明之后進行的，

MEMBER方法:成員方法是基于對象實例而不是基于對象類型調用的

STATIC方法:靜態(tài)方法獨立于對象實例，也不能在對象類型主體中引用這個對象的屬性

使用MEMBER和STATIC成員方法

create or replace type employee_method as object(

empno number(4),

sal number(10,2),

comm number(10,2),

deptno number(4),

MEMBER procedure change_sal, --實例方法，可以訪問對象本身的屬性

MEMBER function get_sal return number，

--靜態(tài)方法，不能訪問對象本身的屬性，只能訪問靜態(tài)數(shù)據

STATIC procedure change_deptno(p_empno number，p_deptno number)，

STATIC function get_sal(p_empno number) return number

)NOT FINAL;   --指定該類可以被繼承，如果指定FINAL，表示該類無法被繼承

create or replace type body employee_method

as

MEMBER procedure change_sal

is

begin

self.sal:=self.sal*1.12;

end;

MEMBER function get_sal

return number

is

begin

return sal;

end;

STATIC procedure change_deptno(p_empno number，p_deptno number)

is

begin

update emp set deptno=p_deptno where empno=p_empno;

end;

STATIC function get_sal(p_empno number)

return number

is

v_sal number(10,2);

begin

select sal into v_sal from emp where empno=p_empno;

return v_sal;

end;

end;

MEMBER和STATIC方法使用示例

declare

v_emp employee_method;

begin

v_emp:=employee_method(7999，5000，200，20); --實例化employee_method對象，現(xiàn)在v_emp是對象實例

v_emp.change_sal; --調用對象實例方法，即MEMBER方法

dbms_output.put_line('員工編號為:'||v_emp.empno||'的薪資為:'||v_emp.get_sal);

--下面的代碼調用STATIC方法更新emp表中員工編號為7369的部門編號為20

employee_method.change_deptno(7369,20);

--下面的代碼獲取emp表中員工編號為7369的員工薪資

dbms_output.put_line('員工編號為7369的薪資為:'||employee_method.get_sal(7369));

end;

使用SELF關鍵字

每一個MEMBER類型方法都隱式地聲明了一個內聯(lián)參數(shù)SELF，它代表了對象類型的一個實例，總是被傳遞給成員方法的第一個參數(shù)，實際上的方法體內，也可以不用SELF。

訪問對象類型的屬性

create or replace type employee_salobj as object(

empno number(4),

sal number(10,2),

comm number(10,2),

deptno number(4)，

MEMBER procedure change_sal，

MEMBER procedure change_comm，

MEMBER procedure change_deptno，

MEMBER function get_sal return number，

MEMBER function get_comm return number，

MEMBER function get_deptno return INTEGER

)NOT FINAL;

create or replace type body employee_salobj

as

MEMBER procedure change_sal

is

begin

self.sal:=self.sal*1.12;

end;

MEMBER procedure change_comm

is

begin

comm:=comm * 1.12;

end;

MEMBER procedure change_deptno

is

begin

self.deptno:=20;

end;

MEMBER function get_sal

return number

is

begin

return sal;

end;

MEMBER function get_comm

return self.comm;

end;

MEMBER function get_deptno

return integer

is

begin

return self.deptno

end;

end;

在employee_salobj對象類型體的成員實現(xiàn)中，顯式地使用self進行對象屬性的訪問，當沒有顯式使用self關鍵字時，實際上也是隱式地使用了這個關鍵字。

由于STATIC屬于靜態(tài)方法級別，因此它不能接受或引用self關鍵字

定義構造函數(shù)

當定義了一個對象類型之后，系統(tǒng)會提供一個接收與每個屬性相對應的參數(shù)的構造函數(shù)。

一般出于如下目的來自定義構造函數(shù):

1.為對象提供初始化功能，以避免許多具有特別用途的過程只初始化對象的不同部分，可以通過構造函數(shù)進行統(tǒng)一初始化

2.可以在構造函數(shù)中為某些屬性提供默認值，這樣就能確保屬性值的正確性，而不必依賴于調用者所提供的每一個屬性值。

3.出于維護性的思考，在新的屬性添加到對象中時，避免要更改調用構造函數(shù)的應用程序中的代碼，這樣可以使已經存在的構造函數(shù)調用繼續(xù)工作.

構造函數(shù)的定義是一個與對象類型名稱具有相同名稱的函數(shù)，用于初始化對象，并能返回一個對象類型的新實例。在自定義構造函數(shù)時，要么就覆蓋由oracle為每一個對象生成的默認構造函數(shù)，要么就定義一個有著不同方法簽名的新構造函數(shù)。自定義構造函數(shù)使用constructor關鍵字進行聲明.

自定義構造函數(shù)示例

create or replace type salary_obj as object(

percent number(10,4),  --定義對象類型

sal number(10,2),

--自定義構造函數(shù)

constructor function salary_obj(p_sal number) return self as result)

instantiable

final;

/

--定義對象類型體

create or replace type body salary_obj

as

--實現(xiàn)重載的構造函數(shù)

constructor function salary_obj(p_sal number)

return self as result

as

begin

self.sal:=p_sal;

self.percent:=1.12;

return;

end;

end;

/

調用

declare

v_salobj1 salary_obj;

v_salobj2 salary_obj;

begin

v_salobj1:=salary_obj(1.12,3000);   --使用默認構造函數(shù)

v_salobj2:=salary_obj(2000);--使用自定義構造函數(shù)

end;

定義MAP和ORDER方法

MAP方法:該函數(shù)會將對象實例根據一定的調用規(guī)則返回FATE，NUMBER，varchar2類型的標量類型，在映射對象類型為標量函數(shù)后，就可以通過對標量函數(shù)的比較來得到結果了。

ORDER方法：order方法只能對兩個對象之間進行比較，必須是返回數(shù)值型結果的函數(shù)，根據結果返回正數(shù)，負數(shù)或零。該方法只有兩個參數(shù)，SELF和另外一個要比較的對象類型，如果傳遞該參數(shù)為NULL，則返回NULL。

由于MAP方法一次調用時就將所有的對象映射為一個標量值，因此通常用在排序或合并很多對象時。而order方法一次僅能比較兩個對象，因此在比較多個對象時需要被重復調用，效率會低一些。

定義MAP函數(shù)示例

create or replace type employee_map as object(

empnonumber(4),

salnumber(10，2),

commnumber(10，2),

deptnonumber(4)，

MAP MEMBER FUNCTION convert return real     --定義一個MAP方法

)NOT FINAL;

create or replace type body employee_emp as

MAP MEMBER FUNCTION convert return real is     --定義一個MAP方法

begin

return sal+comm;

end;

end;

在定義了MAP函數(shù)后，PLSQL會隱式地通過調用MAP函數(shù)在多個對象間進行排序或比較。例如下面創(chuàng)建了一個emp_map_tab的對象表，向這個對象表插入多個對象，然后就可以對這個對象表進行對象的排序

create table emp_map_tab of employee_map;

insert into emp_map_tab values(7123,3000,200,20);

col val format a60;

select value(r) val,r.sal+r.comm from emp_emp_tab r order by 1;

定義order函數(shù)示例

create or replace type employee_order as object(

empnonumber(4)，

salnumber(10，2),

commnumber(10，2),

deptnonumber(4),

ORDER MEMBER FUNCTION match(r employee_order) return integer --定義一個ORDER方法

)NOT FINAL;

create or replace type body employee_order as

ORDER MEMBER FUNCTION match(r employee_order) return integer is

begin

if ((SELF.sal+SELF.comm)<(r.sal+r.comm)) then

return -1;

elsif((SELF.sal+SELF.comm)>(r.sal+r.comm)) then

return 1;

else

return 0;

end if;

end match;

end;

定義了order函數(shù)后，就可以對兩個對象進行比較。

declare

emp1 employee_order:=employee_order(7112，3000，200，20);

emp2 employee_order:=employee_order(7113，3800，100，20);

begin

if emp1>emp2 then

dbms_output.put_line('員工1的薪資加提成比員工2大');

elsif emp1<emp2 then

dbms_output.put_line('員工1的薪資加提成比員工2小');

else

dbms_output.put_line('員工1的薪資加提成與員工2相等');

end if;

end;

使用對象類型

對象類型一旦被創(chuàng)建成功，就被保存到了oracle數(shù)據字典中，用戶可以再任何的PLSQL塊，子程序或包中使用它來聲明對象

1.聲明對象

聲明的對象必須是已經在oracle數(shù)據字典中存在的對象類型。在聲明時可以直接使用對象的構造函數(shù)進行初始化，如果沒有初始化，那么對象實例初始化為NULL。

declare

o_empemployee_order;

begin

o_emp:=employee_order(7123,3000,200,20);

dbms_output.put_line('員工編號為:'

||o_emp.empno

||'的薪資和提成為:'

||(o_emp.sal+o_emp.comm)

);

end;

在語句塊的定義區(qū)定義了對象類型的變量，o_emp在定義區(qū)的初始化狀態(tài)下為NULL，在語句塊的執(zhí)行部分，使用對象類型的構造函數(shù)實例化了對象類型，然后通過訪問對象類型的屬性來獲取對象實例的信息.

也可以將對象類型作為存儲過程和存儲函數(shù)的形式參數(shù)，將對象實例從一個子程序傳遞到另一個子程序。

在子程序中使用對象類型

create or replace procedure changesalary(p_emp in employee_order)

as

begin

if p_emp is not null then         --如果對象類型已經實例化，更新emp表

update emp set sal=p_emp.sal，comm=p_emp.comm where empno=p_emp.empno;

end if;

end changesalary;

--使用對象類型作為函數(shù)的傳出參數(shù)

create or replace function getsalary(p_emp in out employee_order) return number

as

begin

if p_emp is not null then          --如果沒有實例化，那就實例化對象類型

p_emp:=employee_order(7125,5000,800,20);

end if;

return p_emp.sal+p_emp.comm;

end;

2.初始化對象

declare

o_emp employee_order:=employee_order(NULL,NULL,NULL,NULL);

begin

o_emp.empno:=7301;

o_emp.sal:=5000;

o_emp.comm:=300;

o_emp.deptno:=20;

end;

3.調用對象方法

在對象類型中，方法分為靜態(tài)方法和實例方法，靜態(tài)方法在定義時使用STATIC前綴，實例方法在定義時使用MEMBER關鍵字進行定義。這兩類方法的調用方式也不同，實例方法在實例級別進行調用，而靜態(tài)方法在對象類型的級別，也就是類級別進行調用。在一些高級程序設計語言比如JAVA，靜態(tài)方法又稱為類方法。

調用靜態(tài)方法與實例方法實例

create or replace type employee_method as object(

empnonumber(4)，

salnumber(10，2),

commnumber(10，2),

deptnonumber(4),

MEMBER PROCEDURE change_sal,

MEMBER FUNCTION get_sal return number,

STATIC PROCEDURE change_deptno(empno number,deptno number),

STATIC FUNCTION get_sal(empno number) return number

)not final;

調用

declare

o_empemployee_method:=employee_method(7369，5000，800，20);

v_salnumber(10，2);

begin

v_sal:=o_emp.get_sal;           --調用對象實例級別的方法

dbms_output.put_line('對象實例級別的工資為:'||v_sal);

v_sal:=employee_method.get_sal(o_emp.empno);   --調用對象級別的方法

dbms_output.put_line('對象類型級別的工資為:'||v_sal);

end;

使用嵌套對象類型

嵌套對象類型是指一個對象中嵌入另一個對象類型。在為對象類型定義屬性時，除了可以使用標量類型之外，還可以通過自定義的對象類型來提升整個對象類型的靈活性。

定義地址對象類型

create or replace type address_type

as object

(street_addr1 varchar2(25)，

street_addr2varchar2(25),

cityvarchar2(30),

statevarchar2(2),

zip_codenumber，

--成員方法，返回地址字符串

MEMBER FUNCTION tostring return varchar2,

--MAP方法提供地址比較函數(shù)

MAP MEMBER FUNCTION mapping_function return varchar2

)

--定義地址對象類型體，實現(xiàn)成員方法與MAP函數(shù)

create or replace type body address_type

as

MEMBER FUNCTION tostring

return varchar2

is

begin

if (street_addr2 is not null)

then

return street_addr1

||CHR(10)

||street_addr2

||CHR(10)

||city

||','

||state

||' '

||zip_code;

else

return street_addr1 ||CHR(10)||city||','||state||' '||zip_code;

end if;

end;

MAP MEMBER FUNCTION mapping_function

return varchar2

is

begin

return to_char(NVL(zip_code，0)，'fm00000')

||LPAD (NVL(city，'')，30)

||LPAD (NVL(street_addr1，'')，25)

||LPAD (NVL(street_addr2，'')，25);

end;

end;

定義包含其他對象類型的類型

create or replace type employee_addr as object(

empnonumber(4),

salnumber(10,2),

commnumber(10,2),

deptnonumber(4),

addraddress_type,

MEMBER FUNCTION get_emp_info return varchar2

)NOT FINAL;

--定義對象類型體，實現(xiàn)get_emp_info方法

create or replace type body employee_addr

as

MEMBER FUNCTION get_emp_info

return varchar2

is

begin

return '員工'||SELF.empno||'的地址為:'||SELF.addr.tostring;

end;

end;

為了使用employee_addr對象類型，在構造對象的實例時，必須要同時構造address_type的嵌套對象類型。

declare

o_address address_type;

o_emp employee_addr;

begin

--實例化地址對象類型

o_address:=address_type('玉蘭一街'，'二巷'，'深圳','DG'，523343);

--實例化員工對象類型

o_emp:=employee_addr(7369，5000，800，20，o_address);

--輸出員工信息

dbms_output.put_line('員工信息為'||o_emp.get_emp_info);

end;

對象繼承

繼承是指在已存在的對象類型的基礎上建立新對象類型的一種技術，新定義的類可包含現(xiàn)有類所聲明的數(shù)據，定義及包含新定義的對象類型所增加的聲明的組合。

對象類型繼承由父類型和子類型組成，其中父類型用于定義可供子類型使用的公共的屬性和方法，而子類型不但可以使用這些公共的屬性和方法，還可以具有自己私有的屬性和方法。

例如，在對現(xiàn)實世界的實體進行抽象時，可以發(fā)現(xiàn)企業(yè)中的員工都有一些共性，因此將其抽象出一個父類型，用來定義一個基類，比如員工都包含了姓名，性別，出生日期等，可以基于這些特性定義一個person_obj的對象類型，然后在該類型的基礎上繼承一個子類employee_personobj類型，除了具有person_obj的特性外，還具有員工證件號碼，工資，提成和職位信息，類繼承結構。

實現(xiàn)person_obj父對象

create or replace type person_obj as object(

person_namevarchar(20)，

gendervarchar2(2)，

birthdateDATE，

addressvarchar2(50),

MEMBER FUNCTION get_info return varchar2

)NOT FINAL;

create or replace type body person_obj

as

MEMBER FUNCTION get_info return varchar2

is

begin

return '姓名:' || person_name||',家庭住址:'||address;

end;

end;

子對象employee_personpbj的實現(xiàn)

create or replace type employee_personobj under person_obj(

empnonumber(6),

salnumber(10，2),

jobvarchar2(10)，

MEMBER FUNCTION get_emp_info return varchar2

);

create or replace type body employee_personobj as

MEMBER FUNCTION get_emp_info return varchar2 is

begin

return '員工編號:' || SELF.empno ||'員工名稱:' || SELF.person_name||'職位:'||SELF.job;

end;

end;

為了從一個父對象中繼承，在子對象中使用UNDER關鍵字，指定一個父對象名稱，該父對象必須使用NOT FINAL關鍵字定義的對象。在子對象中新增了屬性和方法后，就被合并到父對象中去了，因此可以看到在對象體實現(xiàn)時，可以直接使用SELF關鍵字訪問父對象中的person_name屬性。

使用方法：

declare

o_emp employee_personobj;

begin

--使用構造函數(shù)實例化員工對象

o_emp:=employee_personobj('張小五','F'，TO_DATE('1983-01-01'，'YYYY-MM-DD'),'中信',7981,5000，'Programmer');

dbms_output.put_line(o_emp.get_info);

dbms_output.put_line(o_emp.get_emp_info);

end;

方法重載

所謂重載就是定義一個或多個具有同名的函數(shù)或過程，但是參數(shù)類型名個數(shù)不同，由編譯器根據調用參數(shù)確定執(zhí)行哪一個子程序。這種重載方式有時候也稱為靜態(tài)多態(tài)。在使用對象繼承時，也可以使用方法重載。但是這種方法重載不同于過程或包中的重載，這種重載使用了動態(tài)方法調用的能力，也稱為動態(tài)多態(tài)或運行時多態(tài)。也就是說具體的調用方法不是在編譯時確定的，而是在代碼實際執(zhí)行時才確定的重載。

對象方法的重載使用OVERRIDING關鍵字，不是根據參數(shù)的個數(shù)來決定調用哪一個方法，而是根據優(yōu)先級進行調用，也就是總是先調用子類的方法。

實現(xiàn)對象方法重載

create or replace type employee_personobj under person_obj(

empnonumber(6),

salnumber(10，2),

jobvarchar2(10),

MEMBER FUNCTION get_emp_info return varchar2,

--定義重載方法

OVERRIDING MEMBER FUNCTION get_info return varchar2

);

create or replace type body employee_personobj as

MEMBER FUNCTION get_emp_info return varchar2 is

begin

return '員工編號:' || SELF.empno||'員工名稱:'||SELF.person_name||'職位:'||SELF.job;

end;

--實現(xiàn)重載方法

OVERRIDING MEMBER FUNCTION get_info return varchar2 as

begin

return '員工編號:' ||SELF.empno||'員工名稱:'||SELF.person_name||'職位':||SELF.job;

end;

end;

調用employee_personobj對象實例的get_info方法時，將看到的是來自重載方法中的消息

declare

o_emp employee_personobj;

begin

--使用構造函數(shù)實例化員工對象

o_emp:=employee_personobj('張小五'，'F'，TO_DATE('1983-01-01','YYYY-MM-DD')，'中信'，7981,5000，'Programmer');

dbms_output.put_line(o_emp.get_info);

end;

管理對象表

對象表就像普通的表一樣，只是存儲的事對象類型，該表中的每一個字段與對象的一個屬性相對應，然后使用對象表的每一行或者稱為每一條記錄存儲一個對象類型的實例。

create table emp_obj_table of employee_personobj;

創(chuàng)建對象表使用的是create table  of 語句。

可以使用desc 查看到結構，和對象中包含的屬性類型。

創(chuàng)建的對象表一旦引用了特定的對象類型，就不能使用drop type語句對對象類型進行刪除，如果非要這樣做，oracle會報錯。

如果對象類型中包含嵌套的對象類型，那么嵌套的對象表類型會被作為一列存儲到對象表中，比如employee_addr的addr屬性是一個嵌套了address_type對象類型的屬性，因此當創(chuàng)建一個employee_addr對象類型的數(shù)據表，會將addr作為一個單獨的列。

create table emp_addr_table of employee_addr;

使用set desc depth all linenum on 語句。

插入對象表

插入數(shù)據的語法與向普通表插入數(shù)據一樣，使用insert命令。

除了直接插入列值外，在向對象類型的表中插入數(shù)據時，可以先實例化一個對象類型，然后向insert語句的values子句傳入構建的對象類型。

declare

o_emp employee_personobj;

begin

--使用構造函數(shù)實例化員工對象

o_emp:=employee_personobj('張小五'，'F'，TO_DATE('1983-01-01','YYYY-MM-DD'),'中信'，7981,5000，'Programmer');

insert into emp_obj_table values(o_emp);

end;

檢索對象表

對象表的查詢與關系表的查詢一樣。

1.value函數(shù)

在查詢語句中使用value函數(shù)將返回存儲在對象表中的對象實例，因此對于查詢的單行記錄，可以使用select into 語句將查詢出來的值插入到預定義的對象實例中;對于查詢返回的多行記錄,可以使用游標來獲取查詢出來的對象實例。

select value(e) from emp_obj_table e;

該查詢返回了存儲在emp_obj_table表中所有的對象實例，每一行一個對象實例。

下面演示使用select into 將查詢的結果賦值給一個對象類型的變量：

declare

o_emp employee_personobj;

begin

--使用select into 語句將value函數(shù)返回的對象實例插入到對象類型的變量

select value(e) into o_emp from emp_obj_table e where e.person_name='張小五';

--輸出對象類型的屬性值

dbms_output.put_line(o_emp.person_name||'的職位是:'||o_emp.job);

end;

使用游標和value函數(shù)查詢多行數(shù)據結果

declare

o_emp employee_personobj;

cursor all_emp

is

select value(e) as emp from emp_obj_table e;

begin

for each_emp in all_emp

loop

o_emp:=each_emp.emp;

--輸出對象實例信息

dbms_output.put_line(o_emp.person_name||'的職位是:'||o_emp.job);

end loop;

end;

2.REF函數(shù)

與value相對應的ref函數(shù)也可以用來檢索對象表中的數(shù)據，但是由其名可知，它返回的事一個對象的引用。二者之間的主要區(qū)別在于引用類型返回的只是指向對象實際位置的一個指針，而value類型會把對象副本從一個子程序傳遞到另一個子程序，程序執(zhí)行時的效率可能會降低。

使用共享對象類型，可以避免數(shù)據不必要的重復，而且在共享的內容更新時，任何引用所指向的內容也會被立即更新。

create type address as object(      --創(chuàng)建地址類型

street varchar2(35),

cityvarchar2(15),

statechar(2),

zip_codeinteger

);

create table addresses of address;  --創(chuàng)建地址對象表

create type person as object(       --創(chuàng)建人員對象類型

person_namevarchar2(15),

birthdayDATE,

home_addressREF address, --使用ref關鍵字，指定屬性為指向另一個對象表的對象

phone_numbervarchar2(15)

);

create table persons of person;   --創(chuàng)建人員對象表

插入數(shù)據

insert into addresses values(address ('玉蘭'，'深圳'，'GD'，'321413'));

insert into persons values(person ('王小五'，TO_DATE('1983-01-01','YYYY-MM-DD'),(select ref(a) from addresses a where street='玉蘭')，'1312332'));

使用PL/SQL語句塊向對象表中插入引用類型的對象

declare

addref ref address;  --定義一個引用類型的對象

begin

select ref (a) into addref from addresses a where street='玉蘭';

insert into persons values(person('武大郎'，TO_DATE('1983-01-01','YYYY-MM-DD'),addref，'1312312'));

end;

在語句塊中使用ref關鍵字定義了一個指向address對象類型的引用類型，然后使用ref函數(shù)從address表中返回匹配的引用類型的指針，最后將這個引用類型作為home_address屬性的值插入到persons表中.

當對象表中包含引用類型時，如果直接使用select語句進行查詢，引用類型的列是一串數(shù)字碼，而且引用類型的對象無法直接訪問其屬性。

select person_name，home_address from persons;

如果使用了deref函數(shù)，則可以查詢到引用類型所指向的地址類型的值。

select person_name，deref (home_address) as home from persons;

在PL/SQL語句中使用ref類型的變量時，不能直接訪問對象的屬性，必須首先通過deref函數(shù)解除引用后，才能使用對象類型的屬性.

更新對象表

更新對象表時既可以把對象表看作是一個普通的關系型表，與關系表一樣把對象表中的每個屬性作為一列調用作為一列調用update語句，也可以將一行看作是一個對象，在update語句中對對象進行賦值。

update emp_obj_table empobj set empobj.gender='M' where empobj.person_name='張小五';

另一種方法是直接更新一個對象表中的對象實例，因此需要先實例化一個對象實例。

update emp_obj_table empobj set empobj=employee_personobj('李曉琪'，'F'，TO_DATE('1983-01-01','YYYY-MM-DD'),'眾泰'，7981,7000，'Testing') where person_name='張小五';

在操縱對象表時，還可以在where子句中把一行看作一個對象，可以使用對象標識符來唯一標識要更改的對象，對象標識符是對象表中為了唯一標識一條記錄而定義的一串數(shù)字值，對于一個對象來說，需要使用REF函數(shù)來獲取對象的標識符，在where語句中使用對象類型進行檢索的示例

在where子句中使用對象類型

declare

emp_refref employee_personobj; --定義引用對象類型

begin --從對象表中獲取對劉小燕的對象引用

select ref(e1) into emp_ref from emp_obj table e1 where person_name='劉小燕';

update emp_obj_table emp_obj set emp_obj=employee_personobj('何曉峰'，'F'，TO_DATE('1985-08-01','YYYY-MM-DD'),'本田'，7981,7000，'developer') where ref (emp_obj)=emp_ref;

end;

如果對象表的屬性列表中包含了引用類型，也就是說包含了指向行對象數(shù)據的指針，如果要修改其列所引用的數(shù)據，就必須修改相應的行對象。例如在persons表中，home_address字段是一個指向address對象類型的引用，因此如果要update這個包含引用類型的表。

declare

addraddress;

begin

select deref(home_address) into addr from persons where person_name='張小五';

addr.street:='五一';

update address set street=addr.street where zip_code='21312';

end;

先使用deref函數(shù)返回指針所指向的address對象實例的引用，然后將更改的信息更新回address表中就完成了對引用記錄的更改。

刪除對象表

與刪除普通表類似，對象表的刪除使用delete語句，下面的語句像刪除普通的關系表一樣刪除emp_obj_table表中員工名稱為張小五的記錄

delete from emp_obj_table where person_name='張小五';

與update類似，還可以在where子句中使用引用類型的對象進行刪除。例如要刪除emp_obj_table表中員工名稱為劉小燕的記錄。

declare

emp_refref employee_personobj;

begin

select ref (e1) into emp_ref from emp_obj_table e1 where person_name='劉小燕'; --從對象表中獲取對劉小燕的對象引用

delete from emp_obj_table emp_obj where ref (emp_obj)=emp_ref

end;        --使用delete語句刪除emp_obj_table表中劉小燕的記錄

通過使用ref函數(shù)，將員工名稱為劉小燕的記錄進行了正確的刪除。

創(chuàng)建對象列

除了將整個對象作為表中的列來存儲的對象表之外，還可以為關系表中的某一列的屬性指定為對象類型，這種表稱為帶對象列的關系表。這種帶對象類型的關系表與對象表的主要不同在于對象表時通過使用對象標識符來引用對象實例的，而對于列對象來說是沒有oracle對象標識符的，列對象的對象實例屬于關系型數(shù)據庫中的記錄，具有一個rowid值作為標識符。

定義dept_obj對象類型

create or replace type dept_obj as object(

deptnonumber(10)，

dnamevarchar2(30),

locvarchar2(30),

MEMBER FUNCTION get_dept_info return varchar2

) INSTANTIABLE NOT FINAL;

定義對象類型體

create or replace type body dept_obj as

MEMBER FUNCTION get_dept_info return varchar2 is

begin

return '部門編號:' || SELF.deptno ||'部門名稱:'||SELF.dname||'職位:'||SELF.loc;

end;

end;

對象類型dept_obj封裝了部門信息，可以看到具有部門編號，部門名稱和部門的地址信息，接下來創(chuàng)建一個名為emp_colobj的表，該表用來存放員工信息，但是在部門列中，將使用dept_obj對象類型作為列類型，可以再表中存儲關于部門的詳細信息。

create table emp_colobj(

empnonumber(10) NOT NULL primary key,

enamevarchar2(30),

jobvarchar2(30),

salnumber(10，2),

deptcoldept_obj

) --dept列指定為dept_obj對象類型

在對象表中綁定了某個對象類型后，不能直接對對象表中的列及類型進行操作，比如新增列或對列進行修改等，但是關系表中包含對象列類型則沒有這個限制，可以使用標準的ALTER TABLE語句來進行操作.

使用對象視圖

為了創(chuàng)建一個對象視圖，必須首先創(chuàng)建一個與底層的數(shù)據表的列具有相匹配屬性的對象類型。

定義emp_tbl_obj對象類型

create or replace type emp_tbl_obj as object(

empnonumber(6),

enamevarchar2(10),

jobvarchar2(18),

mgrnumber(4),

hiredateDATE，

salnumber(7，2),

commnumber(7，2),

deptno number(2),

MEMBER FUNCTION get_emp_info return varchar2

)INSTANTIABLE NOT FINAL;

create or replace type body emp_tbl_obj as

MEMBER FUNCTION get_emp_info return varchar2 is

begin

return '員工編號:' ||SELF.empno||'員工名稱:'||SELF.ename||'職位:'||SELF.job;

end;

end;

在創(chuàng)建對象視圖時，必須要確定要使用的OID(對象標識符).對象標識符是用來唯一標識一行對象的一個字符串，通過OID可以保證對對象實例引用的唯一性。OID標識符僅在對象表和對象視圖上被創(chuàng)建，一旦一個OID被賦給了一個對象，那么將永遠屬于那個對象。通常情況下，oracle會自動產生OID值，不需要要手工干預，但是在定義對象視圖時，可以覆蓋系統(tǒng)產生OID的機制，更改為使用對象表的主鍵來替代.

create view view_name of object_name

with object identifier(primary_key)

as

sql_statement;

view_name指定對象視圖的名稱，object_name用于指定對象視圖的對象名稱，with object identifier用于指定OID方式，可以指定表的主鍵作為OID,sql_statement是對關系表的sql查詢語句時。

create view emp_view

of emp_tb1_obj

with object identifier(empno)

as

select e.empno，e.ename,e.job，e.mgr,e.hiredate，e.sal，e.comm，e.deptno from emp e;

使用對象類型的視圖

declare

o_empemp_tb1_obj;

begin

--查詢對象類型

select value(e) into o_emp from emp_view e where empno=7369;

--輸出對象類型的屬性

dbms_output.put_line('員工'||o_emp.ename||'的薪資為:'||o_emp.sal);

dbms_output.put_line(o_emp.get_emp_info);  --調用對象類型的成員方法

end;

管理對象類型

1.查看對象類型

COL type_name format A20;

select type_name,attributes，final，typecode from user_types where type_name like 'EMP%' and typecode='OBJECT';  

通過使用select connect by語句，還可以根據type_name和supertype_name來查詢對象的繼承結構.

set pagesize 500;

select rpad (' ',3 * (LEVEL-1)) |from user_types where typecode='OBJECT' CONNECT BY PRIOR type_name=superty

2.修改對象類型

如果已經基于對象類型建立了其他的對象類型或對象表，那么在為對象類型增加或刪除屬性時，必須要使用cascade關鍵字.

--添加mgr屬性

alter type employee_personobj add attribute mgr number(6) cascade;

--刪除sal屬性

alter type employee_personobj drop attribute sal cascade;

修改對象類型的成員方法

alter type employee_personobj drop member function get_emp_info return varchar2 cascade;

--新增一個get_employee的成員方法

alter type employee_personobj add member function get_employee return varchar2 cascade;

--更改對象類型體，以便增加在對象類型規(guī)范中定義的方法

create or replace type body employee_personobj as

member function get_employee return varchar2 is

begin

return '員工編號:' ||SELF.empno||'員工名稱:'||SELF.person_name||'職位:'||SELF.job;

end;

end;

如果從基類刪除一個方法，那么也必須修改覆蓋被刪除方法的子類，可以用alter type 的casade選擇來判斷是否有子類被影響到:如果有子類覆蓋了方法，那么語句被回滾。為了能成功地從基類刪除一個方法。

1.先從子類刪除方法

2.從基類刪除方法，然后用不帶overriding關鍵字的alter type把它重新添加進去.

分享題目：PLSQL面向對象編程
URL標題：http://jinyejixie.com/article44/ipipee.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供定制開發(fā)、網站內鏈、微信小程序、網站制作、標簽優(yōu)化、網站設計公司

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)