LINENO( )-Funktion

Artikel
04/01/2008

Gibt die Zeilennummer des gerade ausgeführten Programms relativ zur ersten Zeile des Hauptprogramms zurück.

LINENO([1])

Rückgabewerte

Numerisch

Parameter

1
Gibt die Zeilennummer relativ zur ersten Zeile des aktuellen Programms oder der aktuellen Prozedur zurück. Wenn Sie das Argument 1 nicht angeben, wird die Zeilennummer relativ zur ersten Zeile des Hauptprogramms zurückgegeben.

Hinweise

Programmzeilen werden vom Anfang des Programms beginnend gezählt. Kommentar-, Fortsetzungs- und Leerzeilen werden dabei mitgezählt. Wird die Ausführung eines Programms unterbrochen, gibt LINENO( ) die Nummer der Programmzeile zurück, in der das Programm unterbrochen wurde. Bei Programmabbruch wird 0 zurückgegeben.

Standardmäßig werden Zeilennummern im Verhältnis zum Beginn des Hauptprogramms zurückgegeben. Bei Aufruf einer Prozedur wird die Zeilennummerierung am Beginn des aufrufenden Programms fortgesetzt.

LINENO( ) ist bei der Fehlerbeseitigung in Programmen nützlich. Durch Ausgabe des folgenden Befehls im Debugger können Sie die Programmausführung mit einem Haltepunkt in einer bestimmten Zeile stoppen:

LINENO( ) = nExpression

Die Programmausführung wird unterbrochen, wenn der Wert in LINENO( ) gleich nExpression ist.

Beispiel

Das folgende Beispiel gehört zu einer einfachen Fehlerbehandlungsroutine.

ON ERROR DO bug_proc WITH LINENO( )
BRWS  && Causes an error
ON ERROR

** Bug_Proc error handler **

PROCEDURE bug_proc
PARAMETERS gnBadLine
WAIT WINDOW 'Error occurred at line: ' + ALLTRIM(STR(gnBadLine))
RETURN

Siehe auch

ERROR( ) | MESSAGE( ) | PROGRAM( ) | SYS(16) - Dateiname des ausgeführten Programms

Freigeben über