function replaceSubString(orgString,fromString,toString) {
  var pos=0;
  var len=fromString.length;
 
  pos=orgString.indexOf(fromString);
  while (pos!=-1) {
    preString=orgString.substring(0,pos);
    postString=orgString.substring(pos+len,orgString.length);
    orgString=preString+toString+postString;
    pos=orgString.indexOf(fromString);
  }
  return orgString;
}
 
function trim(str) {
  while (str.charAt(0) == ' ')
    str=str.substring(1,str.length);
 
  while (str.charAt(str.length-1) == ' ')
    str=str.substring(0,str.length-1);
 
  return str;
}
 
function set64KData(results,fieldName) {
  field=document.forms[0].elements[fieldName];
  field.length=0;
  field.options[0]=new Option("");
 
  for (i=0; i<results.length; i++) {
    if (results[i].indexOf('|')!=-1)
      field.options[i+1]=new Option(results[i].substring(0,results[i].indexOf('|')),results[i].substring(results[i].indexOf('|')+1,results[i].length),false,true);
    else
      field.options[i+1]=new Option(results[i],results[i],false,true);
  }
 
  if (browser.isNS)
    _doClick('$Refresh', this, null)
}
 
function set64KDataAndRefresh(results,fieldName) {
set64KData(results,fieldName);
  _doClick('$Refresh', this, '_self', null);
};
 
function notesUnescape(str) {
  return unescape(replaceSubString(str,'&&','%'));
}
 
function get64KData(database,lookupView,lookupColumn,lookupViewKey,lookupColumnKey,key,returnFunction,returnField,label,title,sort,multiple,formula,addNew,newLabel,search,ftSearch,ftFields,addValues) {
  var selected ='';
  var field=document.forms[0].elements[returnField];
  for (i=0; i<field.length; i++) {
    if (field.options[i].selected) {
      if (field.options[i].value!='')
        selected=selected+field.options[i].value+';'
      else
      if (field.options[i].text!='')
        selected=selected+field.options[i].text+';';
    }
  }
 
  if (returnFunction=='')
    returnFunction='set64KData';
 
  dbViewParam='&Database='+escape(notesUnescape(database))+'&LookupView='+escape(notesUnescape(lookupView))+'&LookupColumn='+escape(notesUnescape(lookupColumn))+'&LookupViewKey='+escape(notesUnescape(lookupViewKey))+'&LookupColumnKey='+escape(notesUnescape(lookupColumnKey))+'&Key='+escape(notesUnescape(key));
  param='&ReturnField='+escape(notesUnescape(returnField))+'&ReturnFunction='+escape(notesUnescape(returnFunction))+'&Label='+escape(notesUnescape(label))+'&Title='+escape(notesUnescape(title))+'&Formula='+escape(notesUnescape(formula));
 
  if (multiple) {
    param=param+'&SelectMultiple=.Yes';
    paramWidth='610';
  }
  else
    paramWidth='248';
 
  if (sort)
    param=param+'&Sort=.Yes';
 
  if (addNew) {
    param=param+'&New=.Yes&NewLabel='+escape(notesUnescape(newLabel));
    if (browser.isNS)
      paramHeight='358'
    else
      paramHeight='471';
  }
  else {
    if (browser.isNS)
      paramHeight='318'
    else
      paramHeight='331';
  }
 
  if (search)
    param=param+'&Search=.Yes';
 
  if (ftSearch)
    param=param+'&FTSearch=.Yes&FTFields='+escape(notesUnescape(ftFields));
 
  if (browser.isNS)
    addParam=',resizable=1'
  else
    addParam='';
 
  form=getForm('.SysWADlgSelect');
  window.open(webDbPath+'/'+form+'?OpenForm'+dbViewParam+param+'&Selected='+escape(selected)+'&AddValues='+escape(notesUnescape(addValues)),'Dialog','location=0,scrollbars=0,status=0,width='+paramWidth+',height='+paramHeight+addParam);
}
 
function getForm(form) {
  if (formMapping)
    if (typeof(formMapping[form])!='undefined')
      return formMapping[form];
 
  return form;
}