HP XP P9500 Reference Manual page 291
Hp p9000 for business continuity manager software reference guide
Hide thumbs
Also See for XP P9500:
- Software user's manual (608 pages) ,
- Manual (348 pages) ,
- User manual (193 pages)
Advertisement
call "YKLOAD" "STEM(DEMO_INFO.MYTCHS.) PREFIX(BCM.DEMO) GROUP(MYTCHS)",
"DAD(PRIM) MSG(DEMO_MSG.) ROUTE(DEMORLST)"
/*
* Check the return code of YKLOAD.
*/
if result /= 0
then do
call printErrorMessage
exit
end
else
nop
call "YKLOAD" "STEM(DEMO_INFO.MYUR1.) PREFIX(BCM.DEMO) GROUP(MYUR1)",
"DAD(PRIM) MSG(DEMO_MSG.)"
/*
* Check the return code of YKLOAD.
*/
if result /= 0
then do
call printErrorMessage
exit
end
else
nop
call "YKLOAD" "STEM(DEMO_INFO.MYUR2.) PREFIX(BCM.DEMO) GROUP(MYUR2)",
"DAD(PRIM) MSG(DEMO_MSG.)"
/*
* Check the return code of YKLOAD.
*/
if result /= 0
then do
call printErrorMessage
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
Command details 291
Advertisement
