×
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Contact US

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

COBOL General discussion FAQ

Cobol Code Examples

FILE STATUS Codes by webrabbit
Posted: 10 Feb 04 (Edited 19 Aug 06)

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'.


Back to COBOL General discussion FAQ Index
Back to COBOL General discussion Forum

My Archive

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close