Intrinsic %1 not supported. Statement ignored.
30
Cause . . . . . : A statement in the PROCEDURE DIVISION used an intrinsic function that is currently not supported.
Recovery . . . : Remove the unsupported intrinsic function.