当前位置: 首页 > 编程笔记 >

您将如何在COBOL-DB2程序中检测游标行结尾的条件?

伏建修
2023-03-14
本文向大家介绍您将如何在COBOL-DB2程序中检测游标行结尾的条件?,包括了您将如何在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-PERFORM

WF-END-CURSOR-Y和WF-END-CURSOR-N是88级的两个标志,用于控制循环。一旦SQLCODE的值为100,则意味着光标已到达最后一行,并且循环终止。

 类似资料:
  • 本文向大家介绍您如何还原在COBOL-DB2程序中完成的所有DB2表更改?,包括了您如何还原在COBOL-DB2程序中完成的所有DB2表更改?的使用技巧和注意事项,需要的朋友参考一下 我们可以使用ROLLBACK语句还原在COBOL-DB2程序上完成的所有更改。但是,ROLLBACK仅在未发出COMMIT之前适用。如果我们使用了COMMIT语句,那么ROLLBACK将还原最后一个COMMIT点之后

  • 本文向大家介绍如何在COBOL-DB2程序中使用单个INSERT命令在DB2表中插入多行?,包括了如何在COBOL-DB2程序中使用单个INSERT命令在DB2表中插入多行?的使用技巧和注意事项,需要的朋友参考一下 如果要使用单个INSERT命令在DB2表中插入多行,则必须定义主机变量数组并将要插入的行数据移动到该数组中。我们需要在工作存储部分中使用配置S9(4)COMP定义另一个变量,该变量将保

  • 快速免责声明:我是一个。Net开发人员,可能没有提供您需要的有关环境的所有信息,但可以根据要求获取信息。我们有COBOL程序员,但他们从来没有这样做过。 我们正在将带有DB2数据库的大型机应用程序转换为。Net MVC应用程序和SQL数据库。我们希望从DB2上的COBOL存储过程调用一个大型机COBOL批处理程序。我读过这篇文章,但是我还没有找到一个好的例子来说明如何创建一个调用COBOL程序的C

  • 问题内容: 如何检测expressJS应用程序在什么环境中运行?(开发,测试,生产?)。没有任何迹象表明环境… 我知道您可以在每种环境下的配置文件中声明变量,但这对动态加载模块没有帮助… 问题答案: 您可以通过选中(可以在Express中使用)检查环境,也可以通过直接检查(在该变量中找到的环境或默认为“开发”中的环境)来更直接地进行操作。其他库,例如Socket.IO等)。

  • 编译COBOL程序 为了使用JCL以批处理模式执行COBOL程序,需要编译程序并使用所有子程序创建加载模块。 JCL在执行时使用加载模块而不是实际程序。 在使用JCLLIB或STEPLIB执行时,将加载库连接并提供给JCL。 有许多主机编译器实用程序可用于编译COBOL程序。 一些公司公司使用像Endevor这样的变更管理工具,它可以编译和存储程序的每个版本。 这在跟踪对程序所做的更改时很有用。

  • 本文向大家介绍在COBOL-DB2程序中激发COMMIT之后,如何保持CURSOR打开?,包括了在COBOL-DB2程序中激发COMMIT之后,如何保持CURSOR打开?的使用技巧和注意事项,需要的朋友参考一下 每当我们发出COMMIT语句时,所有打开的游标都会被关闭。当我们在使用游标时必须在UPDATE之后频繁使用commit语句时,这是一种非常常见的情况。在这种情况下,我们可以在游标声明期间使