性檢查的簡(jiǎn)單快捷方法(利用Post方法和Timer)

2024-07-21 02:35:39

字體：大中小

供稿：網(wǎng)友

　　1 前言
　　唯一值檢查，在許多人眼中是一個(gè)簡(jiǎn)單而又不能再簡(jiǎn)單的問(wèn)題，但是FORMS中，由于OracleD
　　eveloper體系架構(gòu)的問(wèn)題，成為開(kāi)發(fā)人員的一塊心病。
　　當(dāng)然，進(jìn)行唯一值檢查的方式多種多樣，包括對(duì)數(shù)據(jù)塊的輪詢或利用表變量實(shí)現(xiàn)，但這些方
　　法都有相同的弊病=>效率低下和實(shí)現(xiàn)方法過(guò)于繁雜。
　　本文利用FORMS的POST命令和后臺(tái)Select Count語(yǔ)句實(shí)現(xiàn)唯一值檢查，為各位同仁提供多一種選擇的余地。
　　
　　2 技術(shù)要點(diǎn)
　　2.1 POST
　　POST命令間將前臺(tái)的數(shù)據(jù)傳到后臺(tái)，但是不進(jìn)行COMMIT動(dòng)作，由于在同一個(gè)SEASON，所以Select Count語(yǔ)句可以對(duì)未Commit_form的數(shù)據(jù)進(jìn)行檢查
　　
　　2.2 受限過(guò)程的解決方法
　　由于POST是受限過(guò)程，無(wú)法在BLOCK的When_Valid_Record中使用，本文利用Timer實(shí)現(xiàn)POST過(guò)程。
　　即：When_Valid_Record創(chuàng)建Timer，由Timer執(zhí)行POST的動(dòng)作。
　　
　　2.3 Select Count
　　此語(yǔ)句不必多說(shuō)，就是判定某數(shù)據(jù)是否重復(fù)
　　
　　3 實(shí)例參考
　　3.1 創(chuàng)建數(shù)據(jù)表
　　create table TESTCHECKUNIQUE
　　(
　　T1 VARCHAR2(20) PRimary Key,
　　T2 VARCHAR2(20)
　　);
　　--設(shè)定T1為要檢查的唯一值
　　
　　3.2 FORMS
　　3.2.1 創(chuàng)建表級(jí)的When_Timer_EXPired，對(duì)數(shù)據(jù)進(jìn)行POST動(dòng)作
　　Declare
　　Begin
　　IF Upper(Get_application_Property(TIMER_NAME)) = Upper('Timer_Post') THEN
　　Post;
　　END IF;
　　End;
　　
　　3.2.2 創(chuàng)建數(shù)據(jù)塊級(jí)的When_Valid_Record，創(chuàng)建Timer
　　Declare
　　Timer_Post Timer;
　　Begin
　　Timer_Post:=Create_Timer('Timer_Post', 5, NO_REPEAT);
　　End;
　　
　　3.2.3 創(chuàng)建數(shù)據(jù)項(xiàng)級(jí)的When_Valid_Item，對(duì)數(shù)據(jù)進(jìn)行檢查性檢查
　　Declare
　　L_Count Number;
　　Begin
　　Select Count(0)
　　Into L_Count
　　From TestCheckUnique
　　Where T1=:TestCheckUnique.T1;
　　If L_Count>0 Then
　　Message('字段輸入重復(fù)值');
　　Raise Form_Trigger_Failure;
　　End If;
　　End;

上一篇：nvarchar和varchar的轉(zhuǎn)換問(wèn)題

下一篇：實(shí)現(xiàn)數(shù)據(jù)行的權(quán)限控制(Policy的應(yīng)用)