C$GetLastFileOp

最後に実行された COBOL I/O 操作を取得します。

構文:

I/O エラーが発生した後に、このライブラリ・ルーチンを宣言手続きの中で使用します。

CALL "C$GetLastFileOp" USING operation

パラメータ:

operation
PIC X(20)

出口:

operation
最後に実行された I/O 操作の名前。返される有効な操作は次のとおりです。
  • Close
  • Commit
  • Delete
  • DeleteFile
  • Open
  • ReadLock
  • ReadNextLock
  • ReadNextNoLock
  • ReadNoLock
  • ReadPreviousLock
  • ReadPreviousNoLock
  • Rewrite
  • Rollback
  • Start
  • StartTransaction
  • Unlock
  • UnlockAll
  • Write

コメント:

操作が 20 文字より長い場合は、右端を丸めます。

値 SPACES が返される場合、操作がないことを示します。