バージョンアップ前(Ver.6)の状態へのロールバック

バージョンアップなどの移行作業で変更したHULFTの動作環境やOS環境を、移行前の状態に戻すことをロールバックといいます。

ロールバックは、HULFTの移行作業で何らかの問題が発生した場合のみ行ってください。

 

ロールバックは、移行前にバックアップしたファイルや環境を使用して実施します。そのため、移行前の状態が正しくバックアップされていることが前提となります。

HULFTのバックアップについては、「バックアップ」を参照してください。

移行前にバックアップしたファイルを復元すると、以下のHULFTの設定も復元されます。

  • 外字テーブル

  • EBCDICユーザテーブル

  • システム動作環境設定

  • プロダクトキー、シリアル番号

  • 要求受付定義ファイル

  • JCLへ追加したXRSYSIN定義カード

  • XRHOSTまたはXRLOG2の定義

  • HULFT 暗号オプションのバージョン

なお、HULFTの移行後に、操作ログなどを新たに出力するように変更している場合は、操作ログファイルの削除や退避を手動で行ってください。

 

ここでは、HULFT Ver.6からHULFT Ver.8へのバージョンアップを行った後で、HULFT移行前(HULFT Ver.6)の状態に戻す手順について説明します。

(1) HULFTのシステムファイルのロールバック

移行前にバックアップした以下のHULFT Ver.6のシステムファイルをロールバックします。

  • HULFT JCLライブラリ(PO)

  • HULFT ロードモジュールライブラリ(PO)

  • HULFT PFDパネルライブラリ(PO)

  • HULFT PFDメッセージライブラリ(PO)

  • HULFTパラメータライブラリ(PO)

  • 集配信管理ファイル(VSAM)

  • 詳細ホスト情報ファイル(VSAM)

  • 集配信履歴ファイル(VSAM)

 

なお、HULFT Ver.6.3以降では、集配信履歴ファイルの編成を以下の2種類から選択できます。

  • クラスタ編成(REUSE属性)

  • 代替インデックス編成

Ver.6.3.0以降のHULFTへのロールバックでは、ロールバック後の集配信履歴ファイルをどちらの編成にするかを選択できます。

Ver.6.0.0からVer.6.3.0未満のHULFTへのロールバックでは、代替インデックス編成しか選べません。

以下に、集配信履歴のファイル編成の種類ごとにロールバック用のJCLの例を示しますので、お客様の運用にあわせてJCLの内容を修正し、ロールバックを実行してください。

クラスタ編成(REUSE属性)の集配信履歴ファイルを使用して戻す場合

[ロールバックJCL例]

//ROLLBACK JOB  CLASS=A,MSGCLASS=B
//*------< LIBRARY RESTORATION >-----------------------
//JOBCAT   DD   DSN=USERCAT,DISP=SHR
//*
//DELETE   EXEC PGM=KQCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     DELETE HULFT.JCL NONVSAM
     DELETE HULFT.LOAD NONVSAM
     DELETE HULFT.PANEL NONVSAM
     DELETE HULFT.MSG NONVSAM
     DELETE HULFT.PARMLIB NONVSAM
