PROCEDURE mauve_shared_lab (
  status)

collect_text $local.pcu_subcommands until='END_PROLOG_FILE'
EDIT_PHYSICAL_CONFIGURATION
 delete_element_definition e=all r=(..
  violet_xmd_cm_4 ..
  violet_xmd_cm_5 ..
  violet_9853_6 ..
  violet_9853_7 ..
  hyd0_violet ..
  hyd1_violet ..
  hyd2_violet ..
  hyd3_violet ..
  stornet ..
  violet_7021_1 ..
  violet_7021_2 ..
  v50 ..
  v51 ..
  v52 ..
  v55 ..
  violet_5680_3 ..
  ctd6 ..
  ctd7 ..
  cts0 ..
  cts1 ..
  cts2 ..
  cts3 ..
  violet_DI_100087 ..
  violet_DI_100092 ..
  violet_DI_10007f ..
  violet_DI_300116 ..
  violet_DI_300420 ..
  violet_DI_3000a0 ..
  violet_DI_3000f0)
  xlink_violet ..
 change_element_definition e=hyd0_violet s=off "CCH7a"
 change_element_definition e=hyd1_violet s=off "CCH7a"
 change_element_definition e=violet_xmd_cm_4 s=on "CCH8b"
 change_element_definition e=violet_xmd_cm_5 s=on "CCH8b"
 change_element_definition e=violet_9853_6   s=on "CCH8b"
 change_element_definition e=violet_9853_7   s=on "CCH8b"
 change_element_definition e=hyd2_violet s=on "CCH7a"
 change_element_definition e=hyd2_violet s=on "CCH7a"
 change_element_definition e=hyd2_violet s=on "CCH7a"
 change_element_definition e=hyd3_violet s=on "CCH7a"
 change_element_definition e=violet_7021_1 s=on "CH27(8)"
 "change_element_definition e=violet_7021_2 s=on
 change_element_definition e=v50 s=on  pc=((violet_7021_1 0))
 change_element_definition e=v51 s=on  pc=((violet_7021_1 1))
 change_element_definition e=v52 s=off pc=((violet_7021_1 2))
 change_element_definition e=v55 s=on  pc=((violet_7021_1 5))
 change_element_definition e=stornet       s=on
 change_element_definition e=xlink_violet     s=off "EXPRESS LINK to LIZZIE"
 change_element_definition e=violet_DI_100087 s=off "SN135"
 change_element_definition e=violet_DI_100092 s=off "SN146"
 change_element_definition e=violet_DI_10007f s=on  "SN127"
 change_element_definition e=violet_DI_300116 s=on  "SN378 VE DI"
 change_element_definition e=violet_DI_300420 s=on  "SN1056"
 change_element_definition e=violet_DI_3000a0 s=on  "SN260"
 change_element_definition e=violet_DI_3000f0 s=on  "SN340"
quit
END_PROLOG_FILE
collect_text $local.lcu_mainframe_subcommands until='END_PROLOG_FILE'
display_value 'Initializing violet_9853_7 as Sxmd07'
initialize_ms_volume element=violet_9853_7 recorded_vsn=sxmd07
display_value 'Initializing hyd2_violet as S88702'
initialize_ms_volume element=hyd2_violet recorded_vsn=S88702
display_value 'Initializing hyd3_violet as S88703'
initialize_ms_volume element=hyd3_violet recorded_vsn=S88703
display_value 'Adding Sxmd07 to the set.'
add_volume_to_set member_vsn=sxmd07
display_value 'Adding S88702 to the set.'
add_volume_to_set member_vsn=S88702
display_value 'Adding S88703 to the set.'
add_volume_to_set member_vsn=S88703
change_ms_class rv=sxmd06 dc=(c l m n)
change_ms_class rv=sxmd07 dc=(c q)
change_ms_class rv=s88702 dc=(c q)
change_ms_class rv=s88703 dc=all ac=(a c)
END_PROLOG_FILE
collect_text $local.lcu_network_subcommands until='END_PROLOG_FILE'
END_PROLOG_FILE

PROCEND mauve_shared_lab
