游標(biāo)是一個(gè)非常有效的記錄集處理方式，在PB中游標(biāo)用的地方比較廣泛，下面是在PB中游標(biāo)使用的整個(gè)過(guò)程，基本包括定義游標(biāo)、打開游標(biāo)、操作游標(biāo)和關(guān)閉游標(biāo)這幾個(gè)步驟，具體如下代碼所示：

//定義游標(biāo)
DECLARE C1 CURSOR FOR
//游標(biāo)的具體取值內(nèi)容
select aln_cd,sum(cargo_aln_fare) from fare_daily_view
where aln_cd <> '000' and cargo_aln_fare <> 0 and act_fare_dt between :emstart and :emend
group by aln_cd;  //注意，這里的分號(hào)千萬(wàn)不能丟掉

//打開游標(biāo)
OPEN C1;

DO WHILE sqlca.SQLCODE=0
     //將游標(biāo)內(nèi)的數(shù)據(jù)一條條存放到數(shù)組里
     i += 1
     FETCH C1 INTO :record,:fare_sum; //使用fetch取值到變量record和fare_sum中
     re_cd[i] = string(record)
     fr_sum[i] = string(fare_sum,"0.00")
LOOP

//關(guān)閉游標(biāo)
CLOSE C1;