//*
//JCL      EXEC PGM=JSECOPY
//IN       DD   DSN=HULFT.JCL.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.JCL,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(1,1,100))
//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=JSECOPY
//IN       DD   DSN=HULFT.LOAD.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.LOAD,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(35,1,100))
//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=JSECOPY
//IN       DD   DSN=HULFT.PANEL.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.PANEL,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(3,,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=JSECOPY
//IN       DD   DSN=HULFT.MSG.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.MSG,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(3,,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
//*
//PARM     EXEC PGM=JSECOPY
//IN       DD   DSN=HULFT.PARMLIB.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.PARMLIB,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(1,,10))
//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 DEFINE CLUSTER >----------------------
//DEFCLSTR EXEC PGM=KQCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     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 1)               -
             SHAREOPTIONS(4 3)            -
             RECORDSIZE(1000 1000)        -
             CONTROLINTERVALSIZE(8192))   -
            INDEX                         -
            (NAME(HULFT.LOG.IDX)          -
             VOLUMES(HUL001)              -
             CYLINDERS(1 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 1)               -
             SHAREOPTIONS(4 3)            -
             RECORDSIZE(1000 1000)        -
             CONTROLINTERVALSIZE(8192))   -
            INDEX                         -
            (NAME(HULFT.LOG.PATH1.IDX)    -
             VOLUMES(HUL001)              -
             CYLINDERS(1 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 1)               -
             SHAREOPTIONS(4 3)            -
             RECORDSIZE(1000 1000)        -
             CONTROLINTERVALSIZE(8192))   -
            INDEX                         -
            (NAME(HULFT.LOG.PATH2.IDX)    -
             VOLUMES(HUL001)              -
             CYLINDERS(1 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 1)               -
             RECORDSIZE(500 22100))       -
            INDEX                         -
            (NAME(HULFT.FILE.IDX)         -
             VOLUMES(HUL001)              -
             CYLINDERS(1 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 1)               -
             RECORDSIZE(334 400))         -
            INDEX                         -
            (NAME(HULFT.HOST.IDX)         -
             VOLUMES(HUL001)              -
             CYLINDERS(1 1)               -
             SHAREOPTIONS(4 3))           -
             CATALOG(USERCAT)
      DEFINE CLUSTER                      -
             (NAME(HULFT.QUEUE)           -
              INDEXED)                    -
             DATA                         -
             (NAME(HULFT.QUEUE.DATA)      -
              KEYS(59 0)                  -
              VOLUMES(HUL001)             -
              CYLINDERS(1 1)              -
              SHAREOPTIONS(4 3)           -
              RECORDSIZE(1000 1000)       -
              CONTROLINTERVALSIZE(8192))  -
             INDEX                        -
             (NAME(HULFT.QUEUE.IDX)       -
              VOLUMES(HUL001)             -
              CYLINDERS(1 1)              -
              SHAREOPTIONS(4 3))          -
              CATALOG(USERCAT)
//*
//*------< VSAM REPRO >-------------------------------
//LOG      EXEC PGM=KQCAMS
//U01      DD   DSN=HULFT.LOG.BKUP,DISP=OLD
//U11      DD   DSN=HULFT.LOG,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//LOG1SORT EXEC PGM=SORT
//SORTIN   DD   DSN=HULFT.LOG.BKUP,DISP=OLD
//SORTOUT  DD   DSN=&&LOG1,DISP=(,PASS),UNIT=SYSDA,
//              SPACE=(CYL,(45,15),RLSE)
//SORTWK01 DD   UNIT=SYSDA,SPACE=(CYL,(10,5))
//SORTWK02 DD   UNIT=SYSDA,SPACE=(CYL,(10,5))
//SYSOUT   DD   SYSOUT=*
//SYSIN    DD   *
      SORT FIELDS=(22,59,CH,A),EQUALS
//*
//LOG1     EXEC PGM=KQCAMS
//U01      DD   DSN=&&LOG1,DISP=OLD
//U11      DD   DSN=HULFT.LOG.PATH1,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//LOG2SORT EXEC PGM=SORT
//SORTIN   DD   DSN=HULFT.LOG.BKUP,DISP=OLD
//SORTOUT  DD   DSN=&&LOG2,DISP=(,PASS),UNIT=SYSDA,
//              SPACE=(CYL,(45,15),RLSE)
//SORTWK01 DD   UNIT=SYSDA,SPACE=(CYL,(10,5))
//SORTWK02 DD   UNIT=SYSDA,SPACE=(CYL,(10,5))
//SYSOUT   DD   SYSOUT=*
//SYSIN    DD   *
      SORT FIELDS=(81,9,CH,A),EQUALS
