EMS_END

End the current error reporting environment

Description:

Check if any error messages are pending output in the previous error reporting context. If so, then annul and release the current context; if not, then just release the current context. Return the last reported status value.

Invocation

CALL EMS_END( STATUS )

Arguments

STATUS = INTEGER (Returned)
The global status.