Programmeren in COBOL/Appendix B: file status

Wanneer je met bestanden werkt is de kans groot dat er iets misloopt. De bestanden kunnen niet worden gevonden of er gaat iets mis bij bewerkingen. Hiervoor dient de FILE STATUS in COBOL. Wanneer er iets misloopt kun je aan de hand van de FILE STATUS zien wat er precies fout is gegaan. Je kunt dan ook uw programma zodanig programmeren dat de gebruiker een foutbericht krijgt. Naast fouten kan de FILE STATUS ook extra informatie geven, zoals bijvoorbeeld dat je aan het einde van een bestand bent gekomen of gewoonweg dat het openen van het bestand gelukt is. Hieronder vind je een lijst van alle mogelijke inhoud van de FILE STATUS.

FILE STATUS	Omschrijving
00	Succesvol uitgevoerd.
04	De lengte van de record die wordt gelezen komt niet overeen met de lengte die werd omschreven in de FILE SECTION van de DATA DIVISION.
06	U heeft geprobeerd iets weg te schrijven in een bestand die geopend is als input.
08	U heeft geprobeerd iets te lezen in een bestand die geopend is als output.
09	Geen plaats in die map of de map bestaat gewoonweg niet.
10	De volgende record is niet gevonden. U bent aan het einde van uw bestand aangekomen.
12	U heeft geprobeerd een bestand te openen die al open is.
13	Bestand is niet gevonden.
23	Er werd geen record gevonden die werd gezocht m.b.v. een sleutel.
47	Er werd geprobeerd iets te lezen uit een bestand met READ of START dat niet geopend is met INPUT of I-O(INPUT-OUTPUT).
48	Er werd geprobeerd iets te schrijven in een bestand dat niet geopend is met OUTPUT, I-O(INPUT-OUTPUT) of EXTEND.
49	Er werd geprobeerd iets te verwijderen(DELETE) of te herschrijven(REWRITE) in een bestand dat niet is geopend als I-O(INPUT-OUTPUT).