//*
//LOG2     EXEC PGM=KQCAMS
//U01      DD   DSN=&&LOG2,DISP=OLD
//U11      DD   DSN=HULFT.LOG.PATH2,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//FILE     EXEC PGM=KQCAMS
//U01      DD   DSN=HULFT.FILE.BKUP,DISP=OLD
//U11      DD   DSN=HULFT.FILE,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//HOST     EXEC PGM=KQCAMS
//U01      DD   DSN=HULFT.HOST.BKUP,DISP=OLD
//U11      DD   DSN=HULFT.HOST,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//

DD名

項目名

説明

JOBCAT

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

ボリューム名

CYLINDERS

(*1)

容量

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

SYSDA

UNIT

VOL=SER

HUL001

ボリューム名

*1

:

(一次要求量 増分量)

注意
  • ロールバック用のJCLの内容(ライブラリ名、DD名、容量など)は、ご利用の環境にあわせて修正してください。容量の設定値は、移行前の環境をインストールしたときと同じ容量を設定することを推奨します。

  • HULFT.LOG.PATH1は、HULFT.LOG.BKUPのホスト名をキーにしてソートしたものを復元してください。

  • HULFT.LOG.PATH2は、HULFT.LOG.BKUPの日付をキーにしてソートしたものを復元してください。

代替インデックス編成の集配信履歴ファイルに戻す場合

[ロールバックJCL例]

//ROLLBACK JOB CLASS=A,MSGCLASS=B
//*------< LIBRARY RESTORATION >-----------------------
//JOBCAT   DD   DSN=USERCAT,DISP=SHR
//*
//DELETE   EXEC PGM=KQCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     DELETE HULFT.JCL NONVSAM
     DELETE HULFT.LOAD NONVSAM
     DELETE HULFT.PANEL NONVSAM
     DELETE HULFT.MSG NONVSAM
     DELETE HULFT.PARMLIB NONVSAM
//*
//JCL      EXEC PGM=JSECOPY
//IN       DD   DSN=HULFT.JCL.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.JCL,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(1,1,100))
//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=JSECOPY
//IN       DD   DSN=HULFT.LOAD.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.LOAD,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(35,1,100))
//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=JSECOPY
//IN       DD   DSN=HULFT.PANEL.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.PANEL,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(3,,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=JSECOPY
//IN       DD   DSN=HULFT.MSG.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.MSG,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(3,,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
//*
//PARM     EXEC PGM=JSECOPY
//IN       DD   DSN=HULFT.PARMLIB.BKUP,DISP=SHR
//OUT      DD   DSN=HULFT.PARMLIB,DISP=(NEW,CATLG),
//              UNIT=SYSDA,VOL=SER=HUL001,
//              SPACE=(CYL,(1,1,10))
//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 DEFINE CLUSTER >-----------------------
//DEFCLSTR EXEC PGM=KQCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     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 1)               -
             RECORDSIZE(500 22100))       -
            INDEX                         -
            (NAME(HULFT.FILE.IDX)         -
             VOLUMES(HUL001)              -
             CYLINDERS(1 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 1)               -
             RECORDSIZE(334 400))         -
            INDEX                         -
            (NAME(HULFT.HOST.IDX)         -
             VOLUMES(HUL001)              -
             CYLINDERS(1 1)               -
             SHAREOPTIONS(4 3))           -
             CATALOG(USERCAT)
      DEFINE CLUSTER                      -
             (NAME(HULFT.QUEUE)           -
              INDEXED)                    -
             DATA                         -
             (NAME(HULFT.QUEUE.DATA)      -
              KEYS(59 0)                  -
              VOLUMES(HUL001)             -
              CYLINDERS(1 1)              -
              SHAREOPTIONS(4 3)           -
              RECORDSIZE(1000 1000)       -
              CONTROLINTERVALSIZE(8192))  -
             INDEX                        -
             (NAME(HULFT.QUEUE.IDX)       -
              VOLUMES(HUL001)             -
              CYLINDERS(1 1)              -
              SHAREOPTIONS(4 3))          -
              CATALOG(USERCAT)
