在RPGLE嵌入式SQL中使用CAST转换100C类型TEXT字段的CCSID

我明白你现在的场景：之前处理固定长度A类型（EBCDIC波兰语，CCSID 870）字段转Unicode（G类型，CCSID 1200）时，用CAST到65535再转码的方式成功了，现在需要把这个逻辑适配到可变长度C类型字段上。

核心适配方案 #

C类型字段在IBM i SQL中对应VARCHAR类型（而非固定长度的CHAR），所以只需要把原来的CHAR替换成VARCHAR，保持二进制中转（CCSID 65535）的逻辑即可：

exec sql                                            
   UPDATE CONVTXT set TEXT2B =                     
   CAST(CAST(TEXT as VARCHAR(100) CCSID 65535)       
   AS VARCHAR(100) CCSID 1200);                        

逻辑说明 #

• C类型是可变长度EBCDIC字段，用VARCHAR匹配其特性，能避免固定长度转换带来的空格填充或截断问题。
• 先转成CCSID 65535（二进制无转换）是为了直接读取字段的原始字节，再转成CCSID 1200（Unicode）时，SQL会按照波兰语EBCDIC（CCSID 870）到Unicode的正确映射完成转码，和你之前处理A类型字段的逻辑完全一致。

可选优化：明确指定源CCSID #

如果你的C类型字段的CCSID没有被正确标记为870（波兰语EBCDIC），可以在第一次CAST时明确指定源CCSID，确保转码逻辑准确：

exec sql                                            
   UPDATE CONVTXT set TEXT2B =                     
   CAST(CAST(TEXT as VARCHAR(100) CCSID 870)       
   AS VARCHAR(100) CCSID 1200);                        

这样SQL会先将字段内容按CCSID 870解析，再转换为CCSID 1200的Unicode，同样能保证波兰语字符的正确转换。

内容的提问来源于stack exchange，提问作者ChristLarsen