RPG 中可以使用二維數組么？

yayuyo

RPGLE里可以用二維數組
RPG里可以么？
如果可以，怎么用呢？
请教……

tianya0229

有必要用那么复杂吗?是情况?

neverbackgo

可以，在V5R2及以后的版本就可以使用二维数组了，但必须是Quanlified的形式。
D ARRAYD             QUALIFIED DIM(3)
D  LEAF    S    3  2 DIM(3) INZ(1.23)

ARRAYD.LEAF(1,1) = 1.23
ARRAYD.LEAF(1,2) = 1.23
就可以了

tangjia

Da                DS                  OCCURS(4)
D  b                                    3S 0 DIM(6)   
.
.
.
C     1     OCCUR     A
C            EVAL       B[2]=88


这样就是　B[1][2]＝88

这样实现2维　虽然比较麻烦点　但是用习惯了就OK了
RPG没有直接的二维数组

roden

RPG中的二维数组比较麻烦,一般都是用OCCUR实现的,
不过我一般都是用二维数组一维化实现的,这样就算三维
不过RPG中用到二维数组的机会还真不多.

stickyfinger

原帖由 roden 于 2008-11-12 14:59 发表
RPG中的二维数组比较麻烦,一般都是用OCCUR实现的,
不过我一般都是用二维数组一维化实现的,这样就算三维
不过RPG中用到二维数组的机会还真不多.

occur 可以使用在datastructure和dataarea上，实现所谓的二维数组功能。
不过datastructure比较灵活，可以在ds基础上在自定义变量。