Externe Dateien in Cobol

[Pikachu]

Sieh' mal in die aktuelle Umwandlungsliste (WRKSPLF). Stehen da irgendwelche Warnungen drin?

[Fuerchau]

Da der Start den Datei-Zeiger nicht setzen kann, ist der READ PRIOR eben auch nicht erfolgreich.

Bei Mandanten hast du ja 2 Varianten:

1. Der Start ist erfolgreich weil noch ein Mandant folgt, dann klappt auch READ PRIOR.
2. Ist der Start nicht erfolgreich, weil du hinter dem letzten Mandanten (also EOF) stehst, dann ist READ LAST der richtige Weg.

In beiden Fällen musst du natürlich noch prüfen, ob du noch im richtigen Mandanten bist.

start myfile key is not < externally-described key
invalid
read myfile last
at end continue
end-read
not invalid
read myfile prior
at end continue
end-read
end-start

[puddschini]

Kollege,
das war nun doch ein Volltreffer, es funktioniert wie gewünscht.
Lesen bildet, ich habe die Fehlermeldungen wohl nicht beachtet, habe dann nach Deinem Hinweis die Felder angepaßt, obwohl sie von der Struktur her nicht übereinstimmen (StufenNr) und habe im Start statt der einzelnen Felder "external-described-key" angegeben. Habe sowohl die ext. Felder als auch die in der FD-Stufe gefüllt und nach dem READ abgeglichen. Danach lief es reibungslos.
Danke Dir ganz herzlich für ein verspätetes dickes Osterei.
puddschini