问题提出：
是这样子的，因公司业务需要，将对系统做一个大变动，
需要将所有程式中的 左列字符 变更为 右列字符 有什么好方法么？
113477 = 140351
113478 = 140352
113499 = 140399
114301 = 141101
114302 = 141102
......
答：
建议，用一个copybook定义对应数字的字符。这样程序的变化，而只要跟进相应的copybook。最好再加一层定义，如：
113477 = 140351
113478 = 140352
......
在rpgle的copybook中，
/free
113477 = 140351；
.....
/end-free
而符号140351在引用的copybook中是这样定义的：
d 140351 c ‘11230101’
......
这样前面符号113477在程序代码实际就等于字符‘11230101’。
上述方法较适合不同版本程序控制，可以新旧版本同时存在。
仅供参考！
阅读(1588) | 评论(1) | 转发(0) |
