如何在DDS中的数组中打印值

问题描述

我知道这个问题不是直接面向RPG语言的,但是我不知道我会转向什么地方。

我在课堂上为我的项目在RDi中创建了PRTF。我在RPGLE文件中设置了几个数组来保存一些数字,例如本示例。

Dcl-s Freshman  Packed(5:0) Dim(4);

我如何指定要在PRTF中打印Freshman(2)?

我已经在“函数”部分尝试过类似的操作:Freshman(1),REFFLD(Freshman(1)),REFFLD(Freshman / 1)

解决方法

基于DDS的对象(PRTF / DSPF / PF / LF)只能将数据库文件用作引用。

否则,您需要在PRTF中显式定义字段。
A FRSHMAN 5S 0 182

现在,您的RPG程序可以将DDS定义的字段用作参考...
Dcl-s Freshman like(frshman) Dim(4);

或者您可以将其保留为最初发布的明确定义。

无论哪种方式,您都需要在RPG程序中手动移动数据。
frshman = Freshman(1);