function swapvis(obj,action) {
if (action == "visible") {
  document.getElementById(obj).style.visibility = "visible";
} else {
  document.getElementById(obj).style.visibility = "hidden";
}
}


function trim(stringToTrim) {
	return stringToTrim.replace(/^\s+|\s+$/g,"");
}

function iwcisubmit(x, r) {
// set submit target for xfer form
x = trim(x);
x = x.toUpperCase();
if (x == "WINE") {
    document.xfer.action = "wine.php?pixels=" + r;
  } else if (x == "EVENT") {
    document.xfer.action = "events.php?pixels=" + r;
  } else if (x == "INDEX") {
    document.xfer.action = "index.php?pixels=" + r;
  } else if (x == "TASTE") {
    document.xfer.action = "tasting.php?pixels=" + r;
  } else if (x == "CONSTRUCT") {
    document.xfer.action = "construct.php?pixels=" + r;
  } else if (x == "CONTACT") {
    document.xfer.action = "contact.php?pixels=" + r;
  } else if (x == "FAMILY") {
    document.xfer.action = "family.php?pixels=" + r;
  } else if (x == "FINDUS") {
    document.xfer.action = "findus.php?pixels=" + r;
  } else if (x == "CART") {
    document.xfer.action = "cart.php?pixels=" + r;
  } else if (x == "CLUB") {
    document.xfer.action = "wineclub.php?pixels=" + r;
  } else if (x == "BUY") {
    document.xfer.action = "buy.php?pixels=" + r;
  } else if (x == "ADMNINDEX") {
    document.xfer.action = "adminindex.php?pixels=" + r;
  } else if (x == "ADMNWINE") {
    document.xfer.action = "adminwine.php?pixels=" + r;
  } else if (x == "ADMNORDERS") {
    document.xfer.action = "adminorders.php?pixels= + r";
  } else if (x == "ADMNEVENTS") {
    document.xfer.action = "adminevents.php?pixels= + r";
  } else if (x == "ADMNMENU") {
    document.xfer.action = "adminmenu.php?pixels= + r";
  } else if (x == "ADMNCLIENTS") {
    document.xfer.action = "adminclients.php?pixels= + r";
  } else {
    document.xfer.action = "events.php?pixels=" + r;
  }
}



function setsource(newvalue) {
  document.xfer.source.value = newvalue;
}




function selectwinelist(index) {
  var sHTML, sPic, sGrapes, b, i, varcount, offset, strobj, suffix;

  spic = "";
  document.xfer.selectedwine.value = document.myform.winelistbox.options[index].text;
  
  // test for and strip *OUT and other suffix additions to wine name imbedded in string
  strobj = String(document.xfer.selectedwine.value);
  suffix = strobj.lastIndexOf(' *');
  if (suffix > -1) {
    document.xfer.selectedwine.value = strobj.substr(0, suffix);
  }

// offset is number of lines in xfer form prior to wine variables - set in pscripts when form is built
  offset = Number(document.xfer.formcount.value);
  // varcount from number of W*n variables built into $_POST - set in pscripts when form is built
  varcount = Number(document.xfer.wvarcount.value);
  b = 2 + (Number(document.xfer.numberofwines.value) * 7);
  for (i = offset; b; i= i + varcount ) {
	if (document.xfer[i + 1].value == document.xfer.selectedwine.value) {
      sPic = document.xfer.serverbottlesdir.value + document.xfer[i + 3].value;
	  sHTML = "<b>" + document.xfer[i + 6].value + "</b>";
	  break;
	}
  }
//alert("selected pic is " + sPic);
  a = document.xfer.selectedwine.value;
  if (a == "2002 Willamette Valley Chardonnay") {
    sGrapes = "graphics/grapebunchgreen60x46.gif";

  } else if (a == "2001 Willamette Valley Chardonnay") {
    sGrapes = "graphics/grapebunchgreen60x46.gif";

  } else if (a == "2003 Chardonnay") {
    sGrapes = "graphics/grapebunchgreen60x46.gif";

  } else if (a == "2004 Chardonnay Reserve Dundee Hills") {
    sGrapes = "graphics/grapebunchgreen60x46.gif";

  } else if (a == "2004 Chardonnay Willamette Valley") {
    sGrapes = "graphics/grapebunchgreen60x46.gif";

  } else {
    sGrapes = "graphics/grapebunchblue60x46.gif";
	
  }
  
  document.getElementById('bottle').src = sPic;
  document.getElementById('grapes').src = sGrapes;
  document.getElementById('winetext').innerHTML = sHTML;

}



