比较字段时，SOC7异常终止

Question

比较2个字段时我异常中止 它们定义为：

01 A   PIC S9(8) COMP VALUE 0.
01 B   PIC S9(5) COMP-3.

将要中止的声明是：

PERFORM VARYING A FROM 1 BY 1 UNTIL A > B 

此语句在另一个循环中，并且B IS的值在那里增加。对于前两次迭代，B的值是正确的。对于第三次迭代，B Displayed的值是非数字的。

您能建议在这里做什么？