HP P9000, Справочное руководство

Страница: 292 / 399

* 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
* change the status of MYUR1 to HOLD, and
* to change the status of MYUR2 to DUPLEX.
*/
address TSO "YKRESYNC STEM(DEMO_INFO.MYUR2.) ",
"MSG(DEMO_MSG.) DELTAJNL"
/*
* Check the return code of YKRESYNC.
*/
if rc /= 0
then do
call printErrorMessage
leave /* Exit the loop. */
end
else
nop
/*
* Wait for completion of copying from the local site to
* the remote site.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.MYUR2.) MSG(DEMO_MSG.)",
"GOTO(DUPLEX) TIMEOUT(30)"
/*
* Check the return code of YKEWAIT.
*/
if rc /= 0
then do
call printErrorMessage
leave /* Exit the loop. */
end
else
nop
leave /* Exit the loop. */
end
end
/* Check if 120 seconds have elapsed after starting the loop. */
elapsedTime = time('e')
if elapsedTime > 120
then do
say "#-- 120 seconds have elapsed. Stop monitoring IOSHM0414I."
leave
end
else
nop
end /* do forever */
292 CLI Commands