PDA

View Full Version : subfile lesen



kretzsch
18-05-12, 12:20
Hallo zusammen,

in einer subroutine lese ich mit der relativen satznummer eine subfile ein, um deren sätze in einer printerfile auszugeben. Anschließend setze ich die rel. satznr. wieder auf 1. Beim ersten aufrufen der sr funktioniert alles prima, beim wiederholten aufruf wird kein satz "gefunden". Was kann ich tun?
for #z = 1 to #satzanzahl;
chain #z subfileformat;
if not %eof;
.... befehle für druck
endif;
endfor;
rel.sn = 1;

Danke im Voraus!
kretzsch

Fuerchau
18-05-12, 12:35
Die Abfrage %eof() ist hier falsch, da ein Chain %found() setzt und %eof() der letzten READ-Operation nicht zurücksetzt.

Frage also

if %found();
endif;

ab.

kretzsch
18-05-12, 13:02
Man oh man ...
hatte das schon in erwägung gezogen, kann es mir aber nicht erklären, wenn ich die rel. satnummer wieder zurück setze.

Jedenfalls vielen dank und schönes we.

kretzsch