Program contains :

10 TIP-LIABILITY-ARR PIC X(2) VARYING.
...
EVALUATE TIP-LIABILITY-ARR
...
WHEN 'R'
...
WHEN 'NB'

The evaluation was working in Server Express 2.2 but is not working in Server Express 5.1
Server Express 5.1, always checks 2 characters, and therefore tests with only one character (eg WHEN 'R') fail.

To make the program work the source needs to be changed to:

EVALUATE TIP-LIABILITY-ARR (1:TIP-LIABILITY-LEN )

Is there a compile directive to get the same behavior in Server Express 2.2, in Server Express 5.1, without changing the program source code?

Full article: https://portal.microfocus.com/s/article/KM000016138