PROCEDURE (HIDDEN) cmp$perform_lcu_intervention (
  deadstart_phase, dp: key
      installation, reinstallation, continuation
    keyend = $optional
  status)

"$FORMAT=OFF
VAR
  local_status: status
VAREND

"$FORMAT=ON

  rap$display_message message_module=sysdp_messages ..
        message_name=entering_lcu_banner to=$output
  IF deadstart_phase = continuation THEN
    rap$display_message message_module=sysdp_messages ..
          message_name=continuation_ds to=$output
  IFEND

  LOGICAL_CONFIGURATION_UTILITY status=local_status
    include_file command prompt='LCU'
  "$QUIT

lcu: ..
  WHILE NOT local_status.normal DO
    rap$display_message message_module=sysdp_messages ..
          message_name=report_lcu_error to=$output
    display_value local_status o=$output
    rap$display_message message_module=sysdp_messages ..
          message_name=entering_lcu_banner to=$output

    LOGICAL_CONFIGURATION_UTILITY status=local_status
      include_file command prompt='LCU'
    "$QUIT
  WHILEND lcu

PROCEND cmp$perform_lcu_intervention
