HULFT
Ver5.x.x へのリビジョンアップ手順(IBM版)
1. リビジョンアップ作業手順の概要図 作業開始 HULFT の停止 現行HULFT のバックアップ 項番2を参照 (注)必ずバックアップして下さい 最新HULFT モジュールの入れ換え 項番3を参照 外字出口ルーチンを使用? バックアップから外字モジュールを戻す 無 項番3を参照 有 EBCDIC ユーザ定義テーブルを使用? 定義テーブルを再作成する 項番6を参照 無 有 シリアル番号の再登録 項番4を参照 ZAP適用の有無 各種ZAPの適用 項番5を参照 無 有 HULFTの起動 HULFTの動作テスト 作業終了 動作は正常か? バックアップから全モジュールを戻す 正常 異常 項番7を参照2. 現行稼動HULFTシステムのバックアップ。 対象ファイル ・HULFTロードモジュールライブラリ (PO) (※1) ・HULFT ISPFパネルライブラリ (PO) ・HULFT ISPFメッセージライブラリ (PO) ・HULFT APFロードモジュールライブラリ (PO) ・HULFT集配信管理ファイル (VSAM) ・HULFTホスト情報ファイル (VSAM) ・HULFT集配信履歴ファイル (VSAM) ※1 御客様にて外字変換用の外字変換出口ルーチンを作成しており、HULFTロードモジュールラ イブラリに格納している場合には、必ずバックアップするようにお願い致します。 [外字出口ルーチンモジュール] ・XRSTJEXT ・XRJTSEXT ・XRETJEXT ・XRJTEEXT ・XRITJEXT ・XRJTIEXT ・XRJTHEXT ・XRHTJEXT
[バックアップ用JCL例]
//BACKUP JOB CLASS=J,MSGCLASS=W //JOBCAT DD DSN=USERCAT,DISP=SHR //*
//LOAD EXEC PGM=IEBCOPY
//IN DD DSN=HULFT.LOAD,DISP=SHR //OUT DD DSN=HULFT.LOAD.BKUP,DISP=(NEW,CATLG),UNIT=SYSDA, // VOL=SER=WORK01,SPACE=(CYL,(5,1,50)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=IN //*
//PANEL EXEC PGM=IEBCOPY
//IN DD DSN=HULFT.PANEL,DISP=SHR //OUT DD DSN=HULFT.PANEL.BKUP,DISP=(NEW,CATLG),UNIT=SYSDA, // VOL=SER=WORK01,SPACE=(CYL,(1,1,50)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=IN //* //MSG EXEC PGM=IEBCOPY //IN DD DSN=HULFT.MSG,DISP=SHR //OUT DD DSN=HULFT.MSG.BKUP,DISP=(NEW,CATLG),UNIT=SYSDA, // VOL=SER=WORK01,SPACE=(CYL,(1,1,50)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=IN //*
//APF EXEC PGM=IEBCOPY
//IN DD DSN=HULFT.APFLOAD,DISP=SHR
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=IN //* //*---< VSAM REPRO >--- //FILE EXEC PGM=IDCAMS
//U01 DD DSN=HULFT.FILE,DISP=SHR //U11 DD DSN=HULFT.FILE.BKUP, // DISP=(NEW,CATLG),UNIT=SYSDA,VOL=SER=WORK01, // SPACE=(CYL,(5,5)), // DCB=(BLKSIZE=32000,LRECL=22104,RECFM=VB) //SYSPRINT DD SYSOUT=* //SYSIN DD *
REPRO INFILE(U01) OUTFILE(U11) //*
//HOST EXEC PGM=IDCAMS
//U01 DD DSN=HULFT.HOST,DISP=SHR //U11 DD DSN=HULFT.HOST.BKUP, // DISP=(NEW,CATLG),UNIT=SYSDA,VOL=SER=WORK01, // SPACE=(CYL,(5,5)), // DCB=(BLKSIZE=6000,LRECL=404,RECFM=VB) //SYSPRINT DD SYSOUT=* //SYSIN DD *
REPRO INFILE(U01) OUTFILE(U11) //*
//LOG EXEC PGM=IDCAMS
//U01 DD DSN=HULFT.LOG,DISP=OLD //U11 DD DSN=HULFT.LOG.BKUP, // DISP=(NEW,CATLG),UNIT=SYSDA,VOL=SER=WORK01, // SPACE=(CYL,(5,5)), // DCB=(BLKSIZE=6000,LRECL=1004,RECFM=VB) //SYSPRINT DD SYSOUT=* //SYSIN DD *
REPRO INFILE(U01) OUTFILE(U11) //
3. HULFT Ver5.X.Xモジュールの入れ替え(REP)作業。 対象ファイル ・HULFTロードモジュールライブラリ ※上記項目2の(※1)で、外字出口ルーチンモジュールをバックアップされている場合には、 HULFTロードモジュールライブラリの入れ換え作業後に、バックアップモジュール内の該 当モジュールの戻し作業(REPコピー)をお願い致します。 [外字出口ルーチンモジュール] ・XRSTJEXT ・XRJTSEXT ・XRETJEXT ・XRJTEEXT ・XRITJEXT ・XRJTIEXT ・XRJTHEXT ・XRHTJEXT ・HULFT ISPFパネルライブラリ ・HULFT ISPFメッセージライブラリ ・HULFT APFロードモジュールライブラリ ※御客様によっては当ライブラリ自体が存在しておらず、 [SYS1.LINKLIB]等のライブラリに該当4モジュールが格納されて いる場合もありますので、その場合には下記該当モジュールを入れ替えて下さい。 該当モジュール : XRDFASB XRJEND XRJOBWRK XRLOGWRK ・HULFT一時JCLライブラリ ※御客様環境によっては、HULFT導入時、モジュールに対してZAPを適用されている場合 があります。(項番5「ZAPの適用」を参照下さい。) 適用されている場合には、今回のリビジョンアップ作業で再適用をする必要があります。 再適用をする際には前回適用のZAPアドレスがずれている可能性がありますので、今回提供 している媒体内(1ラベル目に格納)のJCLライブラリをワークボリューム等のDASDに 別名でコピーし、新しいZAP用JCLアドレスにて適用して下さい。 ZAPを適用されていない場合には、当JCLライブラリを提供媒体からDASDへコピーす る必要はありません。
[提供媒体からのリビジョンアップ用JCL例(モジュールの入れ換え作業)]
//UNLOAD JOB CLASS=J,MSGCLASS=W //JOBCAT DD DSN=USERCAT,DISP=SHR //* //JCL EXEC PGM=IEBCOPY //IN DD DSN=HULFT.V50.JCL,DISP=(OLD,PASS), // UNIT=CMT,VOL=SER=HUL050,LABEL=1 //OUT DD DSN=HULFT.JCL.TEMP,DISP=(NEW,CATLG),UNIT=SYSDA, // VOL=SER=WORK01,SPACE=(CYL,(1,1,50)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=IN //*
//LOAD EXEC PGM=IEBCOPY
//IN DD DSN=HULFT.V50.LOAD,DISP=(OLD,PASS), // UNIT=CMT,VOL=SER=HUL050,LABEL=2 //OUT DD DSN=HULFT.LOAD,DISP=SHR //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=((IN,R)) //*
//PANEL EXEC PGM=IEBCOPY
//IN DD DSN=HULFT.V50.PANEL,DISP=(OLD,PASS), // UNIT=CMT,VOL=SER=HUL050,LABEL=3 //OUT DD DSN=HULFT.PANEL,DISP=SHR //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=((IN,R)) //* //MSG EXEC PGM=IEBCOPY //IN DD DSN=HULFT.V50.MSG,DISP=(OLD,PASS), // UNIT=CMT,VOL=SER=HUL050,LABEL=4
//OUT DD DSN=HULFT.MSG,DISP=SHR //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=((IN,R)) //*
//APF EXEC PGM=IEBCOPY
//IN DD DSN=HULFT.V50.APFLOAD,DISP=(OLD,PASS), // UNIT=CMT,VOL=SER=HUL050,LABEL=5 //OUT DD DSN=HULFT.APFLOAD,DISP=SHR //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(5)) //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY OUTDD=OUT,INDD=((IN,R)) //
4. シリアル番号の再登録 HULFT5の初期導入(インストール)時に、提供媒体に貼付しておりますシリアル番号(SN)を HULFTロードモジュールライブラリに対して、ZAP適用にて組み込んで頂いております。 リビジョンアップ作業であるロードモジュールライブラリの入れ換え作業にて、前回登録して頂いたシ リアル番号が無効となってしまいますので、再度登録作業を実施して頂くようにお願い致します。 シリアル番号の登録用JCL(ZAP)は、HULFT JCLライブラリ内の[SERIALNO] というメンバー名で用意されております。 リビジョンアップによるZAP提供アドレスに変更はございませんので、前回適用(登録)した際に 使用されたJCLの再実行で問題ありませんので、必ず実施して下さい。 5. ZAPの適用。(必要ユーザのみ) 標準で用意されているZAPは以下の通りです。 ◆INITZAP : 配信システム初期値の変更 (アドミニストレーション・マニュアル参照) ◆UNITZAP : DASD装置グループ名の変更 (デフォルト=‘SYSDA’) ◆JESZAP : JESコマンドキャラクタの変更 (デフォルト=‘¥’) ◆PREFZAP : 集信ワークファイルのPREFIX,SUFFIXの追加 ◆INTRZAP : インターナルリーダの取得回数・間隔時間の変更 JCLメンバー名 機 能 INITZAP 配信システム初期値の変更ZAP UNITZAP DISK UNITグループの変更ZAP JESZAP JESコマンドキャラクタの変更ZAP PREFZAP 集信ワークファイルのPREFIX変更ZAP INTRZAP インターナルリーダーの取得回数の変更ZAP 6. EBCDICユーザー定義テーブル EBCDIC ユーザー定義テーブル(1バイトコード変換用)を、旧リビジョンで使用されていた場合には、 再度作成をする必要があります。 以前に作成したユーザー定義テーブルを、提供されるサンプル JCL「USRCDZAP」内に指定し、ジョ ブを実行してください。
7. 旧リビジョンへの復旧方法について HULFT用VSAMファイルについては、非互換、項目追加等もなく、コンバージョン等の作業は 必要ありません。 従って、リビジョンアップ作業で問題が発生し、旧リビジョンに戻される場合においても、HULFT ロードモジュールライブラリ等のPOライブラリのみを復元して頂ければ、問題ありません。 - 以 上 -