【正文】 SELECT FROM B2B_GHJBMENU A,XTGHDW B WHERE = AND = :。 V_LXBM %TYPE。 CURSOR INSERTLXBM IS SELECT DISTINCT LXBM FROM XTFBLX。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 存儲(chǔ)過(guò)程： 例子 1： CREATE OR REPLACE PROCEDURE P_BJHHTED 輸入、輸出參數(shù) ( AS_USER VARCHAR2, AD_RQ1 DATE, AD_RQ2 DATE) AS ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 定義變量 LS_GW VARCHAR2(8)。 LS_SPR VARCHAR2(10)。 LS_KS VARCHAR2(4)。 LD_SL1 NUMBER(14,4)。 LD_JE1 NUMBER(14,4)。 LD_SL2 NUMBER(14,4)。 LD_JE2 NUMBER(14,4)。 LD_SL3 NUMBER(14,4)。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 定義變量 LD_JE3 NUMBER(14,4)。 LD_SL4 NUMBER(14,4)。 LD_JE4 NUMBER(14,4)。 LD_SL5 NUMBER(14,4)。 LD_JE5 NUMBER(14,4)。 LD_SL6 NUMBER(14,4)。 LD_JE6 NUMBER(14,4)。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 定義游標(biāo) CURSOR C1 IS SELECT HTGW,KSJC,SPR FROM BJHHTED WHERE ZDR=AS_USER FOR UPDATE。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 開(kāi)始執(zhí)行存儲(chǔ)過(guò)程 BEGIN 刪除數(shù)據(jù) DELETE FROM BJHHTED WHERE ZDR=AS_USER。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 插入數(shù)據(jù) INSERT INTO BJHHTED(ZDR,HTGW,KSJC,SPR) SELECT DISTINCT AS_USER,HTGW,NVL(SUBSTR(HTBH,6,2),39。%39。),SPRM FROM CGHT WHERE QDRQ=AD_RQ1 AND QDRQ=AD_RQ2 AND LB=39。539。 AND SWBZ =39。239。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 打開(kāi)游標(biāo) OPEN C1。 取出第一條數(shù)據(jù) FETCH C1 INTO LS_GW,LS_KS,LS_SPR。 循環(huán)數(shù)據(jù) WHILE C1%FOUND LOOP ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 查詢出數(shù)據(jù)賦給變量 SELECT COUNT(HTBM), SUM(SPJE) INTO LD_SL1,LD_JE1 FROM CGHT WHERE QDRQ=AD_RQ1 AND QDRQ=AD_RQ2 AND LB=39。539。 AND SWBZ=39。239。 AND HTGW=LS_GW AND NVL(HTBH,39。%39。) LIKE 39。%39。||LS_KS||39。%39。 AND SPRM=LS_SPR AND SPJE=50000。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 更新表數(shù)據(jù) UPDATE BJHHTED SET FS1=LD_SL1,JE1=LD_JE1, FS2=LD_SL2,JE2=LD_JE2, FS3=LD_SL3,JE3=LD_JE3, FS4=LD_SL4,JE4=LD_JE4, FS5=LD_SL5,JE5=LD_JE5, FS6=LD_SL6,JE6=LD_JE6 WHERE ZDR=AS_USER AND HTGW=LS_GW AND KSJC=LS_KS AND SPR=LS_SPR。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 語(yǔ)法： 取出下一條數(shù)據(jù) FETCH C1 INTO LS_GW,LS_KS,LS_SPR。 結(jié)束循環(huán) END LOOP。 關(guān)閉游標(biāo) CLOSE C1。 關(guān)閉存儲(chǔ)過(guò)程 END P_BJHHTED。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 create or replace procedure aa1 is v_aa number。 v_bb varchar2(20)。 message varchar2(20)。 begin v_bb :=39。3s39。 begin v_aa :=to_number(v_bb)。 exception when others then message:=39。ddddddddddddd39。 end。 end aa1。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 JAVA調(diào)用存儲(chǔ)過(guò)程 1： ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 —異常處理 有兩種類(lèi)型的異常，一種為內(nèi)部異常，一種為用戶自定義異常，內(nèi)部異常是執(zhí)行期間返回到 PL/SQL塊的 ORACLE錯(cuò)誤或由 PL/SQL代碼的某操作引起的錯(cuò)誤，如除數(shù)為零或內(nèi)存溢出的情況。用戶自定義異常由開(kāi)發(fā)者顯示定義，在 PL/SQL塊中傳遞信息以控制對(duì)于應(yīng)用的錯(cuò)誤處理 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 —異常處理 對(duì)于預(yù)定義異常 ： no_data_found： select into 語(yǔ)句沒(méi)有符合條件的記錄返回 too_many_rows： select into 語(yǔ)句符合條件的記錄有多條返回 dup_val_on_index：對(duì)于數(shù)據(jù)庫(kù)表中的某一列，該列已經(jīng)被限制為唯一索引，程序試圖存儲(chǔ)兩個(gè)重復(fù)的值 value_error：在轉(zhuǎn)換字符類(lèi)型，截取或長(zhǎng)度受限時(shí)，會(huì)發(fā)生該異常，如一個(gè)字符分配給一個(gè)變量，而該變量聲明的長(zhǎng)度比該字符短，就會(huì)引發(fā)該異常 storage_error：內(nèi)存溢出 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 —異常處理 zero_divide：除數(shù)為零 case_not_found：對(duì)于選擇 case語(yǔ)句，沒(méi)有與之相匹配的條件，同時(shí)，也沒(méi)有 else語(yǔ)句捕獲其他的條件 cursor_already_open：程序試圖打開(kāi)一個(gè)已經(jīng)打開(kāi)的游標(biāo) timeout_on_resource：系統(tǒng)在等待某一資源，時(shí)間超時(shí) ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 —異常處理 系統(tǒng)異常： 如果要處理未命名的內(nèi)部異常，必須使用 OTHERS異常處理器或 PRAGMA EXCEPTION_INIT ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 —異常處理 預(yù)定義異常例子 create or replace procedure sdf is v_a varchar(10)。 begin Begin select into v_a from aa。 Exception when no_data_found then insert into a(a) values(39。ssssssssssssssss39。)。 End。 end sdf。 ORACLE基礎(chǔ) 六、存儲(chǔ)過(guò)程 —異常處理 系統(tǒng)異常例子： create or replace procedure sdf is begin Begin insert into aa(a) values(39。dddddddddddddddddd39。)。 Exception when OTHERS then insert into a(a) values(39。dddddddddddddddddd39。)。 End。 end sdf。 ORACLE基礎(chǔ) 七、函數(shù) 函數(shù)： 與過(guò)程相似，遵循了相同的規(guī)則。 參數(shù)傳遞：只能帶有 in參數(shù)，不能使用 out, in out 參數(shù) 函數(shù)的主要特性是必須返回一個(gè)值。 ORACLE基礎(chǔ) 七、函數(shù) 語(yǔ)法： CREATE [OR REPLACE] FUNCTION function_name (參數(shù) ) RETURN datatype IS | AS [PRAGMA AUTONOMOUS_TRANACTION。] 聲明自主事務(wù)處理。 [本地變量聲明 ] BEGIN 執(zhí)行語(yǔ)句部分 [EXCEPTION] 錯(cuò)誤處理部分 END[name]。 / ORACLE基礎(chǔ) 七、函數(shù) 函數(shù) 例子： create or replace function f_cghtmx_jehz(a_htbm varchar2) return number is totl_spje number(14,4)。 begin select sum(spje) into totl_spje from cghtmx where htbm= a_htbm。 exception when no_data_found then totl_spje := 。 return totl_spje。 end。 ORACLE基礎(chǔ) 八、程序包 是對(duì) PL/SQL類(lèi)型，過(guò)程，函數(shù)，游標(biāo)，異常，變量，常量的封裝。 包括兩部分：規(guī)范和主體 規(guī)范：是程序包的公共接口， 主體：規(guī)范的實(shí)現(xiàn)，以及私有例程、數(shù)據(jù)和變量。 ORACLE基礎(chǔ) 八、程序包 語(yǔ)法： CREATE OR REPLACE PACKAGE package_name IS | AS 公用類(lèi)型或變量常量的聲明； 公用過(guò)程或函數(shù)的聲明； END package_name。 / CREATE OR REPLACE PACKAGE BODY package_name IS | AS 私有類(lèi)型或變量常量的聲明； 公用過(guò)程或函數(shù)的實(shí)現(xiàn)； END package_name ORACLE基礎(chǔ) 八、程序包 規(guī)范： 規(guī)范是程序包的接口，規(guī)范中定義的所有內(nèi)容都可以由調(diào)用者使用（當(dāng)然需要具有 EXECUTE特權(quán)），比如規(guī)范中定義的過(guò)程函數(shù)可以被執(zhí)行，類(lèi)型可以被訪問(wèn)，變量可以