Backup in HULFT Ver.6

Before upgrading from HULFT Ver.6, create a backup for the library that you are currently using in HULFT Ver.6. The JCL for backup is the member named 'BACKUP6' in the JCL library of HULFT. Modify the contents of the JCL, and execute the backup.

Target Files

HULFT JCL library (PO)
HULFT load module library (PO)
HULFT ISPF panel library (PO)
HULFT ISPF message library (PO)
HULFT parameter library (PO) (*1)
Send and Receive Management file (VSAM)
Host Information file (VSAM)
Send and Receive Log file (VSAM)
IP Management file (PS)
PORT management file (PS)

If you have installed HULFT Ver.6 as an upgrade from HULFT Ver.5, HULFT parameter library may not exist.

HULFT parameter library contains the various parameter files that were managed in the JCL library in HULFT Ver.5 (such as HULPRM).

Therefore, in this case, backup of HULFT parameter library is not necessary.

[Example of JCL for backup]

//BACKUP   JOB CLASS=A,MSGCLASS=B
//*
//JCL      EXEC PGM=IEBCOPY
//IN       DD DSN=HULFT.JCL,DISP=SHR
//OUT      DD DSN=HULFT.JCL.BKUP,DISP=(NEW,CATLG),
//         UNIT=SYSDA,VOL=SER=HUL001,
//         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.LOAD,DISP=SHR
//OUT      DD DSN=HULFT.LOAD.BKUP,DISP=(NEW,CATLG),
//         UNIT=SYSDA,VOL=SER=HUL001,
//         SPACE=(CYL,(10,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=HUL001,
//         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=HUL001,
//         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
//*
//PARM     EXEC PGM=IEBCOPY
//IN       DD DSN=HULFT.PARMLIB,DISP=SHR
//OUT      DD DSN=HULFT.PARMLIB.BKUP,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 REPRO >-------------------------------
//FILE     EXEC PGM=IDCAMS,REGION=2048K
//U01      DD DSN=HULFT.FILE,DISP=OLD
//U11      DD DSN=HULFT.FILE.BKUP,
//         DISP=(NEW,CATLG),UNIT=SYSDA,VOL=SER=HUL001,
//         SPACE=(CYL,(5,5)),
//         DCB=(BLKSIZE=27998,LRECL=22304,RECFM=VB)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//HOST     EXEC PGM=IDCAMS,REGION=2048K
//U01      DD DSN=HULFT.HOST,DISP=OLD
//U11      DD DSN=HULFT.HOST.BKUP,
//         DISP=(NEW,CATLG),UNIT=SYSDA,VOL=SER=HUL001,
//         SPACE=(CYL,(5,5)),
//         DCB=(BLKSIZE=27998,LRECL=504,RECFM=VB)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//LOG      EXEC PGM=IDCAMS,REGION=2048K
//U01      DD DSN=HULFT.LOG,DISP=OLD
//U11      DD DSN=HULFT.LOG.BKUP,
//         DISP=(NEW,CATLG),UNIT=SYSDA,VOL=SER=HUL001,
//         SPACE=(CYL,(5,5)),
//         DCB=(BLKSIZE=27998,LRECL=27994,RECFM=VB)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
     REPRO INFILE(U01) OUTFILE(U11)
//*
//IP       EXEC PGM=IEBGENER
//SYSUT1   DD DSN=HULFT.HOSTS.LOCAL,DISP=SHR
//SYSUT2   DD DSN=HULFT.HOSTS.LOCAL.BKUP,DISP=(NEW,CATLG),
//         UNIT=SYSDA,VOL=SER=HUL001,SPACE=(CYL,(1,1))
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DUMMY
//*
//PORT     EXEC PGM=IEBGENER
//SYSUT1   DD DSN=HULFT.PROFILE.TCPIP,DISP=SHR
//SYSUT2   DD DSN=HULFT.PROFILE.TCPIP.BKUP,UNIT=SYSDA,
//         DISP=(NEW,CATLG),VOL=SER=HUL001,
//         SPACE=(CYL,(1,1))
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DUMMY
//

DD Name	Value	Description
IN	HULFT.JCL	HULFT JCL library
OUT	HULFT.JCL.BKUP	HULFT JCL library (backup file)
IN	HULFT.LOAD	HULFT load module library
OUT	HULFT.LOAD.BKUP	HULFT load module library (backup file)
OUT	HULFT.PANEL	HULFT ISPF panel library
OUT	HULFT.PANEL.BKUP	HULFT ISPF panel library (backup file)
IN	HULFT.MSG	HULFT ISPF message library
OUT	HULFT.MSG.BKUP	HULFT ISPF message library (backup file)
IN	HULFT.PARMLIB	HULFT parameter library
OUT	HULFT.PARMLIB.BKUP	HULFT parameter library (backup file)
IN	HULFT.FILE	Send and Receive Management File
OUT	HULFT.FILE.BKUP	Send and Receive Management File (backup file)
IN	HULFT.HOST	Host Information File
OUT	HULFT.HOST.BKUP	Host Information File (backup file)
IN	HULFT.LOG	Send and Receive Log File ID Key File
OUT	HULFT.LOG.BKUP	Send and Receive Log File (backup file)
IN	HULFT.HOSTS.LOCAL	IP Management File
OUT	HULFT.HOSTS.LOCAL.BKUP	IP Management File (backup file)
IN	HULFT.PROFILE.TCPIP	PORT Management File
OUT	HULFT.PROFILE.TCPIP.BKUP	PORT Management File (backup file)

Parameter Name	Value	Description
UNIT	SYSDA	UNIT
VOL=SER	HUL001	Volume Name

The backup procedure is now complete.

Next, create a backup for your operating system environment.