IF überprüft eine Bedingung.
IFNOT ist die Kurzschreibweise für IF
*SCREEN NE.
Wenn die Bedingung wahr ist, wird die Anweisung ausgeführt. Wenn die Bedingung falsch ist, wird die nächste Anweisung ausgeführt.
Text in einfachen oder doppelten Anführungszeichen wird auf Groß- und Kleinschreibung überprüft.
IF [variable] [operator] variable befehl
IFNOT variable befehl
Für variable können Sie alle Variablen von
Entire Connection benutzen (z.B. #PARM1 oder
#CNT1). Bei einer Großrechneranwendung ist die
Variable *SCREEN hilfreich (Syntax siehe unten).
Damit können Sie feststellen, welcher Bildschirm gerade übertragen wird, ohne
ihn anzuzeigen. Sie können dann entsprechend reagieren.
operator ist einer der folgenden Werte:
EQ
|
gleich |
NE
|
ungleich |
GE
|
größer gleich |
LE
|
kleiner gleich |
GT
|
größer als |
LT
|
kleiner als |
Für befehl können Sie jeden Befehl von Entire Connection, außer den Folgenden, benutzen:
IF
IFNOT
WAITFOR
Wenn Sie die optionalen Operanden variable
und operator bei der
IF-Anweisung weglassen, wird die Variable
*SCREEN (gesamter Bildschirm) und der Operator
EQ benutzt.
*SCREEN Die Variable *SCREEN kann nur einmal pro
IF/IFNOT benutzt werden.
*SCREEN [zeile spalte[länge]]
zeile ist ein Wert zwischen 1 und der maximalen Zeilenanzahl + 1.
spalte ist ein Wert zwischen 1 und der maximalen Zeilenlänge.
länge ist ein Wert zwischen 1 und der Bildschirmgröße.
Zum Beispiel:
*SCREEN steht für: gesamter Bildschirm.
*SCREEN 2 1 steht für: ab Zeile 2, Spalte 1
bis zum Ende des Bildschirms.
*SCREEN 2 1 80 steht für: ab Zeile 2,
Spalte 1 die nächsten 80 Positionen.
Den gesamten Bildschirm nach NEXT durchsuchen. Wenn
NEXT vorkommt, zur Sprungmarke NEXT verzweigen:
IF 'NEXT' GOTO NEXT
Den gesamten Bildschirm nach NEXT durchsuchen. Wenn
NEXT nicht vorkommt, zur Sprungmarke WEITER
verzweigen:
IFNOT 'NEXT' GOTO WEITER
Ab Zeile 2, Spalte 1 die nächsten vier Positionen nach
NEXT durchsuchen:
IF *SCREEN 2 1 4 EQ 'NEXT' GOTO WEITER
Ab Zeile 2, Spalte 1 die nächsten 80 Positionen nach NEXT
durchsuchen:
IF *SCREEN 2 1 80 EQ 'NEXT' GOTO WEITER
Ab der in der Variable +ROW enthaltenen
Zeile und der in +COL enthaltenen Spalte nach dem
Inhalt der lokalen Variable #PARM1 suchen; die
Anzahl der zu durchsuchenden Positionen wird durch den Wert in der Variable
#CNT3 festgelegt:
IF *SCREEN +ROW +COL #CNT3 EQ #PARM1 GOTO WEITER
Die definierte Tastatureingabe an den Host senden, wenn der Inhalt der
lokalen Variable #PARM1 nicht leer ist:
IF #PARM1 NE ' ' TYPE '*NAT' CR
Findfile.ncp, Copyscr.ncp
Wenn die Bedingung für den Befehl IF *SCREEN
EQ wahr ist, wird die Bildschirmposition der Zeichenkette in den
folgenden lokalen Variablen zurückgegeben:
#ROW - die gültigen Werte liegen zwischen 1
und der maximalen Zeilenanzahl + 1
#COL - die gültigen Werte liegen zwischen 1
und der maximalen Zeilenlänge
| Prozedurdatei: | Ja |
| Befehlszeile: | Nein |
| Taste: | Nein |
| API: | Ja |