如何用Microfocus Cobol捕获Java应用控制台输出的字符串

最优实现：使用内置扩展C$popen直接读取进程输出流 #

这是性能最高、实现最简的方案，不需要依赖临时文件，Micro Focus COBOL原生支持该扩展接口：

• 核心逻辑是通过C$popen启动Java子进程，直接绑定Java的标准输出流到COBOL可读取的管道句柄，内存级传递数据，没有额外磁盘IO开销
• 实现步骤：
  1. 在COBOL程序的WORKING-STORAGE SECTION定义接收变量、命令行变量、流句柄变量
  2. 构造启动Java应用的命令字符串，比如java -jar /path/to/your-java-app.jar
  3. 调用C$popen传入命令和读模式参数"r"，获取流句柄
  4. 循环调用C$fgets从流句柄读取Java输出的字符串，直到返回值为EOF标识
  5. 调用C$pclose关闭流，回收子进程资源
• 参考代码片段：

WORKING-STORAGE SECTION.
01  COMMAND-LINE    PIC X(256) VALUE 'java -jar /opt/myapp/rest-client.jar'.
01  READ-BUFFER     PIC X(1024).
01  STREAM-HANDLE   USAGE HANDLE.
01  RETURN-CODE     PIC S9(4) COMP.

PROCEDURE DIVISION.
    CALL "C$popen" USING COMMAND-LINE, "r", STREAM-HANDLE
    CALL "C$fgets" USING STREAM-HANDLE, READ-BUFFER, 1024, RETURN-CODE
    * 此处判断RETURN-CODE处理读取逻辑，读到EOF之前可以把内容拼接存入目标变量
    CALL "C$pclose" USING STREAM-HANDLE

兼容备选方案：重定向输出到临时文件后读取 #

如果你的COBOL运行环境不支持C$popen扩展，可以用这个兼容方案：

• 核心逻辑是COBOL调用系统命令执行Java应用，将输出重定向到临时文件，执行完成后COBOL直接读取该文件内容，读完可清理临时文件
• 构造的系统命令格式参考：java -jar /path/to/your-java-app.jar > /tmp/java_output.tmp
• 优势是兼容所有版本的Micro Focus COBOL，缺点是多了磁盘IO开销，需要额外处理临时文件的权限、命名冲突、异常清理问题

注意事项 #

• 提前约定Java输出字符串的编码、最大长度、换行规则，COBOL侧定义对应长度的接收变量，避免内容截断
• 增加Java进程异常退出的处理逻辑，比如判断进程退出码非0时触发对应错误分支

内容的提问来源于stack exchange，提问作者yonikawa