function updqty($name,$newqty) {
  // updates qty ordered on cart page

//alert("name is " + $name + " new qty is " + $newqty);

  var $formcount = Number(document.xfer.formcount.value);
  // index is last numbers from name i.e. tableqty1 or tableqty2 ... starts at position 8 from a 0 based count
  // index references entry in $_SESSION['winelist'] NOT entry in $_SESSION['order'] which is used to fill cart list
  var $index = Number($name.substring(8));
  var $offset = Number($index * Number(document.xfer.wvarcount.value));
  var $qtyindex = $formcount + $offset + 2;
  var $priceindex = $formcount + $offset + 7;
  var $grossindex = $formcount + $offset + 4;
  $newqty = Number($newqty);
  
  // calculate new total qty
  document.xfer.totalqty.value = Number(document.xfer.totalqty.value) - Number(document.xfer[$qtyindex].value) + $newqty;

  //calculate new qty into $_POST['wqx']
  document.xfer[$qtyindex].value = $newqty;

  //calculate new gross into $_POST['wgx']
  var $gross = $newqty * Number(document.xfer[$priceindex].value);
  document.xfer[$grossindex].value = $gross;

  // resubmit cart page to display new numbers
  document.xfer.action = "cart.php";
  document.xfer.submit();
}




// jscripts version of identical function in pscripts
function getsummaryj($_type) {
$_return = 0;
$_i = 0;
if ($_type == "GROSS") {
  for ($i = 0; $i < document.xfer.numberofwines.value; $i++) {
    $_return = $_return + document.xfer[8 + index + 4].value;
  }
} else if ($_type == "DISCOUNT") {
  if (document.xfer.totalqty.value >= 12) {
	// gross * 15%
    $_return = document.xfer[8 + index + 4].value * .15;
  } else if (document.xfer.totalqty.value >= 6) {
	// gross * 10%
    $_return = document.xfer[8 + index + 4].value * .1;
  }
} else if ($_type == "TAX") {
	$_return = 0;
} else if ($_type == "SHIPPING") {
	$_return = 0;
}
return $_return;
}




function buttonaction() {
  var x=buttonaction.arguments;
  MM_swapImgRestore()
  if (x[0] != null) P7_trigMM2(x[0]);
  if (x[1] != null) MM_swapImage(x[1],x[2],x[3],x[4]);
  if (x[5] != null) MM_swapImage(x[5],x[6],x[7],x[8]);
  if (x[9] != null) MM_swapImage(x[9],x[10],x[11],x[12]);
  if (x[13] != null) MM_swapImage(x[13],x[14],x[15],x[16]);
}



function getres(check) {

  if (document.frm == null) return;

  document.frm.pixels.value = screen.width; 
  document.frm.submit();
}



function getfullres(check) {

  if (document.frm == null) return;

  document.frm.pixels.value = screen.width; 
  document.frm.height.value = screen.height; 
  document.frm.submit();
}



function getpic(x) {
  var pic = document.barrelcart.src;
  var pos = pic.lastIndexOf('.');
  var ext = pic.substr(pos);
  if (pos > 0) {
    pic = pic.substr(0, pos) + x + ext;
  } else {
    pic = x;
  }
return (pic);
}



function iwciSwapText(obj,txt) {
  // pass in object, swaps .innerHTML between original and new texts

  // EXAMPLE of standard swap
  // iwciSwapText(objname, "blah blah ...") -> stores current .innerHTML in iwciswaptext and sets .innerHTML to text
  // iwciSwapImage(objname, "")  -> if iwciswaptext exists for object, then reset innerHTML to iwciswaptext and release iwciswaptext

  if (document.xfer.browser.value == "IE") {
    if (obj.getAttribute("iwciswaptext") != null) {
      var exists = true;
      var hasbg = true;
    } else {
      var exists = false;
      var hasbg = false;
    }
  } else {
    var exists = obj.hasAttribute("iwciswaptext");
    var hasbg = obj.hasAttribute("iwcibg");
  }
  var bg = "";
  
  if (txt == "") {
    // reset text back to original if existed
    if (exists == true) {
      txt = obj.iwciswaptext;
      obj.removeAttribute("iwciswaptext");
    }
    if (hasbg == true) {
      bg = obj.iwcibg;
      obj.removeAttribute("iwcibg");
    }
  } else {
    // establish iwcitext, fill then go to new text
    var orgtext = obj.innerHTML;
	bg = obj.src
    obj.setAttribute("iwciswaptext", "");
    obj.iwciswaptext = orgtext;
    obj.setAttribute("iwcibg", "");
    obj.iwcibg = obj.src;
  }
  obj.innerHTML = txt;
  obj.src = bg;
  return (txt);
}



