HP XP7 Business Continuity Manager Reference Guide (TK954-96004)

call printErrorMessage
exit
end
else
nop
/*
* Execute Make(HOLD) on the MYUR1 to change
* the status of MYUR1 to one where a DeltaResync
* can be performed.
*/
address TSO "YKMAKE STEM(DEMO_INFO.MYUR1.) MSG(DEMO_MSG.) HOLD"
/*
* Check the return code of YKMAKE.
*/
if rc /= 0
then do
call printErrorMessage
end
else
nop
/*
* Confirm that the status of the MYUR1 copy pair is one where a
* DeltaResync can be performed.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYUR1.) MSG(DEMO_MSG.)",
"GOTO(HOLD) TIMEOUT(10)"
/*
* Check the return code of YKEWAIT.
*/
if rc /= 0
then do
call printErrorMessage
exit
end
else
nop
exit
end
else
do
say "recover to ready state for DeltaResync",
"from planned outage configuration."
end
end
/*
* Confirm that the status of the MYTCHS copy pair is one where a
* DeltaResync can be performed.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYTCHS.) MSG(DEMO_MSG.)",
"GOTO(SWAPPING) TIMEOUT(10)"
/*
* Check the return code of YKEWAIT.
Command details 295