请教个简单的ＲＰＧ问题，急！！

Question

我要判断一个文件里的Ａ字段的地２２位为字符，如果为１就实行A，否则执行B,该怎么写。。

Answer 1

注意看错误信息，不过 还是推荐你用第一种。

Answer 2

我就是后面那个想法，但是我现在定义一个字段总是报错。。
以前没用过RPG。。。

Answer 3

方法太多了  比如  EVAL    TEST = %SUBST(YOURFLIED:22:1)
                           IF         TEST = '1'
                           EXSR    A                     
                           ELSE
                           EXSR    B
                           ENDIF
或者干脆把这个字段赋给一个DS结构里，对第22~23位的字符进行判断 都可以。