Use this library routine within a declarative procedure after an I/O error has occurred.
CALL "C$GetLastFileOp" USING operation
|
|
If the operation is longer than 20 characters, it is truncated to the right.
If the value SPACES is returned that indicates that no operation is available.