PROCEDURE SN302_HYDRAS (
  status)

COLLECT_TEXT $local.pcu_subcommands until='end_prolog_file'
EDIT_PHYSICAL_CONFIGURATION
 delete_element_definition e=all r=(..
 hyd0_violet ..
 hyd1_violet ..
 violet_7021_1 ..
 v50 ..
 v51 ..
 v52 ..
 v55 ..
 stornet ..
 violet_nad_1 ..
 violet_DI_3000f0 ..
 $7992_10_1_0 ..
 xlink_violet ..
 drd_dum0 ..
 sma_drd0 ..
 sma_drd1)

 change_element_definition e=hyd0_violet ic=((cch7a 0)) s=on
 change_element_definition e=hyd1_violet ic=((cch7a 1)) s=on
 change_element_definition e=violet_7021_1              s=on "VE Tapes(CH33(8)"
 change_element_definition e=v50 pc=((violet_7021_1 0)) s=on "679 Unit 0"
 change_element_definition e=v51 pc=((violet_7021_1 1)) s=on "679 Unit 1"
 change_element_definition e=v52 pc=((violet_7021_1 2)) s=off "679 Unit 2"
 change_element_definition e=v55 pc=((violet_7021_1 5)) s=on  "679 Unit 5"
 change_element_definition e=xlink_violet               s=off  "EXPRESS LINK to LIZZIE"
 change_element_definition e=stornet                    s=on
 change_element_definition e=violet_nad_1               s=on
 change_element_definition e=violet_DI_3000f0           s=on "DI 340"

QUIT
end_prolog_file
COLLECT_TEXT $local.lcu_mainframe_subcommands until='end_prolog_file'
 display_value 'Initializing HYD1_VIOLET as VSN7A1'
 initialize_ms_volume element=hyd1_violet recorded_vsn=vsn7a1
 display_value 'Adding VSN7A1 to set'
 add_volume_to_set member_vsn=vsn7a1
end_prolog_file
COLLECT_TEXT $local.lcu_network_subcommands until='end_prolog_file'
define_network_connection connected_system=violet_DI_3000f0
define_host_network n=302(10)
end_prolog_file

PROCEND sn302_hydras
