如何在 RPGLE 中按 KEY FIELD DATE 进行 LOOP 记录？

问题描述

我一直无法获得完整的输出。

据说输出需要如下所示：

这是我的物理文件：

我在物理文件中有三个字段：

• EXGDAT = 日期
• EXGCOD = 交换代码
• EXGRAT = 汇率

我的输出如下：

我的输出只显示了 6 月 1 日的记录，而不是同时显示了 5 月 31 日和 6 月 1 日的记录。我应该怎么做才能获得我想要的确切输出？请帮我。提前致谢

解决方法

内循环一直运行到 std::cout << first_name << " " << last_name << std::endl; 。然后你写入子文件。写入子文件后的 %eof 将返回 %eof，因为进入文件的光标尚未重置。

reade

使用 write sfl01 exgdat reade curexg 和 SETGT 读取下一组货币汇率记录的 READ。

EXGDAT

要调试未读取预期记录的问题，请尝试将每次读取的结果写入打印文件。这样你就可以在程序运行后看到一些东西。可能有助于理解阅读的内容和原因。

            write sfl01
    exgdat  setgt curexg
            read  curexg