VSAM ENVIRONMENT オプションを使用する場合、ファイルをオープンする前に、関連するワークステーション VSAM データ・セットが存在していなければなりません。単純なプログラムでデータ・セットを作成することができます。図 18 は、ワークステーション VSAM キー順データ・セット作成の例です。
/********************************************************************/
/* */
/* NAME - ISAM0.PLI */
/* */
/* DESCRIPTION */
/* Create an ISAM Keyed data set */
/* */
/* */
/********************************************************************/
NewVSAM: proc options(main);
declare
NewFile keyed record output file
env(organization(indexed)
recsize(80)
keylength(8)
keyloc(17)
);
open file(NewFile) title('/KEYNAMES.DAT');
close file(NewFile);
End NewVSAM;KEYNAMES.DAT という名前のデータ・セットがまだ存在していない場合、OPEN ステートメントが実行されたときに PL/I はその名前でデータ・セットを作成します。