INPUT-Syntax 1 — Dynamisch generierter Eingabeschirm

Mit der Option WINDOW='window-name' bewirken Sie, dass das INPUT-Statement für das angegebene Fenster (Window) ausgeführt werden soll. Das angegebene Fenster muss in einem DEFINE WINDOW-Statement definiert sein; siehe Beispiel 2 — INPUT-Statement mit DEFINE WINDOW-Statement weiter unten.

Das angegebene Fenster ist nur für die Dauer des betreffenden INPUT-Statements aktiv und wird nach Ausführung des INPUT-Statements automatisch deaktiviert.

Siehe auch die Statements DEFINE WINDOW und SET WINDOW.

NO ERASE bewirkt, dass die vom INPUT-Statement ausgegebene Schirmanzeige eine bereits vorhandene Anzeige überlagern kann, ohne letztere zu löschen.

Schirm bezieht sich in diesem Zusammenhang auf die logische Ausgabe und nicht auf den physischen Bildschirm.

Alle ungeschützten Felder auf dem alten Schirm werden geschützt, so dass keine Eingaben mehr in sie gemacht werden können. Die alten Daten bleiben auf dem Schirm, bis der neue Schirm angezeigt wird. Überlagert ein Feld des neuen Schirms teilweise ein altes, so werden das Zeichen vor dem neuen Feld und das nächste Zeichen im alten Feld durch ein Leerzeichen ersetzt.

Unmittelbar nach dem Schlüsselwort INPUT oder nach einem der auszugebenden Felder können Sie in Klammern einen oder mehrere Session-Parameter setzen.

Eine Liste der mit dem INPUT-Statement anzugebenden Parameter finden Sie im Abschnitt Statement-Parameter weiter unten.

Diese Parameter haben dann für das jeweilige Statement oder Feld Gültigkeit statt der betreffenden mit einem GLOBALS-Kommando, SET GLOBALS- oder FORMAT-Statement gesetzten Parameter. Werden mehrere Parameter angegeben, müssen sie jeweils durch ein oder mehrere Leerzeichen voneinander getrennt werden. Die Angabe eines Parameters darf sich nicht über zwei Sourcecode-Zeilen erstrecken.

Die hier gültigen Parameter-Einstellungen kommen nur für Variablen-Felder in Betracht, haben aber keine Auswirkungen auf Text-Konstanten. Wenn Sie Feldattribute für eine Text-Konstante setzen möchten, dann müssen Sie explizit für dieses Element gesetzt werden.

Beispiel:

