EQA1967E The subject of the built-in function name pseudovariable (character string) must be complex numeric.

Explanation

You are trying to get apply the PL/I IMAG or REAL pseudovariable to a variable that is not complex numeric.