BRMS Transfer Problems

In the event that the BRMS transfer was interrupted (source LPAR subsystem ended, IP did not start on the target LPAR, etc) it can be resumed or performed manually.

There are two components to the BRMS transfer: The source and the target.

Resuming a BRMS Transfer

On the SOURCE LPAR ensure that subsystem QZRDFSR with program QZRDIAEXT2 is running. This is the job which will receive and restore BRMS.

On the TARGET LPAR issue the command ENDFSFLASH *NORMAL. This will connect to QZRDIAEXT2 on the source LPAR and send BRMS. Since this may be a long-running process, it is recommended that this be run in batch.

If STRFSFLASH is still running on the controller it will be notified that the BRMS transfer has finished and it will end, and shut down the target LPAR if configured to do so.

Manually transferring BRMS

In the event that the toolkit is unable to perform the transfer itself, it can be done manually if the BRMS transfer method is *ALL. There is no easy manual transfer for *CHGONLY.

The guide below does everything from scratch and does not reuse any toolkit objects.

On the SOURCE and TARGET LPARs:

1. Create the vrtual tape drive and vary it on:
   CRTDEVTAP DEVD(VRTDEV) RSRCNAME(*VRT)
   VRYCFG CFGOBJ(VRTDEV) CFGTYPE(*DEV) STATUS(*ON)
2. Create the image catalog:
   CRTIMGCLG IMGCLG(VRTCLG) DIR('/vrtclg/clg/') TYPE(*TAP)
3. Create an image catalog entry:
   ADDIMGCLGE IMGCLG(VRTCLG) FROMFILE(*NEW) TOFILE(FSFC01) IMGSIZ(1000000) VOLNAM(FSFC01)
4. Load the image in the catalog:
   LODIMGCLGE IMGCLG(VRTCLG)

On the TARGET LPAR:

1. Start the FSFC Line description:
   VRYCFG CFGOBJ(FSFCLINE) CFGTYPE(*LIN) STATUS(*ON)     
2. Start TCP:
   STRTCP STRSVR(*NO) STRIFC(*NO) STRPTPPRF(*NO) STRIP6(*NO)
3. Start the IP Interface:
   STRTCPIFC INTNETADR('<Target LPAR IP interface>')
4. Disable BRMS backups:
   CALL QBRM/Q1AOLD PARM('FLSSYSSTS' '*ENDBACKUP')
   RCLACTGRP ACTGRP(Q1ABRMS)
5. Delete the old BRMS flight recorders:
   DLTF FILE(QUSRBRM/QZRBRMLOGS)
   RMDIR DIR('/tmp/brms/fsfc') SUBTREE(*ALL)
6. Save the new BRMS flight recorders:
   CRTSAVF FILE(QUSRBRM/QZRBRMLOGS)
   SAV DEV('/QSYS.LIB/QUSRBRM.LIB/QZRBRMLOGS.FILE') OBJ(('/tmp/brms/*')) DTACPR(*HIGH)
7. Load the catalog on the device:
   LODIMGCLG IMGCLG(VRTCLG) DEV(VRTDEV)
8. Save the BRMS data library:
   SAVLIB LIB(QUSRBRM) DEV(VRTDEV) DTACPR(*DEV) SPLFDTA(*ALL) OMITOBJ((*ALL *JRN) (*ALL *JRNRCV) (QUSRBRM/Q1ATCPIFC *DTAARA) (QUSRBRM/QA1ARI *FILE) (QUSRBRM/Q1AMONQUE *DTAQ))
9. FTP the virtual tape file to the source LPAR:
   bin
   namefmt 1
   put /vrtclg/clg/FSFC01 /vrtclg/clg/FSFC01 
   quit

On the SOURCE LPAR:

1. Load the catalog on the device:
   LODIMGCLG IMGCLG(VRTCLG) DEV(VRTDEV)
2. Restore the BRMS Library
   RSTLIB SAVLIB(QUSRBRM) DEV(VRTDEV) MBROPT(*ALL) ALWOBJDIF(*AUTL *FILELVL *OWNER *PGP)
3. Restore the BRMS flight recorders (NOTE the target LPAR name substitution):
   RST DEV('/QSYS.LIB/QUSRBRM.LIB/QZRBRMLOGS.FILE') OBJ(('/tmp/brms/*' *INCLUDE '/tmp/brms/fsfc/<target LPAR Name>/')) CRTPRNDIR(*YES) ALWOBJDIF(*ALL) 
4. Clean up the BRMS logs:
   DLTF FILE(QUSRBRM/QZRBRMLOGS)
5. Restore functional usage:
   QZRDHASM/ENDFSFLASH *RSTFCNUSG
6. Enable BRMS backups:
   STRSBS SBSD(QBRM/Q1ABRMNET)
   CALL QBRM/Q1AOLD PARM('FLSSYSSTS' '*END      ')

After validating that the BRMS information is present on the SOURCE LPAR (WRKMEDIBRM etc) run BRMS maintenance and create the recovery reports.

Final cleanup on the SOURCE LPAR:

1. LODIMGCLG IMGCLG(VRTCLG) OPTION(*UNLOAD)
2. RMVIMGCLGE IMGCLG(VRTCLG) IMGCLGIDX(*VOL) VOL(FSFC01) KEEP(*NO)
3. DLTIMGCLG IMGCLG(VRTCLG) KEEP(*NO) DEPIMGCLG(*DELETE)
4. VRYCFG CFGOBJ(VRTDEV) CFGTYPE(*DEV) STATUS(*OFF)
5. DLTDEVD DEVD(VRTDEV)

If desired, shut down the TARGET LPAR using either the HMC or PWRDWNSYS and optionally remove the flashcopy relationship.