// © Arthur R. Brock rev. 02-28-2005
CartName = 'qqq8883051555';
var SnumDays = 1;
var dept = 1;
var piL = 1;
var cpath = "/";
var Quotep = "order.htm"

function WCky(itemp, urlp, cmtp, qtyp) {
	if ( Cnum >=180 ) {
		alert ("REQUEST NOT ADDED--36 REQUESTS LIMIT, PLEASE CHECKOUT!"); return; }
	else  {
		alert(itemp + " Info Request Added to List.\n\nPLEASE fill-in the Contact Form when done adding,\notherwise your question(s) won't be transmitted to us.\nThanks.");
		var expire=new Date ();
		expire.setTime (expire.getTime() + (SnumDays * 24 * 3600000));
		var Oo=expire ;
	
	Cnum+=5; l=Cnum/5;
	ShC[l].ItemC=itemp;
	ShC[l].StockC=location.href;
	ShC[l].UPriceC=document.pssFrm.cmt01.value;
	ShC[l].QtyC=document.pssFrm.PrQuo.checked;
	ShC[l].DeptC=dept;

	var k=1
	for (var j=1; j <=Cnum; j+=5)  {
		Oo=Oo + '`' + NullC(ShC[k].ItemC);
		Oo=Oo + '`' + NullC(ShC[k].StockC);
		Oo=Oo + '`' + NullC(ShC[k].UPriceC);
		Oo=Oo + '`' + NullC(ShC[k].QtyC);
		Oo=Oo + '`' + NullC(ShC[k].DeptC); k++; }

	document.cookie=CartName +"=" + escape (Oo) +
		"; expires=" + expire.toGMTString() +
		"; path=" + cpath + ";"
	}
}

function UpC() {
	CVal= GCk(CartName);
	InitCData();
	Cnum=CountC();
        if ( Cnum==0 ) {
		return; }
        if ( Cnum >=180 ) {
		alert ("REQUEST NOT ADDED--36 REQUESTS LIMIT, PLEASE CHECKOUT!"); return; }
	else {

	var k=1
	for (var j=1; j <=Cnum; j+=5)  {
		ShC[k].ItemC=CPr(CVal,j);
		ShC[k].StockC=CPr(CVal,j+1);
		ShC[k].UPriceC=CPr(CVal,j+2);
		ShC[k].QtyC=CPr(CVal,j+3);
		ShC[k].DeptC=CPr(CVal,j+4); k++; }
	}
}

function NullC(tnt) {
	if (tnt=="") return "-";
	return tnt;
}

function GCk(CKn) {
	var cname=CKn + "=";
	var i=0;
	while (i < document.cookie.length) {
		var m=i + cname.length;
	if (document.cookie.substring(i, m)==cname){
		var leng=document.cookie.indexOf (";", m);
	if (leng==-1) leng=document.cookie.length;
		return unescape(document.cookie.substring(m, leng));
    }
	i=document.cookie.indexOf(" ", i) + 1;
	if (i==0) break;
  }
	return "-";
}

function CPr(cookieValue, citem) {
	var indx=0, citemlen=0;
	if ( cookieValue==null ) return "-"
	if ( cookieValue=="-"  ) return "-"
	for(var i=0; i < citem; i++) {
		indx=( citem==0 )?0:cookieValue.indexOf("`", indx + 1)+1;}
	citemlen=(cookieValue.indexOf("`",indx)>0)
	?cookieValue.indexOf("`", indx+1):cookieValue.length;
	return cookieValue.substring(indx, citemlen);
}

function CountC()   {
	var Ccnt=0
	smstring="`"
	lrgstring=CVal

        strlen1=smstring.length
        strlen2=lrgstring.length
        for (i=0;i<=strlen2;i++) {
		comp=lrgstring.substring(i-1,strlen2)
		comp=comp.substring(0,strlen1)
		if (comp==smstring) {
		Ccnt++;
                }
        }

	return Ccnt;
}

function InitCData() {
	ShC=new MkZ(36);
	for (var i=1; i<=36; i++) {
	ShC[i]=new shopobj(0,0,0,0,0)}
}

function MkZ(n) {
	this.length=n
	for (var i=1; i<=n; i++) {
		this[i]=0
	}
	return this
}

function shopobj(ItemC, StockC, UPriceC, QtyC, DeptC) {
	this.ItemC=ItemC
	this.StockC=StockC
	this.UPriceC=UPriceC
	this.QtyC=QtyC
	this.DeptC=DeptC
}

function BildZ(n) {
	this.length=n
	for (var i=0; i<=n; i++) {
	this[i]=0
	}
	return this
}

function pj(name, sN, uP, manu) {
	this.name=name
	this.sN=sN
	this.uP=uP
	this.manu=manu
}

function goQuote() {
	location.href = Quotep
}

function ProdCount() {
	CVal= GCk(CartName);
	InitCData();
	Cnum=CountC();

	return Cnum/5
}

function rollon() {
	if (window.event.srcElement.className == "item") {
	window.event.srcElement.className = "highlight";
	}
}

function rolloff() {
	if (window.event.srcElement.className == "highlight") {
	window.event.srcElement.className = "item"
	}
}

pL=new BildZ(piL)
// item, sN stock#, uP unitprice, manufacturer

document.onmouseover = rollon;
document.onmouseout = rolloff;
