バージョンアップ前(Ver.7)の状態へのロールバック
バージョンアップなどの移行作業で変更したHULFTの動作環境やOS環境を、移行前の状態に戻すことをロールバックといいます。
ロールバックは、HULFTの移行作業で何らかの問題が発生した場合のみ行ってください。
ロールバックは、移行前にバックアップしたファイルや環境を使用して実施します。そのため、移行前の状態が正しくバックアップされていることが前提となります。
HULFTのバックアップについては、「バックアップ」を参照してください。
移行前にバックアップしたファイルを復元すると、以下のHULFTの設定も復元されます。
-
外字テーブル
-
EBCDICユーザテーブル
-
システム動作環境設定
-
プロダクトキー、シリアル番号
-
要求受付定義ファイル
-
JCLへ追加したXRSYSIN定義カード
-
XRHOSTまたはXRLOG2の定義
-
HULFT 暗号オプションのバージョン
なお、HULFTの移行後に、操作ログなどを新たに出力するように変更している場合は、操作ログファイルの削除や退避を手動で行ってください。
ここでは、HULFT Ver.7からHULFT Ver.8へのバージョンアップを行った後で、HULFT移行前(HULFT Ver.7)の状態に戻す手順について説明します。
(1) HULFTのシステムファイルのロールバック
移行前にバックアップした以下のHULFT Ver.7のシステムファイルをロールバックします。
-
HULFT JCLライブラリ(PO)
-
HULFT ロードモジュールライブラリ(PO)
-
HULFT PFDパネルライブラリ(PO)
-
HULFT PFDメッセージライブラリ(PO)
-
HULFTパラメータライブラリ(PO)
-
集配信管理ファイル(VSAM)
-
詳細ホスト情報ファイル(VSAM)
-
集配信履歴ファイル(VSAM)
なお、HULFT Ver.7では、集配信履歴ファイルの編成を以下の2種類から選択できます。
-
クラスタ編成(REUSE属性)
-
代替インデックス編成
Ver.7へのロールバックでは、ロールバック後の集配信履歴ファイルをどちらの編成にするかを選択できます。
以下に、集配信履歴のファイル編成の種類ごとにロールバック用のJCLの例を示しますので、お客様の運用にあわせてJCLの内容を修正し、ロールバックを実行してください。
クラスタ編成(REUSE属性)の集配信履歴ファイルを使用して戻す場合
[ロールバックJCL例]
\ JOB ROLLBACK,LIST=(A,JS)
\*------< LIBRARY RESTORATION >----------------------------------*
\DSDEL EX FDLT
\ FD STEPCAT=DA,FILE=USERCAT
\ FD LIST=DA,VOL=WORK,TRK=(10,2),SOUT=A
\ FD COIN=*
/ FDLT HULFT.JCL
/ FDLT HULFT.PANEL
/ FDLT HULFT.MSG
/ FDLT HULFT.PARMLIB
/ FIN
\LOADDEL EX LIBE,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD LIST=DA,VOL=WORK,TRK=(10,2),SOUT=A
\ FD IN1=DA,FILE=HULFT.LOAD
\*----CONTROL CARD-----*
\ FD COIN=*
/ SCRATCH +,INOUT=IN1
/ FIN
\COPY EX LIBE,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD LIST=DA,VOL=WORK,TRK=(10,2),SOUT=A
\*---JCL---*
\ FD IN1=DA,FILE=HULFT.JCL.BKUP
\ FD OUT1=DA,FILE=HULFT.JCL,VOL=HUL001,CYL=(1,1), C
DRTY=(100,BLK),DISP=CAT,FCB=(DSORG=PO)
\*---LOAD---*
\ FD IN2=DA,FILE=HULFT.LOAD.BKUP
\ FD OUT2=DA,FILE=HULFT.LOAD,VOL=HUL001,CYL=(35,1), C
DRTY=(100,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----PANEL--*
\ FD IN3=DA,FILE=HULFT.PANEL.BKUP
\ FD OUT3=DA,FILE=HULFT.PANEL,VOL=HUL001,CYL=(3,1), C
DRTY=(50,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----MSG----*
\ FD IN4=DA,FILE=HULFT.MSG.BKUP
\ FD OUT4=DA,FILE=HULFT.MSG,VOL=HUL001,CYL=(3,1), C
DRTY=(50,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----PARMLIB---*
\ FD IN5=DA,FILE=HULFT.PARMLIB.BKUP
\ FD OUT5=DA,FILE=HULFT.PARMLIB,VOL=HUL001,CYL=(1,1), C
DRTY=(50,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----CONTROL CARD-----*
\ FD COIN=*
/ COPY +,IN=IN1,OUT=OUT1
/ COPY +,IN=IN2,OUT=OUT2
/ COPY +,IN=IN3,OUT=OUT3
/ COPY +,IN=IN4,OUT=OUT4
/ COPY +,IN=IN5,OUT=OUT5
/ FIN
\*------< VSAM DEFINE CLUSTER >--------------------------------------*
\DEFCLSTR EX KQCAMS
\ FD STEPCAT=DA,FILE=USERCAT
\ FD SYSPRINT=DA,TRK=(10,10),VOL=WORK,SOUT=A
\ FD SYSIN=*
DELETE HULFT.LOG
DELETE HULFT.LOG.PATH1
DELETE HULFT.LOG.PATH2
DELETE HULFT.FILE
DELETE HULFT.HOST
DELETE HULFT.QUEUE
DELETE HULFT.SYSCNTL
DEFINE CLUSTER -
(NAME(HULFT.LOG) -
INDEXED -
REUSE) -
DATA -
(NAME(HULFT.LOG.DATA) -
KEYS(17 0) -
VOLUMES(HUL001) -
CYLINDERS(5) -
SHAREOPTIONS(4 3) -
RECORDSIZE(1000 1000) -
CONTROLINTERVALSIZE(8192)) -
INDEX -
(NAME(HULFT.LOG.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.LOG.PATH1) -
INDEXED -
REUSE) -
DATA -
(NAME(HULFT.LOG.PATH1.DATA) -
KEYS(59 17) -
VOLUMES(HUL001) -
CYLINDERS(5) -
SHAREOPTIONS(4 3) -
RECORDSIZE(1000 1000) -
CONTROLINTERVALSIZE(8192)) -
INDEX -
(NAME(HULFT.LOG.PATH1.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.LOG.PATH2) -
INDEXED -
REUSE) -
DATA -
(NAME(HULFT.LOG.PATH2.DATA) -
KEYS(9 76) -
VOLUMES(HUL001) -
CYLINDERS(5) -
SHAREOPTIONS(4 3) -
RECORDSIZE(1000 1000) -
CONTROLINTERVALSIZE(8192)) -
INDEX -
(NAME(HULFT.LOG.PATH2.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.FILE) -
INDEXED) -
DATA -
(NAME(HULFT.FILE.DATA) -
KEYS(12 0) -
SHAREOPTIONS(4 3) -
VOLUMES(HUL001) -
CYLINDERS(1) -
RECORDSIZE(500 22100)) -
INDEX -
(NAME(HULFT.FILE.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.HOST) -
INDEXED) -
DATA -
(NAME(HULFT.HOST.DATA) -
KEYS(51 0) -
SHAREOPTIONS(4 3) -
VOLUMES(HUL001) -
CYLINDERS(1) -
RECORDSIZE(334 400)) -
INDEX -
(NAME(HULFT.HOST.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.QUEUE) -
INDEXED) -
DATA -
(NAME(HULFT.QUEUE.DATA) -
KEYS(59 0) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3) -
RECORDSIZE(2000 2000) -
CONTROLINTERVALSIZE(18432)) -
INDEX -
(NAME(HULFT.QUEUE.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
\*-------< VSAM REPRO >-----------------------------------------------*
\*---FILE---*
\FILE EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\U01 FD U01=DA,FILE=HULFT.FILE.BKUP
\U11 FD U11=DA,FILE=HULFT.FILE
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(U01) OUTFILE(U11)
\*---HOST---*
\HOST EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\U01 FD U01=DA,FILE=HULFT.HOST.BKUP
\U11 FD U11=DA,FILE=HULFT.HOST
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(U01) OUTFILE(U11)
\*---LOG---*
\LOG EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\U01 FD U01=DA,FILE=HULFT.LOG.BKUP
\U11 FD U11=DA,FILE=HULFT.LOG
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(U01) OUTFILE(U11)
\*
\LOG1SORT EX SORT,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD SORTIN=DA,VOL=HUL001,FILE=HULFT.LOG.BKUP
\ FD SORTOUT=DA,VOL=HUL001, C
CYL=(1,1),DISP=CONT
\ FD SORTWK01=DA,VOL=WORK,CYL=(10,5)
\ FD SORTWK02=DA,VOL=WORK,CYL=(10,5)
\ FD COIN=*
SORT FIELDS=(22,59,CH,A),EQUALS
\*
\LOG1 EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT1
\ FD U11=DA,FILE=HULFT.LOG.PATH1,AMP=AMORG
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(SORTOUT) OUTFILE(U11)
\*
\LOG2SORT EX SORT,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD SORTIN=DA,VOL=HUL001,FILE=HULFT.LOG.BKUP
\ FD SORTOUT=DA,VOL=HUL001, C
CYL=(1,1),DISP=CONT
\ FD SORTWK01=DA,VOL=WORK,CYL=(10,5)
\ FD SORTWK02=DA,VOL=WORK,CYL=(10,5)
\ FD COIN=*
SORT FIELDS=(81,9,CH,A),EQUALS
\*
\LOG2 EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD U11=DA,FILE=HULFT.LOG.PATH2,AMP=AMORG
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(SORTOUT) OUTFILE(U11)
\ JEND
|
FD名 |
項目名 |
説明 |
|---|---|---|
|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
|
IN |
HULFT.JCL.BKUP |
HULFT JCLライブラリ(バックアップファイル) |
|
OUT |
HULFT.JCL |
HULFT JCLライブラリ |
|
IN |
HULFT.LOAD.BKUP |
HULFTロードモジュールライブラリ(バックアップファイル) |
|
OUT |
HULFT.LOAD |
HULFTロードモジュールライブラリ |
|
IN |
HULFT.PANEL.BKUP |
HULFT PFDパネルライブラリ(バックアップファイル) |
|
OUT |
HULFT.PANEL |
HULFT PFDパネルライブラリ |
|
IN |
HULFT.MSG.BKUP |
HULFT PFDメッセージライブラリ(バックアップファイル) |
|
OUT |
HULFT.MSG |
HULFT PFDメッセージライブラリ |
|
IN |
HULFT.PARMLIB.BKUP |
HULFTパラメータライブラリ(バックアップファイル) |
|
OUT |
HULFT.PARMLIB |
HULFTパラメータライブラリ |
|
U01 |
HULFT.LOG.BKUP |
集配信履歴ファイルIDキーファイル(バックアップファイル) |
|
U11 |
HULFT.LOG |
集配信履歴ファイル |
|
U11 |
HULFT.LOG.PATH1 |
集配信履歴ファイルホスト名キーファイル |
|
U11 |
HULFT.LOG.PATH2 |
集配信履歴ファイル日付キーファイル |
|
U01 |
HULFT.FILE.BKUP |
集配信管理ファイル(バックアップファイル) |
|
U11 |
HULFT.FILE |
集配信管理ファイル |
|
U01 |
HULFT.HOST.BKUP |
詳細ホスト情報ファイル(バックアップファイル) |
|
U11 |
HULFT.HOST |
詳細ホスト情報ファイル |
|
パラメータ名 |
項目名 |
説明 |
|---|---|---|
|
VOLUMES |
HUL001 |
ボリューム名 |
|
NAME |
HULFT.FILE |
集配信管理ファイル |
|
NAME |
HULFT.FILE.DATA |
集配信管理ファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.FILE.IDX |
集配信管理ファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.HOST |
詳細ホスト情報ファイル |
|
NAME |
HULFT.HOST.DATA |
詳細ホスト情報ファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.HOST.IDX |
詳細ホスト情報ファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.QUEUE |
配信制御ファイル |
|
NAME |
HULFT.QUEUE.DATA |
配信制御ファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.QUEUE.IDX |
配信制御ファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG |
集配信履歴ファイルIDキーファイル |
|
NAME |
HULFT.LOG.DATA |
集配信履歴ファイルIDキーファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.IDX |
集配信履歴ファイルIDキーファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH1 |
集配信履歴ホスト名キーファイル |
|
NAME |
HULFT.LOG.PATH1.DATA |
集配信履歴ホスト名キーファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH1.IDX |
集配信履歴ホスト名キーファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH2 |
集配信履歴日付キーファイル |
|
NAME |
HULFT.LOG.PATH2.DATA |
集配信履歴日付キーファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH2.IDX |
集配信履歴日付キーファイルインデックス・コンポーネントエントリ名 |
|
UNIT |
DA |
UNIT |
|
VOL |
HUL001 |
ボリューム名 |
-
ロールバック用のJCLの内容(ライブラリ名、FD名、容量など)は、ご利用の環境にあわせて修正してください。容量の設定値は、移行前の環境をインストールしたときと同じ容量を設定することを推奨します。
-
HULFT.LOG.PATH1は、HULFT.LOG.BKUPのホスト名をキーにしてソートしたものを復元してください。
-
HULFT.LOG.PATH2は、HULFT.LOG.BKUPの日付をキーにしてソートしたものを復元してください。
代替インデックス編成の集配信履歴ファイルに戻す場合
[ロールバックJCL例]
\ JOB ROLLBACK,LIST=(A,JS)
\*------< LIBRARY RESTORATION >----------------------------------*
\DSDEL EX FDLT
\ FD STEPCAT=DA,FILE=USERCAT
\ FD LIST=DA,VOL=WORK,TRK=(10,2),SOUT=A
\ FD COIN=*
/ FDLT HULFT.JCL
/ FDLT HULFT.PANEL
/ FDLT HULFT.MSG
/ FDLT HULFT.PARMLIB
/ FIN
\LOADDEL EX LIBE,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD LIST=DA,VOL=WORK,TRK=(10,2),SOUT=A
\ FD IN1=DA,FILE=HULFT.LOAD
\*----CONTROL CARD-----*
\ FD COIN=*
/ SCRATCH +,INOUT=IN1
/ FIN
\COPY EX LIBE,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\ FD LIST=DA,VOL=WORK,TRK=(10,2),SOUT=A
\*---JCL---*
\ FD IN1=DA,FILE=HULFT.JCL.BKUP
\ FD OUT1=DA,FILE=HULFT.JCL,VOL=HUL001,CYL=(1,1), C
DRTY=(100,BLK),DISP=CAT,FCB=(DSORG=PO)
\*---LOAD---*
\ FD IN2=DA,FILE=HULFT.LOAD.BKUP
\ FD OUT2=DA,FILE=HULFT.LOAD,VOL=HUL001,CYL=(35,1), C
DRTY=(100,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----PANEL--*
\ FD IN3=DA,FILE=HULFT.PANEL.BKUP
\ FD OUT3=DA,FILE=HULFT.PANEL,VOL=HUL001,CYL=(3,1), C
DRTY=(50,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----MSG----*
\ FD IN4=DA,FILE=HULFT.MSG.BKUP
\ FD OUT4=DA,FILE=HULFT.MSG,VOL=HUL001,CYL=(3,1), C
DRTY=(50,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----PARMLIB---*
\ FD IN5=DA,FILE=HULFT.PARMLIB.BKUP
\ FD OUT5=DA,FILE=HULFT.PARMLIB,VOL=HUL001,CYL=(1,1), C
DRTY=(50,BLK),DISP=CAT,FCB=(DSORG=PO)
\*----CONTROL CARD-----*
\ FD COIN=*
/ COPY +,IN=IN1,OUT=OUT1
/ COPY +,IN=IN2,OUT=OUT2
/ COPY +,IN=IN3,OUT=OUT3
/ COPY +,IN=IN4,OUT=OUT4
/ COPY +,IN=IN5,OUT=OUT5
/ FIN
\*------< VSAM DEFINE CLUSTER >--------------------------------------*
\DEFCLSTR EX KQCAMS
\ FD STEPCAT=DA,FILE=USERCAT
\ FD SYSPRINT=DA,TRK=(10,10),VOL=WORK,SOUT=A
\ FD SYSIN=*
DELETE HULFT.FILE
DELETE HULFT.HOST
DELETE HULFT.QUEUE
DELETE HULFT.SYSCNTL
DEFINE CLUSTER -
(NAME(HULFT.FILE) -
INDEXED) -
DATA -
(NAME(HULFT.FILE.DATA) -
KEYS(12 0) -
SHAREOPTIONS(4 3) -
VOLUMES(HUL001) -
CYLINDERS(1) -
RECORDSIZE(500 22100)) -
INDEX -
(NAME(HULFT.FILE.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.HOST) -
INDEXED) -
DATA -
(NAME(HULFT.HOST.DATA) -
KEYS(51 0) -
SHAREOPTIONS(4 3) -
VOLUMES(HUL001) -
CYLINDERS(1) -
RECORDSIZE(334 400)) -
INDEX -
(NAME(HULFT.HOST.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
DEFINE CLUSTER -
(NAME(HULFT.QUEUE) -
INDEXED) -
DATA -
(NAME(HULFT.QUEUE.DATA) -
KEYS(59 0) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3) -
RECORDSIZE(2000 2000) -
CONTROLINTERVALSIZE(8192)) -
INDEX -
(NAME(HULFT.QUEUE.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
\*-------< VSAM REPRO >-----------------------------------------------*
\*---FILE---*
\FILE EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\U01 FD U01=DA,FILE=HULFT.FILE.BKUP
\U11 FD U11=DA,FILE=HULFT.FILE
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(U01) OUTFILE(U11)
\*---HOST---*
\HOST EX KQCAMS,RSIZE=4096K
\ FD STEPCAT=DA,FILE=USERCAT
\U01 FD U01=DA,FILE=HULFT.HOST.BKUP
\U11 FD U11=DA,FILE=HULFT.HOST
\SYSPRINT FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\SYSIN FD SYSIN=*
REPRO INFILE(U01) OUTFILE(U11)
\*------< LOG RESTORATION >-----------------------
\DEFCLSTR EX KQCAMS
\ FD STEPCAT=DA,FILE=USERCAT
\ FD SYSPRINT=DA,TRK=(10,10),VOL=WORK,SOUT=A
\ FD SYSIN=*
DELETE HULFT.LOG
DEFINE CLUSTER -
(NAME(HULFT.LOG) -
INDEXED -
REUSE) -
DATA -
(NAME(HULFT.LOG.DATA) -
KEYS(17 0) -
VOLUMES(HUL001) -
CYLINDERS(5) -
SHAREOPTIONS(4 3) -
RECORDSIZE(1000 1000) -
CONTROLINTERVALSIZE(8192)) -
INDEX -
(NAME(HULFT.LOG.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1) -
SHAREOPTIONS(4 3)) -
CATALOG(USERCAT)
\LOGREST EX KQCAMS
\ FD STEPCAT=DA,FILE=USERCAT
\ FD IN=DA,FILE=HULFT.LOG.BKUP, C
VOL=HUL001
\ FD OUT=DA,FILE=HULFT.LOG,AMP=AMORG
\ FD SYSPRINT=DA,TRK=(10,10),VOL=WORK,SOUT=A
\ FD SYSIN=*
REPRO INFILE(IN) OUTFILE(OUT)
\LOGALT EX KQCAMS
\ FD STEPCAT=DA,FILE=USERCAT
\ FD SYSPRINT=DA,TRK=(10,10),VOL=WORK,SOUT=A
\ FD SYSIN=*
DELETE HULFT.LOG.PATH1
DEFINE ALTERNATEINDEX -
(NAME(HULFT.LOG.PATH1) -
IMBED -
UNIQUEKEY -
UPGRADE -
KEYS(59 17) -
RECSZ(100 100) -
VOL(HUL001) -
SHR(4 3) -
RELATE(HULFT.LOG)) -
DATA -
(NAME(HULFT.LOG.PATH1.DATA) -
CYLINDERS(5)) -
INDEX -
(NAME(HULFT.LOG.PATH1.IDX) -
CYLINDERS(1)) -
CATALOG(USERCAT)
DEFINE PATH -
(NAME(HULFT.LOG.PATH1) -
PATHENTRY(HULFT.LOG.PATH1) -
UPDATE) -
CATALOG(USERCAT)
DELETE (HULFT.LOG.PATH2)
DEFINE ALTERNATEINDEX -
(NAME(HULFT.LOG.PATH2) -
IMBED -
UNIQUEKEY -
UPGRADE -
KEYS(9 76) -
RECSZ(40 40) -
VOL(HUL001) -
SHR(4 3) -
RELATE(HULFT.LOG)) -
DATA -
(NAME(HULFT.LOG.PATH2.DATA) -
CYLINDERS(5)) -
INDEX -
(NAME(HULFT.LOG.PATH2.IDX) -
CYLINDERS(1)) -
CATALOG(USERCAT)
DEFINE PATH -
(NAME(HULFT.LOG.PATH2) -
PATHENTRY(HULFT.LOG.PATH2) -
UPDATE) -
CATALOG(USERCAT)
\LOGBLI EX KQCAMS
\ FD STEPCAT=DA,FILE=USERCAT
\ FD U10=DA,FILE=HULFT.LOG
\ FD U11=DA,FILE=HULFT.LOG.PATH1
\ FD U12=DA,FILE=HULFT.LOG.PATH2
\ FD KQCUT1=DA,AMP=AMORG,VOL=HUL001
\ FD KQCUT2=DA,AMP=AMORG,VOL=HUL001
\ FD SYSPRINT=DA,VOL=WORK,TRK=(10,10),SOUT=A
\ FD SYSIN=*
BLDINDEX INFILE(U10) OUTFILE(U11)
BLDINDEX INFILE(U10) OUTFILE(U12)
\ JEND
|
FD名 |
項目名 |
説明 |
|---|---|---|
|
STEPCAT |
USERCAT |
カタログ簿データセット名 |
|
IN |
HULFT.JCL.BKUP |
HULFT JCLライブラリ(バックアップファイル) |
|
OUT |
HULFT.JCL |
HULFT JCLライブラリ |
|
IN |
HULFT.LOAD.BKUP |
HULFTロードモジュールライブラリ(バックアップファイル) |
|
OUT |
HULFT.LOAD |
HULFTロードモジュールライブラリ |
|
IN |
HULFT.PANEL.BKUP |
HULFT PFDパネルライブラリ(バックアップファイル) |
|
OUT |
HULFT.PANEL |
HULFT PFDパネルライブラリ |
|
IN |
HULFT.MSG.BKUP |
HULFT PFDメッセージライブラリ(バックアップファイル) |
|
OUT |
HULFT.MSG |
HULFT PFDメッセージライブラリ |
|
IN |
HULFT.PARMLIB.BKUP |
HULFTパラメータライブラリ(バックアップファイル) |
|
OUT |
HULFT.PARMLIB |
HULFTパラメータライブラリ |
|
IN |
HULFT.LOG.BKUP |
集配信履歴ファイルIDキーファイル(バックアップファイル) |
|
OUT |
HULFT.LOG |
集配信履歴ファイル |
|
U10 |
HULFT.LOG |
集配信履歴ファイル |
|
U11 |
HULFT.LOG.PATH1 |
集配信履歴ファイルホスト名キーファイル |
|
U12 |
HULFT.LOG.PATH2 |
集配信履歴ファイル日付キーファイル |
|
U01 |
HULFT.FILE.BKUP |
集配信管理ファイル(バックアップファイル) |
|
U11 |
HULFT.FILE |
集配信管理ファイル |
|
U01 |
HULFT.HOST.BKUP |
詳細ホスト情報ファイル(バックアップファイル) |
|
U11 |
HULFT.HOST |
詳細ホスト情報ファイル |
|
パラメータ名 |
項目名 |
説明 |
|---|---|---|
|
VOLUMES |
HUL001 |
ボリューム名 |
|
NAME |
HULFT.FILE |
集配信管理ファイル |
|
NAME |
HULFT.FILE.DATA |
集配信管理ファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.FILE.IDX |
集配信管理ファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.HOST |
詳細ホスト情報ファイル |
|
NAME |
HULFT.HOST.DATA |
詳細ホスト情報ファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.HOST.IDX |
詳細ホスト情報ファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.QUEUE |
配信制御ファイル |
|
NAME |
HULFT.QUEUE.DATA |
配信制御ファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.QUEUE.IDX |
配信制御ファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG |
集配信履歴ファイルIDキーファイル |
|
NAME |
HULFT.LOG.DATA |
集配信履歴ファイルIDキーファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.IDX |
集配信履歴ファイルIDキーファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH1 |
集配信履歴ホスト名キーファイル |
|
NAME |
HULFT.LOG.PATH1.DATA |
集配信履歴ホスト名キーファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH1.IDX |
集配信履歴ホスト名キーファイルインデックス・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH2 |
集配信履歴日付キーファイル |
|
NAME |
HULFT.LOG.PATH2.DATA |
集配信履歴日付キーファイルデータ・コンポーネントエントリ名 |
|
NAME |
HULFT.LOG.PATH2.IDX |
集配信履歴日付キーファイルインデックス・コンポーネントエントリ名 |
|
UNIT |
DA |
UNIT |
|
VOL |
HUL001 |
ボリューム名 |
ロールバック用のJCLの内容(ライブラリ名、FD名、容量など)は、ご利用の環境にあわせて修正してください。容量の設定値は、移行前の環境をインストールしたときと同じ容量を設定することを推奨します。
(2) OS環境のロールバック
以下のOS環境の設定を変更している場合は、バックアップしたデータまたは控えた情報をもとに、お客様ご自身でバージョンアップ前の状態に戻してください。
-
認定ライブラリの登録
-
TISP環境設定
-
HULFT管理画面を起動するためのプロシジャの変更
-
機密保護機能(RACF)へのユーザIDおよびパスワードの登録