COBOL und START Anweisung

[Fuerchau]

Da in COBOL/400 der Key extern beschrieben ist, sind die Keyfelder im Satzpuffer zu füllen und anschließend ein:

start myfile key is >= EXTERNALLY-DESCRIBED-KEY

[geo_works]

Aha,

vielen Dank für die erweiterten Informationen.

Mit dem Operator >= wird der Pointer auf den ersten Satz der Datei zeigen, wenn in meinen Key-Felder im Satzpuffer jeweils Low-Values stehen.
Muss ich dann den Satz, auf den der Pointer nun zeigt, mit READ Dateiname oder mit READ NEXT Dateiname lesen.
Logisch wäre für mich ein normales READ, da READ NEXT eigentlich den nachfolgenden Satz zur Verfügung stellen würde.

Ist das korrekt oder habe ich einen Denkfehler ?

Ich werde das aber mal ausprobieren, sobal ich wieder an der Machine bin.

Die START Anweisung würde ja dann auch nicht auf INVALID KEY laufen, wenn ich >= verwende. Außer in dem Fall das die Datei keine Datensätze enthält

Grüße

Mike

[Fuerchau]

Der Start setzt genau vor dem gewünschten Schlüssel auf.
Ein "READ MyFile at end" liest den nächsten Satz, "next" ist der Default, im Gegensatz halt zu "previous".
Ein "READ myfile key is externally-described-key Invalid" ist ein Direktzugriff.

Der Invalid beim Start wird tatsächlich nur ausgelöst, wenn kein Satz folgt. Kann aber auch ignoriert werden, da der nächste Read ja auch auf "at end" kommt.