function iwciSwapImage(obj,pic) {
  // pass in object name, swaps .src between orig and new pic
  // look for "." in pic, if found, then assume pic name for std swap

  // EXAMPLE of standard swap
  // iwciSwapImage(objname, "newPicName") -> stores current .src in iwciswappic and sets .src to newPicName
  // iwciSwapImage(objname, "")           -> if iwciswappic exists for object, then reset src to iwciswappic and release iwciswappic

  // EXAMPLE of specified swap
  // iwciSwapImage(objname, "_over")      -> if current .src has _over in name, removes it, else adds it then resets src to new name

if (obj.src.indexOf(pic) > 0 && pic != "_over") {
  // desired picture already displayed, skip function
} else {
  var pos = pic.lastIndexOf('.');
  if (document.xfer.browser.value == "IE") {
	if (obj.getAttribute("iwciswappic") != null) {
      var exists = true;
    } else {
      var exists = false;
    }
  } else {
    var exists = obj.hasAttribute("iwciswappic");
  }

  if (pos > 0 || exists == true) {
    // assume standard swap function
    if (pic == "") {
      // reset pic back to original if existed
      if (exists == true) {
	    pic = obj.iwciswappic;
        obj.removeAttribute("iwciswappic");
      }
    } else {
      // establish iwcipic, fill then go to new pic
      var orgpic = obj.src;
      obj.setAttribute("iwciswappic", "");
      obj.iwciswappic = orgpic;
    }
  } else {
    // no pic name and no earlier std swap, so assume special swap using pic as suffix
    var suffix = pic;
    pic = obj.src;
    pos = pic.lastIndexOf('.');
    var ext = pic.substr(pos);
    pos = pic.lastIndexOf(suffix);
    if (pos > 0) {
      // strip suffix from graphic
      pic = pic.substr(0, pos) + ext;
    } else {
	  // add suffix to graphic
      pos = pic.lastIndexOf('.');
      pic = pic.substr(0, pos) + suffix + ext;
    }
  }

  obj.src = pic;
}
return (pic);
}



function getstate() {
  // set initial state of barrel - full or not (if _over then full)
  var x = document.barrelcart.src;
  document.xfer.barrelpic.value = x;
  if (x.indexOf("_OVER") > 0) {
    document.xfer.barrelstate.value = "FULL";
  } else {
    document.xfer.barrelstate.value = "EMPTY";
  }
  document.barrelcart.src = document.xfer.barrelpic.value;
}



function addqty() {
  var tq = parseInt(document.xfer.totalqty.value);
  var qt = parseInt(document.myform.qty.value);
  var nw = parseInt(document.xfer.numberofwines.value);
  var xq = 0;
  var q = "";
  var n = "";
  
  document.xfer.totalqty.value = tq + qt;
  document.xfer.barrelstate.value = "FULL";
  document.xfer.barrelpic.value = document.xfer.servergraphicsdir.value + "btnbarrelbottletxt.jpg";
  document.barrelcart.src = document.xfer.barrelpic.value;

  for (i = 0; i < nw; i++) {
    q = "wq" + i;
    n = "wn" + i;
    if (document.xfer[n].value == document.xfer.selectedwine.value) {
      xq = parseInt(document.xfer[q].value);
      document.xfer[q].value = xq + qt;
      break;
	}
  }
}


////
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}



function newWindow() {
  mapwindow = window.open("images/mapdetailyahoo.jpg", "mapwin", "width=399, height=385")
}



function javaWindow(url,name,w,h)
{
	javaWin = window.open(url, name, 'width='+w+','+'height='+h+',scrollbars=yes,resizable=yes');
}



function openWindow(url,name, width, height)
{
	var popupWin;
	if (popupWin && !popupWin.closed)
	{
		popupWin.close();
	}
	var attr = 'scrollbars=no,status=yes,width=' + width + ',height= ' + height  +',left=1,top=1,resizable=1';
	popupWin = window.open(url, name, attr);
	popupWin.focus();
}



