您将如何在COBOL-DB2程序中检测游标行结尾的条件?
游标可用于从DB2表中获取多行。但是,我们必须循环获取此游标,以便一次将与单行相对应的值分配给主机变量。基于此逻辑,我们必须处理循环,直到光标到达最后一行结果为止。
当游标中没有剩余的行要提取时,SQLCODE字段的值为100。实际上,我们可以通过以下方式实现此目的。
SET WF-END-CURSOR-N TO TRUE
PERFORM UNTIL WF-END-CURSOR-Y
EXEC SQL
FETCH ORDER_CUR INTO :ORDER-ID
END-EXEC
IF SQLCODE = 100
SET WF-END-CURSOR-Y TO TRUE
ELSE
PERFORM A20-PROCESS-RECORD
END-IF
END-PERFORMWF-END-CURSOR-Y和WF-END-CURSOR-N是88级的两个标志,用于控制循环。一旦SQLCODE的值为100,则意味着光标已到达最后一行,并且循环终止。
热门推荐
1 如何训练狗狗不叫
2 训练狗狗不叫
3 训练狗狗随行
4 怎么训练狗狗不叫
7 训练比熊狗狗教程
10 上海狗狗训练
11 怎么训练狗狗上厕所
12 训练狗狗趴下
13 狗狗服从训练
14 训练狗狗拒食
15 训练狗狗笑
16 训练狗狗大便
17 训练狗狗立
18 训练狗狗捡东西