TCP/IP を使用して、EGL 生成の Java™ コードまたは EGL デバッガーから、リモートの z/OS® システム上の VSAM ファイルにアクセスできます。 一般にバッチ・ジョブを介してファイルにアクセスする場合は、VSAM Connector Server を使用して操作を制御します。
リモート VSAM サポートに合わせて z/OS とRational® Business Developer をセットアップするには、z/OS システムに EGLVsamCon VSAM ハンドラー・モジュールをインストールして構成する必要があります。 EGLVsamCon は、一連の Java プログラムが含まれているアーカイブ・ファイルです。これらのプログラムにより VSAM アクセス要求が処理され、その結果が返されます。以下の手順では、Java ランタイム環境バージョン 1.5 以上が既にインストールされ、構成されていることを前提としています。VSAM Connector Server 用に Java をインストールするときには、特別な構成を適用する必要はありません。
installDir¥eclipse¥plugins¥com.ibm.etools.egl.vsam_version¥EGLVsamCon.jar
ftp hostname
bin
cd /u/auser/EGLVSAMCon
put EGLVsamCon.jar
installDir¥eclipse¥plugins¥com.ibm.etools.egl.vsam_version¥
binaries¥noncics¥libEGLConSrvrUtility.so
ftp hostname
bin
cd /u/auser/EGLVSAMCon
put libEGLConSrvrUtility.so
//EGLVSAMC JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),NOTIFY=&SYSUID
//PROCLIB JCLLIB ORDER=SYS1.PROCLIB
//* 実行する操作
//* 1. インストールされている Java に合わせて JCL を調整する。
//* 2. EGLVsamCon_HOME を確認する。
//* 3. ポートを構成する EGLSRV ステップへの 1 番目の引数を確認する。
//* 4. ログを使用可能にするために、EGLSRV ステップに 2 番目の引数として TRACE を追加する。
//EGLSRV EXEC PROC=JVMPRC50,VERSION='50',
// JAVACLS='com.ibm.etools.egl.vsam.host.zos.EGLConSrvr',
// ARGS='5553'
//STDENV DD *
export EGLVsamCon_HOME=/u/auser/EGLVSAMCon
export JAVA_HOME=/usr/lpp/java/J5.0
export PATH=/bin:"${JAVA_HOME}"/bin:"${EGLVsamCon_HOME}"
LIBPATH=/lib:/usr/lib:"${JAVA_HOME}"/bin
LIBPATH="$LIBPATH":"${JAVA_HOME}"/bin/classic
LIBPATH="$LIBPATH":"${EGLVsamCon_HOME}"
export LIBPATH="$LIBPATH":
CLASSPATH="${JAVA_HOME}/lib/tools.jar"
CLASSPATH="$CLASSPATH":"${EGLVsamCon_HOME}/EGLVsamCon.jar"
export CLASSPATH="$CLASSPATH":
# Configure JVM options
IJO="-Xms64m -Xmx128m"
groupname='id -gn'
export IBM_JAVA_OPTIONS="$IJO "
export JAVA_DUMP_HEAP=false
export JAVA_PROPAGATE=NO
export IBM_JAVA_ZOS_TDUMP=NO
//
// ARGS='5553 TRACE'
サーバーを始動するには、以下のようにします。
extattr +p libEGLConSrvrUtility.so
サーバーが始動しない場合は、ログ・ファイルにエラー・メッセージが出力されます。それ以外の場合は、サーバーが指定ポートでの listen を開始し、要求からの結果を返します。
/p EGLVSAMC
SysLib.setRemoteUser("auserid", "apassword");
ZOS:¥¥install_dns_or_ip:port¥dataset
ZOS:¥¥ZOSMVS01:5553¥//INFO.ORDERS
ZOS:¥¥ZOSMVS01:5553¥//'CUST.INFO.ORDERS'
//ORDERS DD DSN=CUST.INFO.ORDERS,DISP=SHR
ZOS:¥¥ZOSMVS01:5553¥//DD:ORDERS