alias hovtlist {
  did -r srvrdialog 1
  did -b srvrdialog 2,3
  window -h @refserv
  if ($isfile(scripts\tmp\readserv.txt)) {
    .fopen serv scripts\tmp\readserv.txt
    while (!$feof) && ($fread(serv) != $null) {
      var %1 $v1,%2 $wd(%1,2,32),%3 $wd(%1,3,32),%4 $wd(%1,4,32),%5 $wd(%1,5-9,32)
      if (Displayed all records (count:*). iswmcs %1) || (Displayed records matching key* iswmcs %1) { dialog -t srvrdialog $remove(%1,$chr(46),$chr(58)) }
      else {
        if ($did(srvrdialog,7).text) {
          if (* $+ $did(srvrdialog,7).text $+ * iswm %2) || (* $+ $did(srvrdialog,7).text $+ * iswm %3) { did -a srvrdialog 1 + 0 0 0 $wd(%1,1,32) 	+ 0 0 0 %2 	+ 0 0 0 %3 	+ 0 0 0 %4 	+ 0 0 0 %5 }
        }
        else { did -a srvrdialog 1 + 0 0 0 $wd(%1,1,32) 	+ 0 0 0 %2 	+ 0 0 0 %3 	+ 0 0 0 %4 	+ 0 0 0 %5 }
      }
    }
    .fclose serv
  }
  close -@ @refserv
}