バージョン 6.3.3
 —  ステートメント  —

RESIZE

RESIZE

dynamic-clause

[GIVING operand5]
array-clause

このドキュメントでは、次のトピックについて説明します。

構文図で使用されている記号については、「構文記号」を参照してください。

関連ステートメント:EXPAND | REDUCE

関連機能グループ:「ダイナミック変数または X-array のメモリ管理制御


機能

RESIZE ステートメントは、次を調整するために使用します。

詳細については、『プログラミングガイド』の次のセクションを参照してください。

ダイナミック変数の使用
ダイナミック変数のメモリスペースの割り当て/解放
X-array
X-Group 配列のストレージ管理

Top of page

構文説明

オペランド定義テーブル:

オペランド 構文要素 フォーマット ステートメント参照 ダイナミック定義
operand1   S A     A U         B             不可 不可
operand2 C S               I                 不可 不可
operand3     A G   A   N P I F B D T L C G O 不可
operand4 C S           N P I                 不可 不可
operand5   S               I4                 不可

構文要素の説明:

dynamic-clause RESIZE DYNAMIC ステートメントは、ダイナミック変数(operand1)の現在割り当てられているストレージについて、割り当てられている長さを、operand2 で指定した値に調整します。 詳細については、後述の「Dynamic 節」を参照してください。
operand1 operand1 は、長さが調整されるダイナミック変数です。
operand2 operand2 は、ダイナミック変数の新しい長さを指定するために使用します。 値として、負ではない整数の定数または Integer4(I4)タイプの変数を指定する必要があります。
array-clause RESIZE ARRAY ステートメントは、X-array(operand3)のオカレンス数を、(dim[,dim[,dim]]) で指定した上下限に調整します。 詳細については、以下の「Array 節」を参照してください。
operand3 operand3 は X-array です。 X-array のオカレンスを拡張または削減できます。 配列のインデックス表記はオプションです。 各次元でインデックス表記として使用できるのは、全範囲を示す表記 "*" のみです。
dim

operand4

X-array 拡張の上下限表記(operand4 またはアスタリスク)は、ここで指定します。 現在の上下限の値を使用する必要がある場合は、operand4 の代わりにアスタリスク(*)を指定する必要があります。 詳細については、後述の「次元」を参照してください。
GIVING operand5

GIVING 節を指定しない場合は、エラー発生時に Natural ランタイムエラー処理がトリガされます。

GIVING 節を指定した場合は、operand5 に、エラー発生時は Natural メッセージ番号、成功時はゼロが含まれます。

Dynamic 節

[SIZE OFDYNAMIC [VARIABLE] operand1 TO operand2

RESIZE DYNAMIC ステートメントは、ダイナミック変数(operand1)の割り当てられている長さを、operand2 で指定した値に調整します。

RESIZE ステートメントを使用した場合、現在割り当てられているストレージサイズが、増減のどちらが必要であるかに関係なく、要求された値に調整されます。

Array 節

[AND RESET] [OCCURRENCES OF] ARRAY operand3 TO (dim[,dim[,dim]])

RESIZE ARRAY ステートメントは、X-arrayoperand3)のオカレンス数を、(dim[,dim[,dim]]) で指定した上下限に調整します。

RESET オプションは、サイズ変更した X-array のすべてのオカレンスをデフォルトのゼロ値にリセットします。 デフォルト(RESET オプションなし)では、実際の値は保持され、サイズ変更した(新しい)オカレンスがリセットされます。

RESIZE ステートメントで使用される上限または下限は、配列に定義された対応する上限または下限と正確に同じである必要があります。

例:

DEFINE DATA LOCAL
1 #a(I4/1:*)
1 #g(1:*)
  2 #ga(I4/1:*)

1 #i(i4)
END-DEFINE
...

*/ resizing #a (1:10)
RESIZE ARRAY #a TO (1:10)       /* #a is resized to
RESIZE ARRAY #a TO (*:10)       /* 10 occurrences.


/* resizing #ga (1:10,1:20)
RESIZE ARRAY #g TO (1:10)       /* 1st dimension is set to (1:10)
RESIZE ARRAY #ga TO (*:*,1:20)  /* 1st dimension is dependent and 
                                /* therefore kept with (*:*)
                                /* 2nd dimension is set to (1:20)
 
RESIZE ARRAY #a TO (5:10)       /* This is rejected because the lower index
                                /* must be 1 or *
RESIZE ARRAY #a TO (#i:10)      /* This is rejected because the lower index
                                /* must be 1 or *

RESIZE ARRAY #ga TO (1:10,1:20) /* (1:10) for the 1st dimension is rejected
                                /* because the dimension is dependent and 
                                /* must be specified with (*:*).

詳細については、次を参照してください。

次元

operand4

:

operand4

* *

X-array 拡張の上下限表記(operand4 またはアスタリスク)は、ここで指定します。 現在の上下限の値を使用する必要がある場合は、operand4 の代わりにアスタリスク(*)を指定できます。 "*.*" の代わりに単一のアスタリスクを指定できます。

次元数(dim)は、X-array(1、2、または 3)と正確に一致している必要があります。

指定した次元のオカレンス数が、現在割り当てられているオカレンス数より小さい場合は、対応する次元のオカレンス数は変更されません。

Top of page