RESET [INITIAL ] operand1
|
このドキュメントでは、次のトピックについて説明します。
構文図で使用されている記号については、「構文記号」を参照してください。
関連ステートメント:ADD | COMPRESS | COMPUTE | DIVIDE | EXAMINE | MOVE | MOVE ALL | MULTIPLY | SEPARATE | SUBTRACT
関連機能グループ:「算術演算とデータ移動操作」
RESET
ステートメントは、フィールドの値をリセットするために使用します。
RESET
(INITIAL
なし)は、指定された各フィールドの内容をフォーマットに依存したデフォルトの初期値に設定します。
RESET INITIAL
は、指定された各フィールドを DEFINE DATA
ステートメントのフィールド定義に従った初期値に設定します。 DEFINE DATA
ステートメントで INIT
節を指定せずに宣言したフィールドに対して、RESET INITIAL
は RESET
(INITIAL
なし)と同じ効果を持ちます。
注意:
DEFINE DATA
ステートメントで CONSTANT
節を指定して宣言したフィールドは、内容を変更できないので、RESET
ステートメントで参照できません。
DEFINE DATA LOCAL
ステートメントが含まれていなければ、RESET
ステートメントを使用して変数を定義することもできます。
オペランド定義テーブル:
オペランド | 構文要素 | フォーマット | ステートメント参照 | ダイナミック定義 | ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
operand1 | S | A | G | M | A | U | N | P | I | F | B | D | T | L | C | G | O | 可 | 可 |
構文要素の説明:
RESET operand1 |
空値にリセット:
operand1 がダイナミック変数の場合、 ダイナミック変数に関する全般的な情報については、「ラージ変数/フィールドとダイナミック変数/フィールド」を参照してください。 |
---|---|
RESET INITIALoperand1 |
初期値にリセット:
|
** 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
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