/*
perform fail-over operations in a 2DC configuration with
/*
HyperSwap and UR.
/*
This script can be used when storage system at the primary
/*
site has been stopped for a storage system maintenance or
/*
because a storage system failure has occurred.
/*
/*
This sample script assumes the following settings:
/*
/*
1) The definition files are stored in the dataset with the
/*
prefix "BCM.DEMO".
/*
2) The TC copy group's copy group ID is MYTCHS.
/*
3) The copy group ID between the primary and
/*
remote sites is MYUR1.
/*
4) The copy group ID between the local and
/*
remote sites is MYUR2.
/*
5) The route list ID is "DEMORLST".
/*
6) The primary Device Address Domain ID is "PRIM".
/*
/*
The details for this sample script are as follows:
/*
/*
1) Call YKLOAD to load configuration definitions.
/*
2) Confirm the ready state for operations in 2DC configuration
/*
with HyperSwap and UR.
/*
3) Watch for the occurrence of a HyperSwap.
/*
4) Suspend MYUR1.
/*
5) Execute DeltaResync MYUR2.
/*
/**********************************************************************/
/* Sample script begins. */
say "#-- BEGIN YKDEMO08."
address TSO "YKENV"
call "YKLOAD" "STEM(DEMO_INFO.MYTCHS.) PREFIX(BCM.DEMO) GROUP(MYTCHS)",
/*
* 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)",
/*
* 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)",
284 CLI Commands
"DAD(PRIM) MSG(DEMO_MSG.) ROUTE(DEMORLST)"
"DAD(PRIM) MSG(DEMO_MSG.)"
"DAD(PRIM) MSG(DEMO_MSG.)"
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/
*/