PROCEDURE pewter_shared_lab (
  status)

COLLECT_TEXT $local.pcu_subcommands until='end_prolog_file'
EDIT_PHYSICAL_CONFIGURATION
 delete_element_definition e=all r=(..
 pewter_xmd_cm_0 ..
 pewter_xmd_cm_1 ..
 pewter_9853_0 ..
 pewter_9853_1 ..
 pewter_9853_2 ..
 pewter_9853_3 ..
 stornet ..
 pewter_7221_1 ..
 pew0 ..
 pew1 ..
 pewter_5698_0 ..
 pew2 ..
 pew3 ..
 pewter_ica_0 ..
 pewter_ica_16 ..
 pewter_ica_test ..
 xlink5_pew ..
 xlink19_pew ..
 pewter_nad_1 ..
)

 change_element_definition e=pewter_xmd_cm_0 s=on
 change_element_definition e=pewter_xmd_cm_1 s=on
 change_element_definition e=pewter_9853_0   s=on
 change_element_definition e=pewter_9853_1   s=on
 change_element_definition e=pewter_9853_2   s=on
 change_element_definition e=pewter_9853_3   s=on
 change_element_definition e=pewter_7221_1   s=on
 change_element_definition e=pew2            s=on
 change_element_definition e=pew3            s=on
 change_element_definition e=stornet       s=on
 change_element_definition e=xlink5_pew      s=off  "EXPRESS LINK"
 change_element_definition e=xlink19_pew     s=off  "EXPRESS LINK"
 change_element_definition e=pewter_ica_0    s=on
 change_element_definition e=pewter_ica_16   s=on
 change_element_definition e=pewter_ica_test s=on
 change_element_definition e=pewter_nad_1    s=on
QUIT
end_prolog_file
COLLECT_TEXT $local.lcu_mainframe_subcommands until='end_prolog_file'
display_value 'Initializing PEWTER_9853_1 as S98531'
initialize_ms_volume element=pewter_9853_1 recorded_vsn=s98531
display_value 'Initializing PEWTER_9853_2 as S98532'
initialize_ms_volume element=pewter_9853_2 recorded_vsn=s98532
display_value 'Initializing PEWTER_9853_3 as S98533'
initialize_ms_volume element=pewter_9853_3 recorded_vsn=s98533
display_value 'Adding S98531 to set'
add_volume_to_set member_vsn=s98531
display_value 'Adding S98532 to set'
add_volume_to_set member_vsn=s98532
display_value 'Adding S98533 to set'
add_volume_to_set member_vsn=s98533
end_prolog_file
COLLECT_TEXT $local.lcu_network_subcommands until='end_prolog_file'
"define_host_network n=767(10)
"define_network_connection connected_system=pewter_ica_16   system_identifier=4fff20(16)
"define_network_connection connected_system=pewter_ica_0    system_identifier=4fff21(16)
"define_network_connection connected_system=pewter_ica_test system_identifier=4fff22(16)
"define_network_connection connected_system=xlink5_pew
"define_network_connection connected_system=xlink19_pew
end_prolog_file

PROCEND pewter_shared_lab
