HP XP P9500 Reference Manual page 298
Hp p9000 for business continuity manager software reference guide
Hide thumbs
Also See for XP P9500:
- Software user's manual (608 pages) ,
- Manual (348 pages) ,
- User manual (193 pages)
Advertisement
/*
/*
This sample script assumes the following settings.
/*
/*
1) The definition files are stored in the dataset with the
/*
prefix "BCM.DEMO".
/*
2) TC-Sync copy group is used. The copy group ID is "MYTCS".
/*
3) The route list ID is "DEMORLST".
/*
4) The primary Device Address Domain ID is "PRIM".
/*
/*
The details for this sample script are as follows:
/*
/*
1) Call YKLOAD to load a configuration definitions.
/*
2) Check whether TC pair became inconsistent because of
/*
interrupted FlashCopy copy process, or not.
/*
*) When TC pair became inconsistent because of interrupted
/*
FlashCopy copy process, go to step 3.
/*
3) Check the status of each pairs.
/*
*) When the status is CONSLOST, go to step 4 and 5.
/*
4) Delete the pair of which the status is CONSLOST in MYTCS.
/*
5) Re-make the deleted pair again.
/*
/**********************************************************************/
/* Sample script begins. */
Say "#-- BEGIN YKDEMO12."
Call "YKLOAD" "STEM(DEMO_INFO.) PREFIX(BCM.DEMO) GROUP(MYTCS)",
"DAD(PRIM) MSG(DEMO_MSG.) ROUTE(DEMORLST)"
/*
* Check the return code of YKLOAD.
*/
If result /= 0 Then
Do
Call PrintErrorMessage
Exit
End
Else
Nop
/*
* Check the status of the MYTCS copy pair
* to find that TC pair became inconsistent because of interrupted
* FlashCopy copy process.
*/
Address TSO "YKQUERY STEM(DEMO_INFO.) MSG(DEMO_MSG.)"
/*
* Check the return code of YKQUERY.
*/
If rc > 8 Then
Do
Call PrintErrorMessage
Exit
End
Else
Nop
/*
* When TC pair became inconsistent because of interrupted FlashCopy
* copy process, check the status of each the MYTCS copy pairs.
* If the status of pair is CONSLOST, execute recovering process.
*/
If DEMO_INFO.CopyGroup.1.ConslostCt > 0 Then
Do
Do i = 1 To DEMO_INFO.CopyGroup.1.Pair.0
If DEMO_INFO.CopyGroup.1.Pair.i.State == "CONSLOST" Then
Do
/*
* Delete the CONSLOST pair in MYTCS.
*/
P_DEVN = DEMO_INFO.CopyGroup.1.Pair.i.Pri.Devn
S_DEVN = DEMO_INFO.CopyGroup.1.Pair.i.Sec.Devn
298 CLI Commands
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
Advertisement
