GRP7027

The Result-Field entry (positions 43-48) of a CASxx operation does not contain a name that is defined in Factor 1 (positions 18-27) of a BESGR operation; the specification is ignored.

Specify the name of a subroutine in the Result Field of the CASxx operation, or create the subroutine which is referenced on the CASxx operation. Compile again.