HP XP P9500 HP P9000 Business Continuity Manager Reference Guide (T5253-96058, - Page 282
The primary Device Address Domain ID is PRIM.
View all HP XP P9500 manuals
Add to My Manuals
Save this manual to your list of manuals |
Page 282 highlights
/* 3) The route list ID is "DEMORLST". */ /* 4) The primary Device Address Domain ID is "PRIM". */ /* */ /* Sample script begins. */ say "#-- BEGIN YKDEMO07."; address TSO "YKENV" /* * YKLOAD should be called before manipulating MYTCS to make definition * information of MYTCS available on the REXX environment. */ call "YKLOAD" "STEM(DEMO_INFO.) PREFIX(BCM.DEMO) GROUP(MYTCS)", "DAD(PRIM) MSG(DEMO_MSG.) ROUTE(DEMORLST)"; /* * Check the return code of YKLOAD to see if it is 0 or not. */ if result /= 0 then do call printErrorMessage; exit; end; else nop; /* * Update the Copy Group structure for MYTCS before YKMAKE. You may * also use YKEWAIT with TIMEOUT(0) for faster update. */ address TSO "YKQUERY STEM(DEMO_INFO.) MSG(DEMO_MSG.)"; /* * Check the return code to see if it is bigger than 8. */ if rc > 8 then do call printErrorMessage; exit; end; else nop; /* * Establish all copy pairs in MYTCS copy group into DUPLEX. This is * for demonstration purpose only. In reality you may already have a * copy group up and running. */ address TSO "YKMAKE 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; exit; end; else nop; /* * Wait for MYTCS to become fully established. 282 CLI Commands