PROCEDURE gray_open_usage (
  status)

COLLECT_TEXT $local.pcu_subcommands until='end_prolog_file'
EDIT_PHYSICAL_CONFIGURATION
 delete_element_definition e=all r=(..
  gray_fa7b5_0 ..
  gray_fa7b5_1 ..
  gray_9853_28 ..
  gray_9853_29 ..
  gray_9853_30 ..
  gray_9853_31 ..
  gray_c32 ..
  gray_c13 ..
  g70 ..
  g71 ..
  g72 ..
  g73 ..
  gray_di_300119 ..
  cobray_di_3013ad ..
  gray_5680_1 ..
  gs67 ..
  gray_nad_1 ..
  stornet)
change_element_definition gray_fa7b5_0 s=on ic=((cch3b 0))
change_element_definition gray_fa7b5_1 s=on ic=((cch3b 1))
change_element_definition gray_9853_28 s=on pc=((gray_fa7b5_0 0))
change_element_definition gray_9853_29 s=on pc=((gray_fa7b5_0 1))
change_element_definition gray_9853_30 s=on pc=((gray_fa7b5_1 2))
change_element_definition gray_9853_31 s=on pc=((gray_fa7b5_1 3))
change_element_definition gray_c32 s=on
change_element_definition g70 s=on
change_element_definition g71 s=on
change_element_definition g72 s=on
change_element_definition g73 s=on
change_element_definition gray_DI_300119 s=on
QUIT
end_prolog_file
COLLECT_TEXT $local.lcu_mainframe_subcommands until='end_prolog_file'
display_value 'Initializing gray_9853_29 as VSN001'
initialize_ms_volume element=gray_9853_29 recorded_vsn=VSN001
display_value 'Initializing gray_9853_30 as VSN002'
initialize_ms_volume element=gray_9853_30 recorded_vsn=VSN002
display_value 'Initializing gray_9853_31 as VSN003'
initialize_ms_volume element=gray_9853_31 recorded_vsn=VSN003
display_value 'Adding VSN001 to set'
add_volume_to_set member_vsn=VSN001
display_value 'Adding VSN002 to set'
add_volume_to_set member_vsn=VSN002
display_value 'Adding VSN003 to set'
add_volume_to_set member_vsn=VSN003
end_prolog_file
COLLECT_TEXT $local.lcu_network_subcommands until='end_prolog_file'
define_network_connection connected_system=gray_DI_300119
define_host_network n=311(10)
end_prolog_file
PROCEND gray_open_usage
