d MyTab DS DIM(n1) qualified
d Feld1 10 dim(n2)
d Feld2 5 0 dim(n2)

d I1 S 5I 0
d I2 S 5I 0

c eval MyTab(I1).Feld1(I2) = ....
c if MyTab(I1).Feld2(I2) = ...