奇怪的参数长度问题（字符型参数长度超过33位会出错）

chenzhy

有这样一个程序：                              
DA1               S             50A                                    
DA2               S             50A                                    
C     *entry        PLIST                                                                  
C                   PARM                    A1                          
C                   PARM                    A2                                                            
C                   SETON                                            LR
1，当我调试时，传入参数parm('A'  'B')，然后跟踪A1,A2参数，结果发现A1的值变成了A                             B            ,A2的值变成B                                乱码，    几次测试发现A1在第33个字符处被A2覆盖，不知何故。
2，然后更改参数长度为33，依法跟踪，正常；参数长度改为34，依法跟踪，出现同样的错误。
3，传入参数时使用空格补齐parm('A                                          ' 'B                                     ' )，正常。
为什么在长度是33时传入少于33位的参数就正常，而长度多余33时传入的参数不足位数就不行？难道传入参数位数不够时必须使用空格补齐吗？还有没有其他处理方法？还是我的程序写的有问题？望兄弟们指点迷津。

[ 本帖最后由 chenzhy 于 2006-7-13 21:14 编辑 ]

tme45

很困惑

我用过30000长的字符参数，一点没事

dragon111

是用其他cl或rpg程序调用的吗?

chenzhy

我直接在命令行调用的:
call pgm(libname/pgmname) parm('s' 's' 's' ) 类似这样。

dragon111

我的意思是
call pgm(libname/程序1) parm('s' 's' 's' )
在程序1中call 程序2 ,而程序2 是你说的程序。

chenzhy

不是的，我在绿屏的命令行call的，只有一个程序。

[ 本帖最后由 chenzhy 于 2006-7-14 09:00 编辑 ]

jackyxp

命令行执行是有问题的，你可以写一个cl程序，在程序里把参数值赋给变量s1、s2、s3，再call 该程序
call pgm(libname/pgmname) parm(&s1 &s2 &s3 )

chenzhy

谢了。

coolk

曾经遇到这样的问题！^_^