PB：关于游标的使用

游标可以解决PB中Select语句产生的多结果赋值问题；
游标是一种能从包括多条数据记录的结果集中每次提取一条记录的机制；
下面是一个书写例子:《将游标产生的结果集存入数组》，仅供参考。

String ls_id[] //声明存放数组
Long i
i = 1
Declare id Cursor For //定义游标
Select table_id From table Where d Using sqlca; //定义Select条件
Open id; //打开游标
/将游标内的数据逐条存入数组/
Do While sqlca.sqlcode = 0
Fetch id Into :ls_id[i]; //取出第i个id的值
If ls_id[i] = 0 And ls_id[i-1] = 0 Then //当i与i-1的值均为0时，跳出循环
Exit;
Else
ls_id[i] //赋值，第i个id值赋值给数组ls_id[]
i++
End If
Loop; //循环
Close id; //关闭游标