小编jem*_*rug的帖子

Rpgle双字节问题

以下代码有问题: -

C                   eval      aaCHNO=%ucs2('0000000000')        
C**                 move      w_Chano       aaCHNO              
C                   Evalr     aaCHNO= %ucs2(%editc(w_Chano:'X'))
Run Code Online (Sandbox Code Playgroud)

定义:

AACHNO            Char(10) CCSID(1200)  
W_CHANO           Packed(6,0)  
Run Code Online (Sandbox Code Playgroud)

在AACHNO期待: - 0000123456但得到'bbbb123456'其中b =空白为什么?

我如何得到我想要的结果?欢呼,杰姆鲁格

rpgle ibm-midrange

1
推荐指数
1
解决办法
97
查看次数

标签 统计

ibm-midrange ×1

rpgle ×1