if 	(document.getElementById)	var DOMS = 3	// Supports Web Standard (getElementById)
else if	(document.all)		 	var DOMS = 2	// Supports MS document.all
else if	(document.layers)	 	var DOMS = 1	// Supports NS layers
else				 	var DOMS = 0;	// No DOM gateway support

function getObj(oid) {
  switch(DOMS) {					// Check for various browsers
    case 1: return(document[oid]);			// Supports Layers (NS4)
    case 2: return(document.all[oid]);			// Supports document.all (ie4)
    case 3: return( ((document.getElementById(oid))?document.getElementById(oid):'') );	// Supports getElementById
  }
}

// Position DOM object:  obj = DOM object handle;  x = left coord;  y = top coord.
function setPos(obj,x,y) {
  switch(DOMS) {
    case 1:  obj.moveTo(x,y);			    break;	// NS 4
    default: obj.style.left = x; obj.style.top = y; break;	// IE4+,NS6+
  }
}

// Set DOM object visibility:  obj = DOM object handle;  s = visibility option
function setVis(obj,s) {
  switch(DOMS) {
    case 1:  obj.visibility       = s; break;		// layers
    default: obj.style.visibility = s; break;		// IE4+ and NS6+
  }
}

// Set DOM object text clor:  obj = DOM object handle;  s = color
function setColor(obj,s) {
  switch(DOMS) {
    case 1:  obj.color       = s; break;		// layers
    default: obj.style.color = s; break;		// IE4+ and NS6+
  }
}

// Set DOM object text clor:  obj = DOM object handle;  s = color
function swZ(obj1,obj2) {
  switch(DOMS) {
    case 1:  { obj1.zindex       = 6; obj2.zindex       = 5; break; }	// layers
    default: { obj1.style.zindex = 6; obj2.style.zindex = 5; break; }	// IE4+ and NS6+
  }
}

function imgRot(s,pt) {
  document.images[s].src = ROT1[pt].src;
  ++pt;  if ( !s[pt] ) { pt = 1 };
  setTimeout('imgRot("' + s + '",' + pt+ ')',3000);
}

// Set DOM object visibility:  obj = DOM object handle;  s = visibility option
function setBor(obj,bs,bc) {
  switch(DOMS) {
    case 0:  break;								// no DOM, do nothing
    case 1:  break;								// layers, do nothing
    default: obj.style.borderColor = bc;	obj.style.borderStyle = bs;	break;	// IE4+ and NS6+
  }
}

function molnk(s,oid) {
  obj = getObj(oid);
  switch(s) {
    case 1:  setBor(obj,'outset','#00f'); break;
    case 2:  setBor(obj,'inset', '#00f'); break;
    default: setBor(obj,'solid', '#fff'); break;
  }
}

var winHome = '';
function showHome(s) { 
  if (winHome!="") winHome.close();
  winHome = window.open(s,'HOMEVIEW','height=389,width=514');
}

// Reset input field color when changed
function fldReset() { this.style.backgroundColor=''; this.style.borderColor='#bbbbbb'; }

// display error message, color error field, set 
function setErm(f,m) {
  alert(m);
  f.onchange = fldReset;
  f.style.backgroundColor="#ff9";
  f.style.borderColor="#f00"; 
  f.focus();
  return false;
}

// Check mailto form field(s) for required input, When a field is found with missing input,
// alert user, set field pink, and set focus to it.
function chkMailform(s) {
  if (s.Firstname.value=='')		return setErm(s['Firstname'],	'You must enter your first name to continue.')
  if (s.Lastname.value=='')		return setErm(s['Lastname'],	'You must enter your last name to continue.')

  if (s.contacthow[s.contacthow.selectedIndex].value=="Phone") {
    if (s.Dayphone.value=='') 	return setErm(s['Dayphone'], 'You must enter a phone number to continue.')
  }
  if (s.contacthow[s.contacthow.selectedIndex].value=="E-Mail") {
    if (s.email.value=='')		return setErm(s['email'], 'You must enter your email address to continue.');
    if (s.email.value.indexOf('@')==-1)	return setErm(s['email'], 'Your E-mail address appears to be invalid. Please check!');
    if (s.email.value.indexOf('.')==-1)	return setErm(s['email'], 'Your E-mail address appears to be invalid. Please check!');
  }
  return true;
}

