提到游標這個詞,人們想到的是在屏幕上一個閃動的方框,用以指示用戶將要輸入字符的位置。而在關系型數據庫的SQL語言中,游標卻有另外的含義,它是存放結果集的數據對象。

為什么要用到游標

在某些PowerBuilder應用程序的開發中,您可能根本用不到游標這樣一個對象。因為在其它工具開發中很多需用游標實現的工作,在PowerBuilder中卻已有DataWin-dow來代勞了。事實上,DataWindow不僅可以替代游標進行從后臺數據庫查詢多條記錄的復雜操作,而且還遠不止這些。但是同DataWindow和DataStore相比,游標也有其自身的優點,比如系統資源占用少,操作靈活,可根據需要定義變量類型如全局、實例或局部類型和訪問類型如私有或公共等。

游標的操作

使用游標有四種基本的步驟:聲明游標、打開游標、提取數據、關閉游標。

聲明游標

象使用其它類型的變量一樣,使用一個游標之前,首先應當聲明它。游標的聲明包括兩個部分:游標的名稱;這個游標所用到的SQL語句。如要聲明一個叫作Cus-tomerCursor的游標用以查詢地址在北京的客戶的姓名、帳號及其余額,您可以編寫如下代碼:

DECLARE CustomerCursor CURSOR FOR

SELECT acct_no,name,balance

FROM customer

WHERE PRovince="北京";

在游標的聲明中有一點值得注意的是,如同其它變量的聲明一樣,聲明游標的這一段代碼行是不執行的,您不能將debug時的斷點設在這一代碼行上,也不能用IF...END IF語句來聲明兩個同名的游標,如下列的代碼就是錯誤的。

IF Is_prov="北京"THEN

DECLARE CustomerCursor CURSOR FOR

SELECT acct_no,name,balance

FROM customer

WHERE province="北京";

ELSE

DECLARE CustomerCursor CURSOR FOR

SELECT acct_no,name,balance

FROM customer

WHERE province〈〉"北京";

END IF

打開游標

聲明了游標后在作其它操作之前,必須打開它。打開游標是執行與其相關的一段SQL語句,例如打開上例聲明的一個游標,我們只需鍵入:

OPEN CustomerCursor;

由于打開游標是對數據庫進行一些SQL SELECT的操作,它將耗費一段時間,主要取決于您使用的系統性能和這條語句的復雜程度。如果執行的時間較長,可以考慮將屏幕上顯示的鼠標改為hourglass。

提取數據

當用OPEN語句打開了游標并在數據庫中執行了查詢后,您不能立即利用在查詢結果集中的數據。您必須用FETCH語句來取得數據。一條FETCH語句一次可以將一條記錄放入程序員指定的變量中。事實上,FETCH語句是游標使用的核心。在DataWindow和DataStore中,執行了Retrieve()函數以后,查詢的所有結果全部可以得到;而使用游標,我們只能逐條記錄地得到查詢結果。

已經聲明并打開一個游標后,我們就可以將數據放入任意的變量中。在FETCH語句中您可以指定游標的名稱和目標變量的名稱。如下例:

FETCH CustmerCur-sor

INTO:ls_acct_no,

:ls_name,

:ll_balance;

從語法上講,上面所述的就是一條合法的取數據的語句,但是一般我們使用游標卻還應當包括其它的部分。正如我們前面所談到的,游標只能一次從后臺數據庫中取一條記錄,而在多數情況下,我們所想要作的是在數據庫中從第一條記錄開始提取,一直到結束。所以我們一般要將游標提取數據的語句放在一個循環體內,直至將結果集中的全部數據提取后,跳出循環圈。通過檢測SQLCA.SQL-CODE的值,可以得知最后一條FETCH語句是否成功。一般,當SQLCODE值為0時表明一切正常,100表示已經取到了結果集的末尾,而其它值均表明操作出了問題,這樣我們可以編寫以下的代碼:

lb_continue=True

ll_total=0

DO WHILE lb_continue

FETCH CustomerCur-sor

INTO:ls_acct_no,

:ls_name,

:ll_balance;

If sqlca.sqlcode=0 Then

ll_total+=ll_balance

Else

lb_continue=False

End If

LOOP

循環體的結構有多種,這里提到的是最常見的一種。也有的程序員喜愛將一條FETCH語句放在循環體的前面,循環體內再放置另外一條FETCH語句,并檢測SQLCA.SQLCODE是否為100。但是這樣做,維護時需同時修改兩條FETCH語句,稍麻煩了些。

關閉游標

在游標操作的最后請不要忘記關閉游標,這是一個好的編程習慣,以使系統釋放游標占用的資源。關閉游標的語句很簡單:

CLOSE CustomerCursor;

使用Where子句

我們可以動態地定義游標中的Where子句的參數,例如在本例中我們是直接定義了查詢省份是北京的記錄,但也許在應用中我們要使用一個下拉式列表框,由用戶來選擇要查詢的省份,我們該怎樣做呢?

我們在前面曾經提到過,DECLARE語句的作用只是定義一個游標,在OPEN語句中這個游標才會真正地被執行。了解了這些,我們就可以很方便地實現這樣的功能,在DECLARE的Where子句中加入變量作參數,如下所示:

DECLARE CustomerCursor CURSOR FOR

SELCECT acct_no,name,balance

FROM customer

WHERE province=:ls_province;

∥定義ls_province的值

OPEN CustomerCursor;

游標的類型

同其它變量一樣,我們也可以定義游標的訪問類型:全局、共享、實例或局部,游標變量的命名規范建議也同其它變量一樣。

游標的高級技巧

盡管目前基于SQL語句的后臺數據庫所支持的語言都大致相當,但對游標的支持卻有著一些差異,例如對滾動游標支持。所謂滾動游標,就是程序員可以指定游標向前后任意一個方向滾動。如在Informix中,您甚至還可以將游標滾向結果集開頭或末尾,使用的語句分別是FETCH FIRST,FETCH LAST、FETCH PRIOR和FETCH NEXT。當程序員用FETCH語句,其缺省是指FETCH NEXT。由于滾動是在數據庫后臺實現的,所以滾動游標為用戶編程提供了極大的方便。

對游標支持的另一個不同是可修改游標。上述游標的使用都是指只讀游標,而象Oracle、Sybase等數據庫卻另外支持可作修改的游標。使用這樣的數據庫,您可以修改或刪除當前游標所在的行。例如修改當前游標所在行的用戶的余額,我們可以如下操作:

UPDATE customer

SET balance=1000

WHERE CURRENT of customerCursor;

刪除當前行的操作如下:

DELETE FROM Customer

WHERE CURRENT OF CustomerCursor;

但是如果您當前使用的數據庫是Sybase,您需要修改數據庫的參數,將游標可修改的值定為1,才能執行上述操作。這一賦值在連接數據庫的前后進行均可。

SQLCA.DBParm="Cursor Update=1"

另外一個內容是動態游標,也就是說您可以運行過程中動態地形成游標的SELECT語句。這同在PowerBuilder中動態地使用嵌入式SQL一樣,需要用到DynamicStagin-gArea等數據類型,這已超出了本節的范圍。