HP XP P9000 for Business Continuity Manager Software Reference Guide

*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYUR1.)",
"MSG(DEMO_MSG.) GOTO(SUSPEND) TIMEOUT(10)"
end
else do
/*
* Confirm that the MYTCHS copy pair is in a status
* where a DeltaResync can be performed.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYTCHS.)",
" MSG(DEMO_MSG.) GOTO(SWAPPING)",
" TIMEOUT(0)"
/*
* Check the return code of YKEWAIT.
*/
if rc /= 0
then do
call printErrorMessage
leave /* Exit the loop. */
end
else
nop
/*
* Suspend the MYUR1 copy pair to change the status of
* MYUR1 into one where a DeltaResync can be performed.
*/
address TSO "YKSUSPND STEM(DEMO_INFO.MYUR1.)",
" MSG(DEMO_MSG.) FLUSH"
/*
* Check the return code of YKSUSPND.
*/
if rc /= 0
then do
call printErrorMessage
leave /* Exit the loop. */
end
else
nop
/*
* Confirm that the MYUR1 copy pair is in a status
* where a DeltaResync can be performed.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYUR1.) ",
"MSG(DEMO_MSG.) GOTO(SUSPEND) TIMEOUT(10)"
/*
* Check the return code of YKEWAIT.
*/
if rc /= 0
then do
call printErrorMessage
leave /* Exit the loop. */
end
else
nop
end
/*
* Execute a DeltaResync with the MYUR2 copy pair to
290 CLI Commands