HULFT導入用ファイルの復元

JSGMOVEプログラムを使用して、「提供媒体からMainframeへのファイル転送」で提供媒体から転送した提供ファイル(固定長形式)をHULFT導入用ファイルに復元します。

(1) HULFT導入用ファイルを復元するJCLの作成と実行

提供媒体には、HULFT導入ライブラリ復元の雛形JCL(HULFT8.INST.JCL.MSP.TXT)が格納されています。

以下のJCL例を参照して、提供ファイル(固定長形式)をHULFT導入用ファイルに復元するJCLを作成してください。HULFT導入ライブラリ復元の雛形JCLをもとにJCLを作成する場合は、ユーザの環境に関するパラメータを修正してください。ユーザの環境に関するパラメータは、データセット名、ボリューム通番、カタログ簿などのパラメータです。

 

作成したJCLを実行すると、提供ファイル(固定長形式)がHULFT導入用ファイルに復元されます。

[JCL例]

//CDINST   JOB CLASS=A,MSGCLASS=B                                               
//JOBCAT   DD  DSN=USERCAT,DISP=SHR                                             
//*-------------------------------------------------------------------          
//* HULFT8 INSTALL                                                              
//* HULFT LIBRARY RESTORE                                                       
//*                                                                             
//*-------------------------------------------------------------------          
//JCLINST  EXEC PGM=JSGMOVE                                                     
//SYSPRINT DD  SYSOUT=*                                                         
//SYSUT1   DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001,SPACE=(CYL,(20,10))           
//IN       DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//OUT      DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//SYSIN    DD  *                                                                
      COPY DSNAME=HULFT.V8INST.JCL,                                    -        
      TO=SYSDA=HUL001,FROM=SYSDA=HUL001,RENAME=HULFT.V8.JCL,CATLG               
//*                                                                             
//LOADINST EXEC PGM=JSGMOVE                                                     
//SYSPRINT DD  SYSOUT=*                                                         
//SYSUT1   DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001,SPACE=(CYL,(20,10))           
//IN       DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//OUT      DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//SYSIN    DD  *                                                                
      COPY DSNAME=HULFT.V8INST.LOAD,                                   -        
      TO=SYSDA=HUL001,FROM=SYSDA=HUL001,RENAME=HULFT.V8.LOAD,CATLG              
//*                                                                             
//PNLINST  EXEC PGM=JSGMOVE                                                     
//SYSPRINT DD  SYSOUT=*                                                         
//SYSUT1   DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001,SPACE=(CYL,(20,10))           
//IN       DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//OUT      DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//SYSIN    DD  *                                                                
      COPY DSNAME=HULFT.V8INST.JPN.PANEL,                              -        
      TO=SYSDA=HUL001,FROM=SYSDA=HUL001,RENAME=HULFT.V8.JPN.PANEL,CATLG         
//*                                                                             
//MSGINST  EXEC PGM=JSGMOVE                                                     
//SYSPRINT DD  SYSOUT=*                                                         
//SYSUT1   DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001,SPACE=(CYL,(20,10))           
//IN       DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//OUT      DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//SYSIN    DD  *                                                                
      COPY DSNAME=HULFT.V8INST.JPN.MSG,                                -        
      TO=SYSDA=HUL001,FROM=SYSDA=HUL001,RENAME=HULFT.V8.JPN.MSG,CATLG           
//*                                                                             
//PARMINST EXEC PGM=JSGMOVE                                                     
//SYSPRINT DD  SYSOUT=*                                                         
//SYSUT1   DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001,SPACE=(CYL,(20,10))           
//IN       DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//OUT      DD  DISP=OLD,UNIT=SYSDA,VOL=SER=HUL001                               
//SYSIN    DD  *                                                                
      COPY DSNAME=HULFT.V8INST.PARMLIB,                                -        
      TO=SYSDA=HUL001,FROM=SYSDA=HUL001,RENAME=HULFT.V8.PARMLIB,CATLG           
//                                                                              

DD名

項目名

説明

JOBCAT

USERCAT

カタログ簿データセット名

パラメータ名

項目名

説明

UNIT

SYSDA

UNIT

VOR=SER

HUL001

ボリューム名

DSNAME

HULFT.V8INST.JCL

HULFT JCLライブラリ(提供ファイル)

RENAME

HULFT.V8.JCL

HULFT JCLライブラリ(HULFT導入用ファイル)

DSNAME

HULFT.V8INST.LOAD

HULFTロードモジュールライブラリ(提供ファイル)

RENAME

HULFT.V8.LOAD

HULFTロードモジュールライブラリ(HULFT導入用ファイル)

DSNAME

HULFT.V8INST.JPN.PANEL

HULFT PFDパネルライブラリ(提供ファイル)

RENAME

HULFT.V8.JPN.PANEL

HULFT PFDパネルライブラリ(HULFT導入用ファイル)

DSNAME

HULFT.V8INST.JPN.MSG

HULFT PFDメッセージライブラリ(提供ファイル)

RENAME

HULFT.V8.JPN.MSG

HULFT PFDメッセージライブラリ(HULFT導入用ファイル)

DSNAME

HULFT.V8INST.PARMLIB

HULFTパラメータライブラリ(提供ファイル)

RENAME

HULFT.V8.PARMLIB

HULFTパラメータライブラリ(HULFT導入用ファイル)

(2) 復元されたHULFT導入用ファイルの確認

HULFT導入用ファイルが正常に復元されていることを確認します。

OSのPFDなどの機能を使用してライブラリの内容を参照してください。復元したライブラリがすべて区分編成ファイルとして復元されていれば完了です。

メンバを参照できないなどの不具合がある場合は、本章の手順を最初からやり直してください。