RESET [INITIAL ]
operand1
|
Dieses Dokument behandelt folgende Themen:
Eine Erläuterung der in dem Syntax-Diagramm verwendeten Symbole entnehmen Sie dem Abschnitt Syntax-Symbole.
Verwandte Statements: ADD
| COMPRESS
|
COMPUTE
|
DIVIDE
|
EXAMINE
|
MOVE
|
MOVE ALL
|
MULTIPLY
|
SEPARATE
|
SUBTRACT
Gehört zur Funktionsgruppe: Arithmetische Funktionen und Datenzuweisungen
Das RESET
-Statement wird benutzt, um den Wert eines Feldes
zurückzusetzen.
Mit dem Statement RESET
(ohne INITIAL
)
können Sie in Abhängigkeit von seinem Format den Inhalt jedes angegebenen
Feldes auf seinen Standard-Ausgangswert
zurücksetzen.
Mit RESET
INITIAL
können Sie jedes Feld auf einen im
DEFINE
DATA
-Statement definierten Ausgangswert zurücksetzen.
Bei einem ohne INIT
-Klausel im
DEFINE
DATA
-Statement deklarierten Feld hat RESET
INITIAL
die gleiche Auswirkung wie RESET
(ohne
INITIAL
).
Anmerkungen:
CONSTANT
-Klausel im DEFINE
DATA
-Statement deklariertes Feld kann in einem
RESET
-Statement nicht referenziert werden, da sein Inhalt nicht
geändert werden kann.
RESET
-Statement auch
verwendet werden, um eine Variable zu definieren, vorausgesetzt dass das
Programm kein DEFINE DATA
LOCAL
-Statement enthält.
Operanden-Definitionstabelle:
Operand | Mögliche Struktur | Mögliche Formate | Referenzierung erlaubt | Dynam. Definition | ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
operand1 | S | A | G | M | A | U | N | P | I | F | B | D | T | L | C | G | O | ja | ja |
Syntax-Element-Beschreibung:
RESET operand1 |
Zurücksetzen auf Nullwert:
Wenn operand1 eine dynamische Variable
ist, wird sie auf einen Nullwert zurückgesetzt, und zwar mit der Länge, die die
Variable zum Zeitpunkt der Ausführung des Allgemeine Informationen über dynamische Variablen finden Sie in dem Abschnitt Dynamische und große Variablen benutzen. |
---|---|
RESET INITIAL operand1 |
Zurücksetzen auf Ausgangswert:
Mit
|
** Example 'RSTEX1': RESET (with/without INITIAL) ************************************************************************ DEFINE DATA LOCAL 1 EMPLOY-VIEW VIEW OF EMPLOYEES 2 NAME 1 #BINARY (B4) INIT <1> 1 #INTEGER (I4) INIT <5> 1 #NUMERIC (N2) INIT <25> END-DEFINE * LIMIT 1 READ EMPLOY-VIEW /* WRITE NOTITLE 'VALUES BEFORE RESET STATEMENT:' WRITE / '=' NAME '=' #BINARY '=' #INTEGER '=' #NUMERIC /* RESET NAME #BINARY #INTEGER #NUMERIC /* WRITE /// 'VALUES AFTER RESET STATEMENT:' WRITE / '=' NAME '=' #BINARY '=' #INTEGER '=' #NUMERIC /* RESET INITIAL #BINARY #INTEGER #NUMERIC /* WRITE /// 'VALUES AFTER RESET INITIAL STATEMENT:' WRITE / '=' NAME '=' #BINARY '=' #INTEGER '=' #NUMERIC /* END-READ END
Ausgabe des Programms RSTEX1
:
VALUES BEFORE RESET STATEMENT: NAME: ADAM #BINARY: 00000001 #INTEGER: 5 #NUMERIC: 25 VALUES AFTER RESET STATEMENT: NAME: #BINARY: 00000000 #INTEGER: 0 #NUMERIC: 0 VALUES AFTER RESET INITIAL STATEMENT: NAME: #BINARY: 00000001 #INTEGER: 5 #NUMERIC: 25