TurboPL Referenz

Eot

Top  Previous  Next

Syntax

Eot(FileHdl: Integer): Real

Kategorie

Basisfunktion

Erklärung

Bei der Zahl handelt es sich um einen Texthandle, der mit der Funktion Reset ermittelt wurde. Eot liefert den Wert 1, falls das Dateiende erreicht wurde, andernfalls 0.

Beispiel

Im einem Datenbankjob wird eine externe Textdatei (EXTERN.TXT) ausgedruckt. (TurboPL-Befehle im Datenbankjob werden mit Punkt gekennzeichnet.)

.PROLOGUE
.VARDEF Text: Integer
.IF Text := Reset("EXTERN.TXT")
.                WHILE NOT Eot(Text)
               $(ReadLn(Text))
.                END
.                DO Close(Text)
.END

Siehe auch

Close, Read, ReadLn, Reset, Rewrite, TAppend, Write, WriteLn