请问：在rpg3中，如何定义长度大于256的数组？

chinagirlwang

在rpg3中，如何定义长度大于256的数组？

fxf_china

数组不是E表么
     E                    TNAME    9999 11   
上面是 长度9999的数组，每个元素长11

chinagirlwang

不好意思，我没说清楚。

我说的是元素长度大于256.

.E....FromfileTofile++Name++N/rN/tbLenPDSArrnamLenPDSComments++++++
E                    RCDATA     20300                                                  

提示如下错误。
Message ID . . . . . . :   RSC3004       Severity . . . . . . . :   10      
Message type . . . . . :   Diagnostic                                       
                                                                             
Message . . . . :   The Length of the alphameric array/table is invalid if  
   larger than 256.                                                         
Cause . . . . . :   The Length-of-Entry entry (positions 40-42 or 52-54) is
   larger than 256 for an alphameric array or table.                        
Recovery  . . . :   Change the Length-of-Entry entry (positions 40-42 or   
   52-54) to a value no greater than 256.

leason

好象不行的吧，最大也就是256长度，之前我也遇到这个情况

不过我定义的是DS段数据

I            DS                                      
I                                        1 256 D21M01


也只能最大定义256的长度，一超过256就报错，这大概是系统的默认设置吧！

还是跟系统版本有关？有那位高人知道的话，请说明一下！

sa_hata

好像只能是256 吧... 可以想想有什么其他途径解决啊,
或者你把问题描述清楚些大家一起想想办法 ....

fxf_china

建个临时表思路清楚点吧

chinagirlwang

现在用rpg4来，实现了。