Programmeren in COBOL/Statements/READ

READ is een statement van COBOL. Deze statement dient om gegevens te lezen uit een bestand. Hier wordt de vorm en de betekenis uitgelegd samen met voorbeelden.

Vorm 1: sequentiële READ

READ bestandsnaam [NEXT] RECORD [INTO veld]

[AT END code]

[NOT AT END code]

[END-READ]

[]: geeft aan dat dit stukje optioneel is.
{}: geeft aan dat dit één stuk is die samen hoort.
onderstreept: geeft aan dat het verplicht is dit te schrijven. 
Als het tussen [] staat betekent dat je dit minstens moet schrijven,
als je dat deel van de statement wilt gebruiken.
niet-onderstreept: betekent dat je het mag schrijven maar is niet verplicht.
...: Geeft aan dat je nog velden of constanten mag bijschrijven
of stukjes die tussen [] of {} staan herhalen.

Uitleg

READ

Met READ wordt een record gelezen uit een bestand. Deze record wordt dan opgeslagen in velden van de FILE SECTION in de DATA DIVISION. Wanneer men hierna nog een record leest gaat het vorige record verloren.

NEXT en RECORD(optioneel)

Dient alleen maar om de leesbaarheid te verbeteren.

END(optioneel)

Hierachter kan men programmacode schrijven. Deze code wordt dan uitgevoerd wanneer men aan het einde van het bestand zit. Je kan bijvoorbeeld een boolean op TRUE zetten zodat je later weet dat men aan het einde van een bestand is gekomen.

NOT END(optioneel)

Hierachter kan men programmacode schrijven. Deze code wordt dan uitgevoerd wanneer men nog niet aan het einde van het bestand zit.

END-READ(optioneel)

Sluit de statement af.

Zie ook

• Hoofdstukken sequentiële bestanden, relatieve bestanden zonder hash, relatieve bestanden met hash en index-sequentiële bestanden
• Functies WRITE, REWRITE en DELETE.