HP StorageWorks P9000 - Ykdemo03

say "#-- END YKDEMO02.";
exit;
/*
* printErrorMessage: This procedure prints all of the error messages
* in the Message structure when a CLI command failed.
*/
printErrorMessage: procedure expose DEMO_MSG.
do x = 1 to DEMO_MSG.0
say "Severity = " || DEMO_MSG.x.Severity;
say "Text = " || DEMO_MSG.x.Text;
say "Value = " || DEMO_MSG.x.Value;
end;
return 0;
YKDEMO03
/* REXX */
/**********************************************************************/
/* */
/* All Rights Reserved. Copyright (C) 2007, 2010, Hitachi, Ltd. */
/* */
/**********************************************************************/
/*
/* YKDEMO03 - A sample demonstration script that illustrates how to */
/* use the Business Continuity Manager's REXX CLI commands for */
/* establishing and deleting routes (command devices) and logical */
/* paths between two storage systems. */
/* This sample script first establishes logical paths from the */
/* primary storage system to the secondary storage system. Once */
/* the logical paths between two storage systems are established, */
/* the script will then build a command device in the primary */
/* storage system first, then a command device at the secondary */
/* storage system. */
/* Once the command devices are established, the sample script */
/* then deletes the command devices in reverse order, then finally */
/* deletes the logical paths that it established in the beginning */
/* of the script. */
/* */
/* This sample script uses the following CLI commands. */
/* - YKLOAD */
/* - YKBLDCMD */
/* - YKBLDPTH */
/* - YKDELCMD */
/* - YKDELPTH */
/* - YKQRYDEV */
/* - YKQRYPTH */
/* */
/* This sample script assumes the following settings. */
/* */
/* 1) The definition files are stored in the dataset with the */
/* prefix "BCM.DEMO". */
/* 2) The pathset ID is "DEMOPATH". "DEMOPATH" contains the */
/* definition of logical paths in one direction, from the */
/* primary storage system to the secondary storage system. */
/* 3) The route list ID is "DEMORLST". */
/* 4) The primary Device Address Domain ID is "PRIM". */
/* */
/**********************************************************************/
/* Sample script begins. */
say "#-- BEGIN YKDEMO03.";
address TSO "YKENV"
/*
Command details 271