// Check mailto form field(s) for required input, When a field is found with missing input,
// alert user, set field pink, and set focus to it.
function chkMarket(s) {
  if (chkMailform(s)==false) return false;
  if (s.PropStreet.value=='')		return setErm(s['PropStreet'],	'You must enter the property street address to continue.')
  if (s.PropCity.value=='')		return setErm(s['PropCity'],		'You must enter the property city to continue.')
  if (s.PropState.value=='')		return setErm(s['PropState'],		'You must enter the property state to continue.')
  if (s.PropZipcode.value=='')	return setErm(s['PropZipcode'],	'You must enter the property zipcode to continue.')
  return true;
}

function defObj(s1,s2) { this.stat = s1; this.name = s2; }  // Define state object

// Generate state selection options for US states
// If s=0 only list active states, if s=1 list all states
function selState(s,d) { var OUTP = '<select name="state">';
  for (var i in States) { if ((s==1) | (States[i].stat==1)) OUTP += '<option ' + ((d==States[i].name)?'selected ':'') + 'value="' + States[i].name + '">' + States[i].name + '</option>' }
  document.write(OUTP + '</select>');
}

function selCounty(s,d) { var OUTP = '<select name="county"><option></option>';
  for (var i in County) { if ((s==1) | (County[i].stat==1)) OUTP += '<option ' + ((d==County[i].name)?'selected ':'') + 'value="' + County[i].name + '">' + County[i].name + '</option>' }
  document.write(OUTP + '</select>');
}

function admLcat(lcatid) {
  window.open('admin_lcat.php?lcatid='+lcatid,'lcat','height=500,width=580,scrollbars,resizable');
  return false;
}

function admLink(lid) {
  window.open('admin_link.php?lid='+lid,'link','height=500,width=580,scrollbars,resizable');
  return false;
}

States       = new Object();
States["al"] = new defObj('0','Alabama');
States["ak"] = new defObj('0','Alaska')
States["az"] = new defObj('0','Arizona')
States["ar"] = new defObj('0','Arkansas')
States["ca"] = new defObj('0','California')
States["co"] = new defObj('0','Colorado')
States["ct"] = new defObj('0','Connecticut')
States["de"] = new defObj('0','Delaware')
States["fl"] = new defObj('1','Florida')
States["ga"] = new defObj('0','Georgia')
States["hi"] = new defObj('0','Hawaii')
States["id"] = new defObj('0','Idaho')
States["il"] = new defObj('0','Illinois')
States["in"] = new defObj('0','Indiana')
States["io"] = new defObj('0','Iowa')
States["ka"] = new defObj('0','Kansas')
States["ky"] = new defObj('0','Kentucky')
States["la"] = new defObj('0','Louisiana')
States["me"] = new defObj('0','Maine')
States["md"] = new defObj('0','Maryland')
States["ma"] = new defObj('0','Massachusetts')
States["mi"] = new defObj('0','Michigan')
States["mn"] = new defObj('0','Minnesota')
States["ms"] = new defObj('0','Mississippi')
States["mo"] = new defObj('0','Missouri')
States["mt"] = new defObj('0','Montana')
States["ne"] = new defObj('0','Nebraska')
States["nv"] = new defObj('0','Nevada')
States["nh"] = new defObj('0','New Hampshire')
States["nj"] = new defObj('0','New Jersey')
States["nm"] = new defObj('0','New Mexico')
States["ny"] = new defObj('0','New York')
States["nc"] = new defObj('0','North Carolina')
States["nd"] = new defObj('0','North Dakota')
States["oh"] = new defObj('0','Ohio')
States["ok"] = new defObj('0','Oklahoma')
States["or"] = new defObj('0','Oregon')
States["pa"] = new defObj('0','Pennsylvania')
States["ri"] = new defObj('0','Rhode Island')
States["sc"] = new defObj('0','South Carolina')
States["sd"] = new defObj('0','South Dakota')
States["tn"] = new defObj('0','Tennessee')
States["tx"] = new defObj('0','Texas')
States["ut"] = new defObj('0','Utah')
States["vt"] = new defObj('0','Vermont')
States["va"] = new defObj('0','Virginia')
States["wa"] = new defObj('0','Washington')
States["dc"] = new defObj('0','Washinton,D.C.')
States["wv"] = new defObj('0','West Virginia')
States["wi"] = new defObj('0','Wisconsin')
States["wy"] = new defObj('0','Wyoming')

