Resolution:
Recode the statement as required; then recompile.
Example:
In the following example, the move statement specifies the x1 variable as both the source and the target, which is not allowed.
$set warning(2)
01 x1 pic x(10).
move x1 to x1