RECORDの機能

RECORD機能は、データがCOBOL言語とC言語間で転送される場合に特に役立ちます。このような場合、RECORDバッファ・タイプはC言語で使用し、コピーブックはCOBOL言語で使用できます。

ソースRECORDファイルは、1つまたは複数のソースRECORD記述を含む一般的なテキスト・ファイルで、しばしば既存のCOBOLコピーブック・ファイルが使用されます。ソースRECORDファイルは、RECORD記述ファイルを生成する、cpy2recordへの入力として使用されます。

次の表に、cpy2recordでサポートされるCOBOLコピーブック・ファイル内の句をリストします。

表3-1 cpy2recordでサポートされるCOBOLコピーブック・ファイル内の句
サポートされる句	説明
`OCCURS`	`OCCURS`は、指標または添字指定で要素を参照可能な表を指定します。固定長の表がサポートされます。`ASCENDING KEY`および`DESCENDING KEY`句、`INDEXED BY`句および`OCCURS DEPENDING ON`句(可変長の表)はサポートされません。
`PICTURE`	`PICTURE`は、基本項目の一般的性質および編集要件を指定します。`PICTURE`でサポートされる記号は、`A`、`B`、`E`、`G`、`N`、`P`、`S`、`V`、`X`、`Z`、`9`、`0`、`/`、`,`、`.`、`+`、`-`、`*`、`C`および`D`です。
`SIGN`	`SIGN`は、適用される符号付き数値項目の演算符号の位置および表現モードを指定します。
`USAGE`	`USAGE`は、格納時のデータの表現形式を指定します。サポートされる句は、`BINARY`、`COMP`、`COMP-1`、`COMP-2`、`COMP-3`、`COMP-4`、`COMP-5`、`COMPUTATIONAL`、`COMPUTATIONAL-1`、`COMPUTATIONAL-2`、`COMPUTATIONAL-3`、`COMPUTATIONAL-4`、`COMPUTATIONAL-5`、`DISPLAY`、`DISPLAY-1`、`NATIONAL`および`PACKED-DECIMAL`です。サポートされない句は、`NATIVE`、`INDEX`、`POINTER`、`PROCEDURE-POINTER`、`FUNCTION-POINTER`および`OBJECT REFERENCE`です。

RECORD関数は、Rinit()、Rget()、Rset()およびFrneeded()です。どちらのRECORD関数をコールしても、指定されたRECORD記述ファイルが検索され、そのファイルが見つかると、RECORDファイルのキャッシュに自動的にロードされます。環境変数RECORDFILESで指定される各ファイルは、順番に検索されます。指定名を持つ最初のRECORD記述ファイルがロードされます。同じ名前を持つ以降のRECORD記述ファイルは無視されます。詳細は、『FMLを使用したOracle Tuxedo ATMIアプリケーションのプログラミング』のRECORD関数に関する項を参照してください。

RECORDの環境設定

FMLでは、次の変数を使用して、RECORDファイルにアクセスします。

RECORDFILES - この変数には、所定のアプリケーション・プログラム用のRECORD記述ファイルをカンマで区切ってリストします。フル・パス名で指定したファイルは、そのまま使用されます。相対パス名で指定したファイルは、RECORDDIR変数で指定したディレクトリのリストから検索されます。RECORDFILESが設定されていない場合、単一のファイル名record.Rが使用されます(RECORDDIRが依然として適用されます。次を参照)。
RECORDDIR - この変数には、相対ファイル名を指定したRECORDファイルを検索するために使用する、コロンで区切ったディレクトリのリストを指定します。使用法はPATH環境変数と同様です。RECORDDIRを設定しない場合またはNULLの場合、カレント・ディレクトリの値が使用されます。