County       = new Object();
County["al"] = new defObj(0,'Alachua');
County["br"] = new defObj(0,'Baker');
County["bd"] = new defObj(0,'Bradford');
County["by"] = new defObj(0,'Bay');
County["bv"] = new defObj(0,'Brevard');
County["bw"] = new defObj(0,'Broward');    
County["ca"] = new defObj(0,'Calhoun');
County["ch"] = new defObj(0,'Charlotte');
County["cl"] = new defObj(0,'Clay');
County["ci"] = new defObj(0,'Citrus');
County["co"] = new defObj(0,'Collier');
County["cb"] = new defObj(0,'Columbia');
County["da"] = new defObj(0,'Dade');
County["de"] = new defObj(0,'DeSoto');
County["di"] = new defObj(0,'Dixie');
County["du"] = new defObj(0,'Duval');
County["es"] = new defObj(0,'Escambia');
County["fl"] = new defObj(0,'Flagler');
County["fr"] = new defObj(0,'Franklin');
County["ga"] = new defObj(0,'Gadsden');
County["gi"] = new defObj(0,'Gilchrist');
County["gl"] = new defObj(0,'Glades');
County["gu"] = new defObj(0,'Gulf');
County["ha"] = new defObj(0,'Hamilton');
County["hr"] = new defObj(0,'Hardee');
County["he"] = new defObj(0,'Hendrey');
County["ho"] = new defObj(0,'Hernando');
County["hi"] = new defObj(0,'Highlands');
County["hh"] = new defObj(0,'Hillsborough');
County["hs"] = new defObj(0,'Holmes');
County["ir"] = new defObj(1,'Indian River');
County["ja"] = new defObj(0,'Jackson');
County["je"] = new defObj(0,'Jefferson');
County["la"] = new defObj(0,'Lafayette');
County["lk"] = new defObj(0,'Lake');
County["le"] = new defObj(0,'Lee');
County["ln"] = new defObj(0,'Leon');
County["ly"] = new defObj(0,'Levy');
County["li"] = new defObj(0,'Liberty');
County["ma"] = new defObj(0,'Madison');
County["me"] = new defObj(0,'Manatee');
County["mn"] = new defObj(0,'Marion');
County["mt"] = new defObj(1,'Martin');
County["mo"] = new defObj(0,'Monroe');
County["na"] = new defObj(0,'Nassau');
County["oa"] = new defObj(0,'Okaloosa');
County["ok"] = new defObj(1,'Okeechobee');
County["or"] = new defObj(0,'Orange');
County["os"] = new defObj(0,'Osceola');
County["pb"] = new defObj(0,'Palm Beach');
County["pa"] = new defObj(0,'Pasco');
County["pi"] = new defObj(0,'Pinellas');
County["po"] = new defObj(0,'Polk');
County["pu"] = new defObj(0,'Putnam');
County["sr"] = new defObj(0,'Santa Rosa');
County["sa"] = new defObj(0,'Sarasota');
County["se"] = new defObj(0,'Seminole');
County["sj"] = new defObj(0,'St. Johns');
County["sl"] = new defObj(1,'St. Lucie');
County["su"] = new defObj(0,'Sumter');
County["sw"] = new defObj(0,'Suwannee');
County["ta"] = new defObj(0,'Taylor');
County["un"] = new defObj(0,'Union');
County["vo"] = new defObj(0,'Volusia');
County["wa"] = new defObj(0,'Walton');
County["wk"] = new defObj(0,'Wakulla');
County["wn"] = new defObj(0,'Washington');