//*
//*------< VSAM REPRO >-------------------------------
//FILE     EXEC PGM=KQCAMS
//U01      DD   DSN=HULFT.FILE.BKUP,DISP=OLD
//U11      DD   DSN=HULFT.FILE,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//HOST     EXEC PGM=KQCAMS
//U01      DD   DSN=HULFT.HOST.BKUP,DISP=OLD
//U11      DD   DSN=HULFT.HOST,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//*------< LOG RESTORATION >-----------------------
//DEFCLSTR EXEC PGM=KQCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     DELETE HULFT.LOG
     DEFINE CLUSTER                       -
            (NAME(HULFT.LOG)              -
             INDEXED)                     -
            DATA                          -
            (NAME(HULFT.LOG.DATA)         -
             KEYS(17 0)                   -
             VOLUMES(HUL001)              -
             CYLINDERS(5 1)               -
             SHAREOPTIONS(4 3)            -
             RECORDSIZE(1000 1000)        -
             CONTROLINTERVALSIZE(8192))   -
            INDEX                         -
            (NAME(HULFT.LOG.IDX)          -
             VOLUMES(HUL001)              -
             CYLINDERS(1 1)               -
             SHAREOPTIONS(4 3))           -
             CATALOG(USERCAT)
//*
//LOGREST  EXEC PGM=KQCAMS
//IN       DD   DSN=HULFT.LOG.BKUP,DISP=OLD
//OUT      DD   DSN=HULFT.LOG,DISP=OLD
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     REPRO INFILE(IN) OUTFILE(OUT)
//*
//LOGALT   EXEC PGM=KQCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
     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 1))            -
              INDEX                       -
              (NAME(HULFT.LOG.PATH1.IDX)  -
               CYLINDERS(5 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 1))             -
             INDEX                        -
             (NAME(HULFT.LOG.PATH2.IDX)   -
              CYLINDERS(5 1))             -
              CATALOG(USERCAT)
     DEFINE PATH                          -
             (NAME(HULFT.LOG.PATH2)       -
              PATHENTRY(HULFT.LOG.PATH2   -
              UPDATE)                     -
              CATALOG(USERCAT)
//*
//LOGBLI   EXEC PGM=KQCAMS
//U10      DD   DSN=HULFT.LOG,DISP=OLD
//U11      DD   DSN=HULFT.LOG.PATH1,DISP=OLD
//U12      DD   DSN=HULFT.LOG.PATH2,DISP=OLD
//IDCUT1   DD   VOL=SER=HUL001,UNIT=SYSDA,DISP=OLD,
//              AMP=AMORG
//IDCUT2   DD   VOL=SER=HUL001,UNIT=SYSDA,DISP=OLD,
//              AMP=AMORG
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
 BLDINDEX INFILE(U10)                     -
   OUTFILE(U11)
 BLDINDEX INFILE(U10)                     -
   OUTFILE(U12)

DD名

項目名

説明

JOBCAT

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キーファイル(バックアップファイル)

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

ボリューム名

CYLINDERS

(*1)

容量

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

SYSDA

UNIT

VOL=SER

HUL001

ボリューム名

*1

:

(一次要求量 増分量)

注意

ロールバック用のJCLの内容(ライブラリ名、DD名、容量など)は、ご利用の環境にあわせて修正してください。容量の設定値は、移行前の環境をインストールしたときと同じ容量を設定することを推奨します。

(2) OS環境のロールバック

以下のOS環境の設定を変更している場合は、バックアップしたデータまたは控えた情報をもとに、お客様ご自身でバージョンアップ前の状態に戻してください。

  • 認定ライブラリの登録

  • TISP環境設定

  • HULFT管理画面を起動するためのプロシジャの変更

  • インターナルリーダのJES コマンド実行権限の設定

  • RACFへのユーザIDおよびパスワードの登録