HULFT導入用ファイルの復元

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

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

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

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

 

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

[JCL例]

//V8INST   JOB CLASS=A,MSGCLASS=B                                               
//*-------------------------------------------------------------------          
//* HULFT8 INSTALL                                                   
//* HULFT LIBRARY RESTORE                                                       
//*                                                                             
//*-------------------------------------------------------------------          
//JCLINST  EXEC PGM=IEHMOVE                                                     
//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=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.JCL,CATLG                                        
//*                                                                             
//LOADINST EXEC PGM=IEHMOVE                                                     
//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=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.LOAD,CATLG                                       
//*                                                                             
//PNLJINST EXEC PGM=IEHMOVE                                                     
//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=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.JPN.PANEL,CATLG                                  
//*                                                                             
//PNLEINST EXEC PGM=IEHMOVE                                                     
//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.ENG.PANEL,                              -        
               TO=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.ENG.PANEL,CATLG                                  
//*                                                                             
//MSGJINST EXEC PGM=IEHMOVE                                                     
//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=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.JPN.MSG,CATLG                                    
//*                                                                             
//MSGEINST EXEC PGM=IEHMOVE                                                     
//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.ENG.MSG,                                -        
               TO=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.ENG.MSG,CATLG                                    
//*                                                                             
//PARMINST EXEC PGM=IEHMOVE                                                     
//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=3390=HUL001,FROM=3390=HUL001,                        -        
               RENAME=HULFT.V8.PARMLIB,CATLG                                    
//                                                                              

パラメータ

項目名

説明

UNIT

SYSDA

UNIT

VOL=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 ISPFパネルライブラリ(JPN 提供ファイル)

RENAME

HULFT.V8.JPN.PANEL

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

DSNAME

HULFT.V8INST.ENG.PANEL

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

RENAME

HULFT.V8.ENG.PANEL

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

DSNAME

HULFT.V8INST.JPN.MSG

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

RENAME

HULFT.V8.JPN.MSG

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

DSNAME

HULFT.V8INST.ENG.MSG

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

RENAME

HULFT.V8.ENG.MSG

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

DSNAME

HULFT.V8INST.PARMLIB

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

RENAME

HULFT.V8.PARMLIB

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

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

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

OSのISPFなどの機能を使用してライブラリの内容を参照してください。復元したライブラリがすべて区分データ・セット(PDS)として復元されていれば完了です。

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