HP StorageWorks P9000 - Page 295

exit
end
else
nop
/*
* Check the status of the MYUR1 copy pair
* to find the cause of a HyperSwap.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYUR1.) MSG(DEMO_MSG.)",
"GOTO(HOLD) TIMEOUT(0) NOINVALIDCHECK"
/*
* Check the return code of YKEWAIT.
*/
if (rc < 0)|(rc > 8)
then do
call printErrorMessage
exit
end
else
do
if rc /= 0
then do
say "recover to ready state for DeltaResync",
"from failure configuration."
/*
* Delete the MYUR1 copy pair when a failure occurs.
*/
address TSO "YKDELETE STEM(DEMO_INFO.MYUR1.) MSG(DEMO_MSG.)"
/*
* Check the return code of YKDELETE.
*/
if rc /= 0
then do
call printErrorMessage
end
else
nop
/*
* Confirm that the status of the MYUR1 copy pair is one where
* the copy pair can be copied.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYUR1.) MSG(DEMO_MSG.)",
"GOTO(SIMPLEX) TIMEOUT(10)"
/*
* Check the return code of YKEWAIT.
*/
if rc /= 0
then do
call printErrorMessage
exit
end
else
nop
say "#-- MYTCHS copy pair change to DUPLEX state in TPC-R."
Command details 295