顧客の詳細を含む VSAM ファイルがあり、顧客番号はフィールドの 1 つです。CICS では、ユーザーは顧客番号を入力する必要があります。顧客番号が VSAM ファイルに存在する場合にのみ、次のマップが送信されます。
VSAM ファイルから顧客番号を検証するにはどうすればよいですか?
CUSTOMER NO は数字のように聞こえますが、数字であることを確認する必要があります。
CICS に存在するかどうかを確認するには、CICS READ コマンドを使用できます。Cics Read を参照してください。すなわち
Exec CICS
Read File(..)
INTO(data-area) RIDFLD(data-area)
blah blah blah ...
end exec.
ここで、RIDFLD はレコード キーです。
あなたが働いている既存のプログラムを見つけて(あなたは学生ではないと仮定しています)、それを例として使用することをお勧めします。最近では、メインフレーム上でゼロからプログラムを作成することはほとんどありません。ほとんどの場合、コピーを見ることができる既存の例があります。
また、あなたが試したことを私たちに見せてください!!!