?? FMT (TAB := '=', 40) ??

  CONST
    cmc$enable_head_shift_msg_min      = 0,
    cmc$enable_head_shift_msg_used     = cmc$full_old_head_shift_message,
    cmc$enable_head_shift_msg_max      = 255,

    cmc$disable_head_shift_message     = cmc$enable_head_shift_msg_min + 0,
    cmc$cwl_new_head_shift_message     = cmc$enable_head_shift_msg_min + 1,
    cmc$cwl_old_head_shift_message     = cmc$enable_head_shift_msg_min + 2,
    cmc$om_head_shift_message          = cmc$enable_head_shift_msg_min + 3,
    cmc$full_new_head_shift_message    = cmc$enable_head_shift_msg_min + 4,
    cmc$full_old_head_shift_message    = cmc$enable_head_shift_msg_min + 5;

?? FMT (CLEARTAB := '=', ALL) ??

  TYPE
    cmt$enable_head_shift_message = cmc$enable_head_shift_msg_min ..
          cmc$enable_head_shift_msg_max;

