ARRAY POINTER

version 3

ARRAY POINTER (arrayName; size{; size2})

ARRAY POINTERコマンドは、メモリ上にポインタ要素の配列を作成またはリサイズします。

・arrayName引数は作成する配列の名前です。

・size引数は配列の要素数です。

・size2引数はオプションです。size2が渡されている場合、コマンドは2次元配列を作成します。この場合、sizeに配列の行数を、size2にはそれぞれの配列の列数を指定します。2次元配列の各行は要素および配列として扱えます。これは配列の一番目の次元を扱う時、2次元配列中の配列全体を挿入あるいは削除するために、他の配列コマンドを使用できることを意味します。

ARRAY POINTERを既存の配列に適用する場合、

・配列サイズを増やす場合、既存の値は保持され、新しい要素はヌルポインタで初期化されます。これは、これらの要素にNilを適用するとTrueが返されることを意味します。

・配列サイズを減らす場合、後ろの要素は配列から削除され、失われます。

1. この例は、100要素のポインタプロセス配列を作成します:

   ARRAY POINTER (apValues;100)

2. この例は、100行50列要素のポインタローカル配列を作成します:

   ARRAY POINTER ($apValues;100;50)

3. この例はポインタインタープロセス配列を作成し、それぞれの要素に要素番号に対応するテーブルのポインタを格納します。配列のサイズはデータベースのテーブル数と同じです。削除されたテーブルの場合、行はNilを返します。

   ARRAY POINTER (<>apValues;Get last table number)
   For ($vlElem;1;Size of array(<>apValues);1;-1)
      If(Is table number valid($vlElem))
         <>apValues{$vlElem}:=Table($vlElem)
   End for