function Go(){return}



function FrontPage_Form1_Validator(theForm)
{

  if (theForm.Name.value == "")
  {
    alert("Please enter a value for the \"Name\" field.");
    theForm.Name.focus();
    return (false);
  }

  if (theForm.Name.value.length > 50)
  {
    alert("Please enter at most 50 characters in the \"Name\" field.");
    theForm.Name.focus();
    return (false);
  }

  if (theForm.namelast.value == "")
  {
    alert("Please enter a value for the \"namelast\" field.");
    theForm.namelast.focus();
    return (false);
  }

  if (theForm.namelast.value.length > 50)
  {
    alert("Please enter at most 50 characters in the \"namelast\" field.");
    theForm.namelast.focus();
    return (false);
  }

  if (theForm.ZipCode.value == "")
  {
    alert("Please enter a value for the \"ZipCode\" field.");
    theForm.ZipCode.focus();
    return (false);
  }

  if (theForm.ZipCode.value.length > 12)
  {
    alert("Please enter at most 12 characters in the \"ZipCode\" field.");
    theForm.ZipCode.focus();
    return (false);
  }

  if (theForm.EmailAddress.value == "")
  {
    alert("Please enter a value for the \"EmailAddress\" field.");
    theForm.EmailAddress.focus();
    return (false);
  }

  if (theForm.EmailAddress.value.length > 50)
  {
    alert("Please enter at most 50 characters in the \"EmailAddress\" field.");
    theForm.EmailAddress.focus();
    return (false);
  }

  return (true);
}



function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}



function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}



function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}



function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; 
  for(i=0; a&&i<a.length&&(x=a[i])&&x.oSrc; i++)
    x.src=x.oSrc;
}



function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments;
  document.MM_sr=new Array;
  for(i=0; i<(a.length-2); i+=3)
   if ((x=MM_findObj(a[i]))!=null){
	 document.MM_sr[j++]=x;
	 if(!x.oSrc)
	   x.oSrc=x.src;
	   x.src=a[i+2];
   }
}



function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}



function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}



function MM_nbGroup(event, grpName) { //v6.0
  var i,img,nbArr,args=MM_nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = MM_findObj(args[2])) != null && !img.MM_init) {
      img.MM_init = true; img.MM_up = args[3]; img.MM_dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
        if (!img.MM_up) img.MM_up = img.src;
        img.src = img.MM_dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.MM_nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = (img.MM_dn && args[i+2]) ? args[i+2] : ((args[i+1])? args[i+1] : img.MM_up);
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.MM_nbOver.length; i++) {
      img = document.MM_nbOver[i]; img.src = (img.MM_dn) ? img.MM_dn : img.MM_up; }
  } else if (event == "down") {
    nbArr = document[grpName];
    if (nbArr)
      for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.MM_up; img.MM_dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = img.MM_dn = (args[i+1])? args[i+1] : img.MM_up;
      nbArr[nbArr.length] = img;
  } }
}

//MenuMagic II scripts by PVII
//www.projectseven.com
//Copyright(c) 2002, All Rights Reserved

