Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

FILE STATUS Codes

Cobol Code Examples

FILE STATUS Codes

by  webrabbit  Posted    (Edited  )
[tt]05 FILE-STATUS Pic X(02) Value Space.
88 ERR-NONE Value '00'.
88 ERR-DUPLICATE-ALTERNATE-KEY Value '02'.
88 ERR-SHORT-RECORD Value '04'.
88 ERR-FILE-EMPTY Value '05'.
88 ERR-READ-ONLY Value '06'.
88 ERR-NON-REMOVABLE-MEDIUM Value '07'.
88 FILE-AT-END Value '10'.
88 ERR-RELATIVE-RECORD-NO-OFLOW Value '14'.
88 ERR-INDEXED-FILE-OUT-OF-SEQ Value '21'.
88 ERR-DUPLICATE-KEY Value '22'.
88 ERR-RECORD-NOT-FOUND Value '23'.
88 ERR-OUT-OF-DISK-SPACE Value '24'.
88 ERR-DISK-ERROR Value '30'.
88 ERR-ASSIGNMENT-CONFLICT Value '31'.
88 ERR-DISK-IS-FULL Value '34'.
88 ERR-FILE-N0T-FOUND Value '35'.
88 ERR-WRONG-OPEN-MODE-FOR-FILE Value '37'.
88 ERR-PREVIOUSLY-CLOSED-W-LOCK Value '38'.
88 ERR-FILE-ATTRIBUTES-CONFLICT Value '39'.
88 ERR-ALREADY-OPEN Value '41'.
88 ERR-NOT-OPEN Value '42'.
88 ERR-RECORD-HAD-NOT-BEEN-READ Value '43'.
88 ERR-INVALID-RECORD-SIZE Value '44'.
88 ERR-RECORD-ID-FAILURE Value '45'.
88 ERR-READ-AFTER-EOF Value '46'.
88 ERR-NOT-OPEN-FOR-INPUT Value '47'.
88 ERR-NOT-OPEN-FOR-OUTPUT Value '48'.
88 ERR-NOT-OPEN-FOR-UPDATE Value '49'.
88 ERR-RECORD-LOCKED Value '51'.
88 ERR-DEADLOCK Value '52'.
88 ERR-MAXIMUM-LOCKS-EXCEEDED-RU Value '53'.
88 ERR-MAXIMUM-LOCKS-EXCEEDED-FC Value '54'.
88 ERR-MAXIMUM-LOCKS-EXCEEDED-IM Value '55'.
88 ERR-FILE-LOCKED Value '61'.
[/tt]
Register to rate this FAQ  : BAD 1 2 3 4 5 6 7 8 9 10 GOOD
Please Note: 1 is Bad, 10 is Good :-)

Part and Inventory Search

Back
Top