TCP/IP を使用して、EGL 生成の Java™ コードまたは EGL デバッガーから、リモートの z/OS® または z/VSE® システム上の VSAM ファイルにアクセスできます。通常、CICS® トランザクションを介してファイルにアクセスする場合は、CICS を使用して操作を制御します。
リモート VSAM サポートに合わせて z/OS、z/VSE、CICS、および Rational® Business Developer をセットアップするには、ホスト・システムに ELAVSHN VSAM ハンドラー・モジュールをインストールして構成する必要があります。以下の手順では、CICS Transaction Gateway が既にインストールされ、ターゲット CICS 領域に合わせて構成されていることを前提としています。CTG は、EGL 生成の Java コードまたは EGL デバッガーから TCP/IP を介してアクセスできるプラットフォームにインストールできます。CTG について詳しくは、CICS の資料を参照してください。
最新バージョンの Rational COBOL Runtime for zSeries をインストールしている場合は、ELAVSHN モジュールは既にインストールされています。『VSAM ハンドラーの検証』に進んでください。
installDir¥eclipse¥plugins¥com.ibm.etools.egl.vsam_version¥binaries¥
cics¥EGL.VSAM.LOAD.TRS
このデータ・セットには、ELAVSHN を含む EGL.VSAM.LOAD という名前の圧縮区分データ・セットが含まれています。
ftp hostname
quote site lrecl=1024
quote site blocksize=6144
quote site recfm=fb
bin
put EGL.VSAM.LOAD.TRS //EGL.VSAM.LOAD.TRS
//VSHNMAKE JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*
UNZIP PROC DSN=
//*
//*--------
//UNPACK EXEC PGM=TRSMAIN,PARM=UNPACK
//SYSPRINT DD SYSOUT=*
//INFILE DD DISP=SHR,
// DSN=&DSN..TRS
//OUTFILE DD DISP=(NEW,CATLG),SPACE=(CYL,(2,2,20),RLSE),
// DSN=&DSN
// PEND
//*--------
//*
//UNTERSE EXEC UNZIP,DSN=EGL.VSAM.LOAD
サンプル・フォルダーに、この JCL のコピーが EGL.VSAM.LOAD.TRS として含まれています。 この JCL の名前は EGL.VSAM.LOAD.JCL(VSHNMAKE) です。
CEDA DEF PROGRAM (TEST) LANGUAGE (COBOL)
CEDA DEF TRAN (ELAV) PROGRAM (ELAVSHN)
これにより、CICS のセットアップが完了します。
EGL REMOTE VSAM ACCESS. BUILD DATE yyyymmdd
このメッセージが表示されない場合は、このトピックの手順を再度確認してください。
| 属性 | 値 |
|---|---|
| LSrpoolid | None |
| STRings | 010 以降 |
| 追加 | Yes |
| BRowse | Yes |
| DELete | Yes |
| 読み取り | Yes |
| Update | Yes |
構成ステップは、以下のようになります。
SysLib.setRemoteUser("auserid", "apassword");
CTG:¥¥install_dns_or_ip:port¥cics_region¥dataset
CTG:¥¥ANETNAME:2006¥ACICSREG¥AVSAMFIL
CTG:¥¥ZOSMVS01:2006¥CICS01¥ORDERS
CTG:¥¥192.168.123.12:2006¥CICS01¥ORDERS