function P7_setMM2(){ //v2.0 by PVII
 //set the image over and down name convention
 document.p7TabOver="_over";
 document.p7TabDown="_down";
 
 var dt=false;
 if(document.getElementsByTagName){
  dt=true;
 }
 if(document.P7TabBar){
  return;
 }
 
 var i,k=-1,g,x,gg,tl,ts,ti,tm,tt,tsn,tu,el,args=P7_setMM2.arguments;
 P7TabProp=new Array();
 for(i=0;i<args.length;i++) {
   P7TabProp[i]=args[i];
 }
 
 P7TabIM=new Array();
 P7TabSB=new Array();
 if(dt) {
   tm=document.getElementsByTagName("IMG");
 } else {
   tm=document.images;
 }
 tm=document.images;
 
 tt=new Array();
 tt=tt.concat(tm);
 if(document.layers){for(i=0;i<document.layers.length;i++){ti=document.layers[i].document.images;
 if(ti){tt=tt.concat(ti);}for(x=0;x<document.layers[i].document.layers.length;x++){
 ti=document.layers[i].document.layers[x].document.images;if(ti){tt=tt.concat(ti);}}}tm=tt;}
 for(i=0;i<tm.length;i++){tl=tm[i].name; if(dt&&!tl){tl=tm[i].id;}
 if(tl.indexOf("p7TBim")==0){ts=tl.replace("p7TBim","");
 tsn="p7TBsub"+ts;k++;P7TabIM[k]=tl;if((g=MM_findObj(tsn))!=null){P7TabSB[k]=tsn;
 gg=(document.layers)?g:g.style;gg.visibility="hidden";}else{P7TabSB[k]='N';}}}
 document.P7_TBswapd=new Array();document.P7_TBswapo=new Array();for(i=0;i<P7TabIM.length;i++){
 g=MM_findObj(P7TabIM[i]);gg=g.src;g.p7TBim=g.src;tu=gg.lastIndexOf(".");
 g.p7TBimo=gg.substring(0,tu)+document.p7TabOver+gg.substring(tu,gg.length);
 g.p7TBimd=gg.substring(0,tu)+document.p7TabDown+gg.substring(tu,gg.length);
 if(P7TabProp[2]>1){document.P7_TBswapo[i]=new Image();document.P7_TBswapo[i].src=g.p7TBimo;}
 if(P7TabProp[2]>0){if(P7TabProp[2]==3){g.p7TBimd=g.p7TBimo;}document.P7_TBswapd[i]=new Image();
 document.P7_TBswapd[i].src=g.p7TBimd;}}if((g=MM_findObj('P7TabH'))!=null){gg=(document.layers)?g:g.style;
 gg.visibility="hidden";}if(dt&&P7TabProp[3]!='none'&&!window.opera){
 g=document.getElementsByTagName("A");for(i=0;i<g.length;i++){if(g[i].hasChildNodes()){el=g[i].firstChild;
 while (el){if(el.nodeType==3){gg=el.nodeValue;if(P7TabProp[3]==gg.replace("\n","")){
 g[i].className=P7TabProp[4];break;}}el=el.firstChild;}}}}document.P7TabBar=true;
}

function P7_trigMM2(bu){ //v2.0 by PVII
 if(!document.P7TabBar){return;}var i,g,d,dB=-1,tF=false,sF=false;
 for(i=0;i<P7TabSB.length;i++){sF=false;if((g=MM_findObj(P7TabSB[i]))!=null){g=MM_findObj(P7TabSB[i]);
 gg=(document.layers)?g:g.style;sF=true;}d=MM_findObj(P7TabIM[i]);if(P7TabIM[i]==P7TabProp[0]){
 dB=i;}if(P7TabIM[i]==bu){tF=true;if(sF){gg.visibility="visible";}if(P7TabProp[2]>0){
 if(i==dB){d.src=d.p7TBimd;}else if (P7TabProp[2]>1){d.src=d.p7TBimo;}}if((g=MM_findObj('P7TabH'))!=null){
 gg=(document.layers)?g:g.style;gg.visibility="visible";}}else{if(sF){gg.visibility="hidden";}
 if(P7TabProp[2]>0){d.src=d.p7TBim;}}}if(!tF){if(dB>-1){d=MM_findObj(P7TabIM[dB]);
 if((g=MM_findObj(P7TabSB[dB]))!=null&&P7TabProp[1]==0){gg=(document.layers)?g:g.style;
 gg.visibility="visible";}if(P7TabProp[2]>0){d.src=d.p7TBimd;}}
 if((g=MM_findObj('P7TabH'))!=null){gg=(document.layers)?g:g.style;gg.visibility="hidden";}}
}



function floor(number)
{
  return Math.floor(number*Math.pow(10,2))/Math.pow(10,2);
}



function dosum()
{
  var int_perc = document.mortgage.rate.value / 1200;
  var counter = 1;
  var base = 1 + int_perc;
  for (i=0; i<document.mortgage.years.value * 12; i++)
  {
    counter = counter * base
  }
  document.mortgage.pr_int.value  = floor(document.mortgage.amount.value * int_perc / ( 1 - (1/counter)))
  document.mortgage.tax_pmt.value = floor(document.mortgage.tax.value / 12)
  document.mortgage.ins_pmt.value = floor(document.mortgage.insurance.value / 12)
  var sum_pmt = document.mortgage.amount.value * int_perc / ( 1 - (1/counter)) +
	document.mortgage.tax.value / 12 +
	document.mortgage.insurance.value / 12;
  document.mortgage.payment.value = floor(sum_pmt);
}