HP XP P9500 Reference Manual page 264

end;
else
nop;
call printCopyGroupStatus;
/*
* Suspend all copy pairs in MYTCS copy group.
* Like YKMAKE, use SELECT(COND) to let YKSUSPND skip a copy pair
* which is already being suspended.
* Although you can omit specification of FORWARD/REVERSE parameter,
* it is strongly recommended to specify the parameter to clarify
* your intention.
*/
address TSO "YKSUSPND STEM(DEMO_INFO.) MSG(DEMO_MSG.) FORWARD",
/*
* Check the return code to see if it is 0 or not.
*/
if rc /= 0
then do
call printErrorMessage;
exit;
end;
else
nop;
/*
* Wait until all copy pairs in MYTCS copy group become suspended.
*/
address TSO "YKEWAIT STEM(DEMO_INFO.) MSG(DEMO_MSG.) GOTO(SUSPEND)",
/*
* Check the return code to see if it is 0 or not.
*/
if rc /= 0
then do
call printErrorMessage;
exit;
end;
else
nop;
call printCopyGroupStatus;
/*
* Resynchronize all suspended copy pairs in MYTCS copy group.
* Use SELECT(COND) parameter to let YKRESYNC skip copy pairs which
* are already DUPLEX.
* Just like YKSUSPND, it is recommended to explicitly specify
* FORWARD/REVERSE parameter.
*/
address TSO "YKRESYNC STEM(DEMO_INFO.) MSG(DEMO_MSG.) SELECT(COND)",
/*
* Check the return code to see if it is 0 or not.
*/
if rc /= 0
then do
call printErrorMessage;
264 CLI Commands
"SELECT(COND)";
"TIMEOUT(30)";
"FORWARD";