用PIC型中间变量解决Fixed赋值溢出abend

我在Debug一个PLI程序PRGM000的时候遇到了一个CEE34A abend,报的错误信息如下:

You were prompted because the CEE34A condition was raised in your program. CEE34A is a severity or class 3 condition. The operating system has generated the following message: CEE3210S The system detected a decimal-overflow exception (System Completion Code=0CA). The current location is PRGM000 ...

more ...