DEFINE DATA LOCAL
1 VARI (A4)     INIT <'1234'>                  /*     Output 
END-DEFINE                                     /*    Produced
*                                              /*    ---------
INPUT           'Text'           VARI          /*    Text 1234
INPUT (AD=U)    'Text'           VARI          /*    Text 1234
INPUT           'Text' (AD=U)    VARI (AD=U)   /*    Text 1234
INPUT           'Text' (AD=U)    VARI          /*    Text 1234
END

Beispiele für den Einsatz von Parametern auf Statement- und Element-Ebene finden Sie auf den folgenden Seiten.

Siehe Abschnitt Feldpositionierung, Text, Attributzuweisung weiter unten.

Als operand1 geben Sie eine Natural-Fehlernummer an. Natural liest dann die entsprechende Fehlermeldung von der Natural- Fehlermeldungsdatei.

Es können entweder benutzerdefinierte Meldungen oder Natural-Systemmeldungen gelesen werden.

• Wenn Sie einen positiven Wert von bis zu vier Ziffern (zum Beispiel: 0954) angeben, werden benutzerdefinierte Meldungen gelesen.

• Wenn Sie einen negativen Wert von bis zu vier Ziffern (zum Beispiel −0954) angeben, werden Natural-Systemmeldungen gelesen.

Siehe auch REINPUT-Statement, Beispiel 4 − WITH TEXT-Optionen.

Natural-Fehlermeldungsdateien werden mit der SYSERR-Utility erstellt und gepflegt.

Die Natural-Fehlermeldungen sind in der Messages and Codes-Dokumentation enthalten.

Als operand2 geben Sie den Text an, der in der Meldungszeile ausgegeben werden soll.

Siehe REINPUT-Statement, Beispiel 4 − WITH TEXT-Optionen.

Als attributes können Sie operand1 oder operand2 bestimmte Anzeige- und Farbattribute zuordnen.

Diese Attribute und die benutzbare Syntax sind im Abschnitt Ausgabeattribute weiter unten beschrieben.

operand3 kann in Form einer numerischen Konstanten oder Textkonstanten oder als Name einer Variablen angegeben werden.

Der entweder mit operand1 oder operand2 angegebene Wert dient dazu, einen Teil der Meldung zu ersetzen und dynamisch zu generieren.

Innerhalb der Fehlermeldung dient die Notation :n: zur Referenzierung von operand3, wobei n die Ausprägung (1 − 7) von operand3 darstellt.

Siehe REINPUT-Statement, Beispiel 4 - WITH TEXT-Optionen.

Anmerkungen:

1. Wird operand3 mehrmals angegeben, müssen diese Operanden mit einem Komma voneinander getrennt werden. Falls das Komma als Dezimalzeichen verwendet wird (wie mit dem Session-Parameter DC definiert) und es sich bei operand3 um numerische Konstanten handelt, setzen Sie Leerzeichen vor und nach dem Komma, damit es nicht als Dezimalkomma missinterpretiert wird.
2. Alternativ können mehrere Ausprägungen von operand3 auch mit dem Input-Delimiterzeichen (wie mit dem Session-Parameter ID definiert) voneinander getrennt werden; dies geht jedoch nicht bei ID=/ (Schrägstrich), da der Schrägstrich in der Syntax des INPUT-Statements eine andere Bedeutung hat.
3. Nicht signifikante Nullen oder Leerzeichen werden aus dem Feldwert entfernt, bevor er in einer Meldung angezeigt wird.

operand1 gibt die Nummer des Feldes an, in dem der Cursor platziert werden soll:

Jedem in einem INPUT-Statement angegebenen Feldattribut AD=A oder AD=M (d.h. ein ungeschütztes Feld) wird eine Feldreferenz- Nummer zugewiesen. Der Startwert ist 1.

Anstelle der Feldnummer können Sie den Feldnamen angeben, um den Cursor in ein bestimmtes Feld zu platzieren. Dazu verwenden Sie die Notation *fieldname.

Mit MARK POSITION können Sie den Cursor an eine bestimmte Stelle — die Sie mit operand4 angeben — innerhalb des mit operand1 oder *fieldname angegebenen Feldes platzieren.

operand4 darf keine Dezimalstellen enthalten.

Fügt zwischen den Feldern n Leerstellen ein.

Setzt einen Tabulator, d.h. die Ausgabe eines Feldes beginnt ab Spalte n.

Gibt das nachfolgende Element in Zeile x ab Spalte y aus. y darf nicht 0 sein. Rückwärtspositionierung in derselben Zeile ist nicht möglich.

In Apostrophen angegebener Text wird schreibgeschützt ausgegeben. Siehe auch den Abschnitt Text-Notation, Unterabschnitt Mit einem Statement zu benutzenden Text definieren.

Wie 'text'. Aber das Zeichen c (character) wird n-mal ausgegeben. n darf 1 − 132 sein. Siehe auch den Abschnitt Text-Notation, Unterabschnitt Vor einem Feldwert n mal anzuzeigendes Zeichen definieren..

Dient zum Setzen der Anzeigeattribute. Siehe Attribute weiter unten.

Die Notation '-' unmittelbar vor einem Feld bewirkt, dass die Anzeige des Feldnamens vor dem Feld unterdrückt wird.

Anmerkung:
Eine Textkette vor einem Feld ersetzt den Feldnamen als Eingabeaufforderungstext.

Die Notation '=' unmittelbar vor einem Feld bewirkt, dass unmittelbar vor dem Feldwert die Feldüberschrift ausgegeben wird.

Ein Schrägstrich '/' zwischen zwei Feldern oder Textelementen bewirkt einen Zeilenvorschub, d.h. das nachfolgende Element wird in der nächsten Zeile ausgegeben.

Felder können als reine Eingabefelder (Session-Parameter AD=A), reine Ausgabefelder (AD=O) oder als modifizierbare Ausgabefelder (AD=M) definiert werden. Standardmäßig gilt AD=A. Felder, die mit AD=A oder AD=M definiert sind, werden als ungeschützte Felder ausgegeben, d.h. der Benutzer hat die Möglichkeit, Daten in diese Felder einzugeben.

Bei TTY-Geräten beansprucht die Ausgabe modifizierbarer Felder die doppelte Feldgröße (einmal für Ausgabe und einmal für Eingabe), damit ein neuer Wert eingegeben werden kann. Bei TTY-Bildschirmen beginnt ein Eingabefeld (AD=A oder AD=M), dessen Wert bei der Eingabe nicht angezeigt wird (Feldattribut N), immer in einer neuen Zeile.

Beispiel:

INPUT #A (AD=A) #B (AD=O) #C (AD=M)

#A ist ein Eingabefeld (ungeschützt), in das ein Wert eingegeben werden kann.

#B ist ein Ausgabefeld (schreibgeschützt), dessen angezeigter Wert nicht überschrieben werden kann.

#C ist ein Feld, dessen ausgegebener Wert verändert werden kann, indem er durch einen neuen Wert überschrieben wird.

Entspricht den Feldattributen, die mit dem Session-Parameter AD gesetzt werden können: AD=A, AD=O bzw. AD=M.

Anmerkung:
Wenn eine nicht änderbare Systemvariable in einem INPUT-Statement benutzt wird, wird der Wert als ein reines Ausgabefeld AD=O oder *OUT-Attribut anzeigt.

Als operand1 geben Sie das zu verwendende Feld an. Sie können Datenbankfelder oder Benutzervariablen angeben.

Natural überträgt den Inhalt eines Feldes direkt vom Datenbereich an das INPUT-Statement; eine MOVE-Operation ist hierzu nicht erforderlich.

Ändert sich der Wert eines Datenbankfeldes aufgrund einer INPUT-Verarbeitung, so betrifft dies nur den Feldwert im Datenbereich. Um den Wert eines Feldes auf der Datenbank zu ändern, sind entsprechende UPDATE- bzw. STORE-Statements erforderlich.

Wird in einem INPUT-Statement der Name einer Gruppe von Datenbankfeldern referenziert, so werden alle in der Gruppe enthaltenen Felder einzeln als Eingabefelder verwendet.

Wird ein Bereich von Ausprägungen eines Arrays referenziert, so wird jede Ausprägung einzeln als Eingabefeld verarbeitet; allerdings wird nur der ersten Ausprägung ein Text oder der Feldname vorangestellt.

Auf Großrechnern können keine Arrays mit Bereichen angegeben werden, die es ermöglichen, zur Ausführungszeit die Anzahl der Ausprägungen zu variieren.

Unmittelbar nach operand1 können Sie in Klammern einen oder mehrere Parameter angeben (siehe Tabelle Statement-Parameter und folgendes Beispiel).

Diese Parameter haben dann für das jeweilige Feld Gültigkeit statt der betreffenden mit einem GLOBALS-Kommando, SET GLOBALS- (im Reporting Mode) oder FORMAT-Statement gesetzten Parameter. Werden mehrere Parameter angegeben, müssen sie jeweils durch ein oder mehrere Leerzeichen voneinander getrennt werden. Die Angabe eines Parameters darf sich nicht über zwei Sourcecode-Zeilen erstrecken.

Die hier gültigen Parameter-Einstellungen kommen nur für Variablenfelder in Betracht, haben aber keine Auswirkung auf Textkonstanten. Wenn Sie Feldattribute für eine Textkonstante setzen möchten, müssen Sie explizit für dieses Element gesetzt werden.

Informationen zu den einzelnen Parametern entnehmen Sie der Tabelle im Abschnitt Statement-Parameter.

Anmerkung:
Ist für ein Datenbankfeld eine Editiermaske definiert, so wird der Editiermasken-Parameter EM dynamisch im entsprechenden DDM referenziert. Editiermasken können für Eingabe- wie für Ausgabefelder angegeben werden. Wird für ein Eingabefeld eine Editiermaske definiert, müssen die Daten in Einklang mit der Editiermasken-Definition eingegeben werden.