<!--
bleh
function AddText(ctrl, txt)
{
  if(ctrl.value!='')ctrl.value=ctrl.value+' ';
  ctrl.value=ctrl.value+txt.value;
}
function SetupForm()
{
  with (window.document.search){
    i.value='';
    mh.value='';
    ph.value='';
    NOT.value='';
    trunc.value='';
    title.value='';
    description.value='';
    keywords.value='';
    dcCreator.value='';
    dcCreator.value='';
    dcDate.value='';
    dcDescription.value='';
    dcTitle.value='';
    dcFunction.value='';
    dcSubject.value='';
    dcIdentifier.value='';
    dcPublisher.value='';
    dcContributor.value='';
    dcMandate.value='';
    dcRelation.value='';
    dcRights.value='';
    dcSource.value='';
    dcType.value='';

    switch(selSearchFor.value){
      case "I":
        i.value = lTxtKeywords.value;
        break;
      case "MH":
        mh.value = lTxtKeywords.value;
        break;
      case "PH":
        ph.value = lTxtKeywords.value;
        break;
      default:
        i.value = lTxtKeywords.value;
    }

    switch(lSelInc0.value){
      case "I":
        AddText(i, lTxtKW0);
        break;
      case "MH":
        AddText(mh, lTxtKW0);
        break;
      case "NO":
        AddText(NOT, lTxtKW0);
        break;
      case "TR":
        AddText(trunc, lTxtKW0);
        break;
    }

    switch(lSelInc1.value){
      case "I":
        AddText(i, lTxtKW1);
        break;
      case "MH":
        AddText(mh, lTxtKW1);
        break;
      case "NO":
        AddText(NOT, lTxtKW1);
        break;
      case "TR":
        AddText(trunc, lTxtKW1);
        break;
    }

    switch(lSelInc2.value){
      case "I":
        AddText(i, lTxtKW2);
        break;
      case "MH":
        AddText(mh, lTxtKW2);
        break;
      case "NO":
        AddText(NOT, lTxtKW2);
        break;
      case "TR":
        AddText(trunc, lTxtKW2);
        break;
    }

    switch(lSelInc3.value){
      case "I":
        AddText(i, lTxtKW3);
        break;
      case "MH":
        AddText(mh, lTxtKW3);
        break;
      case "NO":
        AddText(NOT, lTxtKW3);
        break;
      case "TR":
        AddText(trunc, lTxtKW3);
        break;
    }

    AddText(title,lTxtTags0);
    AddText(dcDescription,lTxtTags1);
    AddText(keywords,lTxtTags2);
    AddText(dcType,lSelDcType);
  }
}
// -->