// alert("MINIKADO.JS wird geladen ...");
// ------------
// function GetNav()
// function ssplit(cStr,cSep)
// function Str(nVal,nDig,nDec)
// ---
// function ShowForm()
// function ReadArtForm(oForm)
// function gSetArtForm(cArt,nFormCt)
// function GetArtS(cArtB)
// function GetSelection(cArtB)
// function gSetOpt(oForm)
// function Nav2Chk31
// function StartFrame3
// ---
// function PosAdd(cArtB,cArtG,cText,nMng,nVk)
// function InitValues()
// function SetValue(cKey,cValue)
// function GetValue(cKey)
// 

var gcVer=GetNav();
var gcValueS="x";
var gcArtS="";
var gcArtAS="";
var gcArtMaxS="";
var gnArtSuch=0;
var gnAnzPos=0;
var gcCartMsg="";
var gnOrder=0; // wird in ´HT31Displ.HTM´ und ´HT32AdrErf.HTM´ verwendet
var gnSL=2000; // vgl. HT2nOKatU.HTM
var gnGewSp=0;
var gcLand="D-";
var gcZahlung="z"
var gcNews="NONEWS";
var gnPortoA=0;
var gnVkG=0;
var gcAmount="";
var nSaveLand=0;
var goParWin=window.parent.parent;
var cPayUrl1="https://www.selex-versand.de/k/a/erfassung.php?"
var gcOrd="";
var gcCardOK="";
var gcSuchGr="XXX";
var gnGrIndexSelect=0;
var gcFilterSex="";

var gcSonderReduziert="Nein";
var gnSonderReduziert=1;
var gnEurorabatt=0;

SonderReduziertab  = new Date("september 25, 2008 00:00:01"); //Monate ENGLISCH und KLEIN schreiben!!
SonderReduziertbis = new Date("september 25, 2008 21:17:01"); //Monate ENGLISCH und KLEIN schreiben!!

Heute = new Date();
Portofreiab = new Date("september 4, 2009 00:00:01"); //Monate ENGLISCH und KLEIN schreiben!!
Portofreibis = new Date("september 6, 2009 23:59:59");
if ((Heute>Portofreiab) && (Heute<Portofreibis))
 {gnPorto=0.00;}
 else
 {gnPorto=5.95;}



// ---
gcSepF="§"; // Separator; vgl hierzu auch SHOP.PL !
gcSepV="~";
// ------------
function GetNav()
	{
	var cVer=navigator.appVersion.charAt(0);
	var cOpe=navigator.userAgent;
	if (cOpe.indexOf("Opera")>=0)
		{cOpe="Opera"}
	if (navigator.appName=="Netscape")
	   {
	   	if (cVer<="3")
				{cVer="N4";}
			else
				{cVer="N"+cVer;}
		}
	else
		{
			if (cVer<="3")
				{cVer="M4";}
			else
				{cVer="M"+cVer;}
		}
	if (cOpe=="Opera")
		{cVer="N4O";}
	return cVer;
	}
   
// ------------
function NavToArtVar(cString)
	{
	top.gcOKat=cString.charAt(0);
	top.gcMKat=cString.substr(1,1);
	top.gcUKat=cString.substr(2,3);
	if (cString.charAt(0)=="M")
		{top.gcWKat=cString.substr(1,cString.length-1)}
	if ((cString.length==6) && (cString!="Mlemmi"))
		{top.gcSKat=cString.substr(5,1);}
		else
		{top.gcSKat=1;}					// zur Kategorienseite, 0 würde unten Startseite anzeigen
	top.gcFr=cString.substr(0,5);		// auf 5 Stellen verkürzen, da ausgewertet
	return true;
	}
// ------------
function StartVarReset()
	{
	top.gcOKat="X";
	top.gcMKat="X";
	top.gcUKat="XXX";
	top.gcAr="AAA";
	return true;
	}
// ------------
function NavToArtFs2()
	{
	top.c2MKat="Y";
	if ((top.gcOKat=="S") || (top.gcOKat=="K"))
		{top.gcFrame2="/HTML/HT20FS.HTM";}
	else 
		{top.gcFrame2=top.cPf+"/HTML/HT2nOKat" + top.gcOKat + ".HTM";}
	return true;
	}
// ------------
function Nav2Chk31(nWin)
	{
	if ((top.gnShowForm==0) && (nWin=1))
		{
		top.frames[2].location="HT30FrSet.HTM";
		}
	if ((gnShowForm==1) && (nWin=0))
		{
		top.frames[2].location="HT_LEER.HTM";
		top.gnShowForm=0;
		}
	return top.gnShowForm;
	}
// ------------
function StartFrame3(pPf,nMode)
	{
	var l1=false
	var cYY=pPf+"START30NEU";
	if (nMode==1)									//Startbild in Frame3
		{
		if ((top.gcOKat=="U") && (top.gcUKat=="LEM"))
			{cYY=pPf+"HT30OKatU.HTM";}
		if (top.gcOKat=="L")
			{cYY=pPf+"HT30OKatL.HTM";}
		}
	if ((nMode==2) || (nMode==3) || (nMode==4))		//Reguläre M_ Seite Laden in FS
		{
		if (top.gcOKat=="U")
			{cYY=pPf+"MI_ART/U_"+top.gcUKat+".HTM";}
		if (top.gcOKat=="G")
			{cYY=pPf+"MI_ART/G_"+top.gcUKat+".HTM";}
		if (top.gcOKat=="K")
			{cYY=pPf+"MI_ART/M_K_"+top.gcUKat+".HTM";}
		if (top.gcOKat=="L")
			{cYY=pPf+"MI_ART/M_K_"+top.gcUKat+".HTM";}
		if (top.gcOKat=="S")
			{cYY=pPf+"MI_ART/M_S_"+top.gcUKat+".HTM";}
		if (top.gcOKat=="W")
			{cYY=pPf+"MI_ART/M_W_WWW.HTM";}
		if (top.gcOKat=="F")
			{cYY=pPf+"MI_ART/M_F_FFF.HTM";}
		if (top.gcOKat=="M")
			{cYY=pPf+"kindermode-"+top.gcWKat+".htm";}
		if (nMode=3)
			{cYY=cYY+"#"+top.gcAr;}
		}
	return cYY;
	}
// ------------
function ssplit(cStr,cSep)
	{
	if (gcVer.charAt(0)=="M")
		{
		var cLStr=cStr;
		var acV= new Array();
		var nCt=0;
		var nAt=cLStr.indexOf(cSep);
		while (nAt>0)
			{acV[nCt]=cLStr.substring(0,nAt);
			nCt++;
			cLStr=cLStr.substring(nAt+1,cLStr.length)
			nAt=cLStr.indexOf(cSep);
			}
		acV[nCt]=cLStr;
		}
	else
		{
		acV=cStr.split(cSep);
		if (acV.length<2)
			{acV[1]="";}
		}
   return acV;
	}

// ------------
function Str(nVal,nDig,nDec)
	{
	cXX=""+nVal;
	nAt=cXX.indexOf(".");
	if (nDec>0)
		{
		if (nAt>=0)
			{if ( (cXX.length-1)-nAt<nDec )
				{cXX=cXX+"0000000000";
				}
			cXX=cXX.substring(0,nAt+3);
			}
		else
			{cXX=cXX+".00";
			}
		}
	else
		{if (nAt>=0)
			{
			cXX=cXX.substring(0,nAt);
			}
		}

	nAt=cXX.length;
	if (nAt<nDig)
		{cXX="         "+cXX;
		nAt=cXX.length;
		}
	cXX=cXX.substring(nAt-nDig,nAt);

	return cXX
	}

// ------
function ShowForm()
	{if (window.frames[1].nShowForm==1)
		{return true;}
	else
		{return false;}
	}
	
// ------

// ------
function ReadArtForm(oForm)
	{
	oForm.cArtG.value=oForm.GrListe.options[oForm.nOInd.value].value;
	nMngM=0;
	nMsg=0;
	cMsg="";
	nCt=1;
	while ((nCt>0) && (nCt<7))
		{
		if (nCt==1)
			{
			if (gnAnzPos>=10)
				{cMsg="Es sind leider nur 10 Positionen pro Bestellung möglich !"
				nCt=-1;
				}
			if ((goParWin.gcOrd!="") && (top==self)) // goParWin nicht unter BabyWelt
				{cMsg="Während der Kredit-Karten-Transaktion keine Bestellung möglich"
				nCt=-1;
				}
			}
		
		if (nCt==2)
			{
			cArtS=GetArtS(oForm.cArtB.value);
			if (cArtS.length>0)
				{
				nMsg=1; // cArtB gefunden
				cArtB=oForm.cArtB.value;
				cText=cArtS.substring(0,40); // cText.length=40 !!!
				cMsg=cArtB+" "+cText+"\n";
				}
			else
				{
				cMsg=cMsg+"Artikel "+oForm.cArtB.value+" ist leider ausverkauft!";
				nCt=-1;
				}
			}
		
		if (nCt==3)
			{
			nAt=oForm.cArtG.value.length
			if (nAt<3)
				{
				oForm.cArtG.value="000"+oForm.cArtG.value;
				oForm.cArtG.value=oForm.cArtG.value.substring(nAt,nAt+3);
				}
			nAt=-1;
			nAt=cArtS.indexOf("g"+oForm.cArtG.value);
			if (nAt>=0)
				{
				nMsg=3; // cArtG gefunden
				cArtG=oForm.cArtG.value;
				nMngM=parseInt(cArtS.substring(nAt+4,nAt+7));
				// Achtung Aktionsreduzierung //
				nVk=parseFloat(cArtS.substring(nAt+7,nAt+13));
				if ((Heute>SonderReduziertab && Heute<SonderReduziertbis) || (gcSonderReduziert=="Ja" && gnSonderReduziert<1))
					{
					nVk=parseFloat(Str(gnSonderReduziert * nVk,6,2));
					}
				if (gnEurorabatt>0)
					{
					nVk=parseFloat(Str(nVk - gnEurorabatt,6,2));
					}
				// ENDE Aktionsreduzierung
				cMsg=cMsg+"Gr.: "+oForm.cArtG.value+"  "+nVk+" DM"+"\n\n";
				nMng=parseInt(oForm.nMng.value);
				}
			else
				{
				cMsg=cMsg+"Größe "+oForm.cArtG.value+" wird nicht angeboten!";				
				nCt=-1;
				}
			}
		if (nCt==4)
			{
			if (gcArtS.indexOf("*"+cArtB+cArtG)>=0)
				{
				cMsg=cMsg+"Artikel "+cArtB+" ist in Gr. "+cArtG+" bereits notiert!\n";
				cMsg=cMsg+"Lassen Sie sich bitte den Bestellzettel anzeigen und \n";
				cMsg=cMsg+"verändern Sie dort die entsprechende Position.";
				nCt=-1;
				}
			else
				{
				if (gcArtAS.indexOf("*"+cArtB+cArtG)>=0)
					{
					cMsg=cMsg+"Artikel "+cArtB+" ist in Gr. "+cArtG+" bereits mit vorheriger Bestellung bestellt worden!";
					cMsg=cMsg+"\nSoll der Artikel hier noch einmal aufgenommen werden ?";
					if (!confirm(cMsg))
						{
						nCt=-1;
						}
					cMsg="";
					}
				}
			}

		if (nCt==5)
			{
			if (nMng<=nMngM)
				{nMsg=4;} // bestellte Menge vorh.
			else
				{
				cMsg=cMsg+"Bestand Größe "+cArtG+" : nur noch "+nMngM+" !";
				nCt=-1;
				}
			}

		if (nCt==6)
			{if (nMng>0)
				{nMsg=5;} // Menge OK
			else
				{
				cMsg=cMsg+"Bitte Bestellmenge eingeben !";
				nCt=-1;
				}
			}
		nCt++;
		}
		
	if (nCt<=0)
		{
		if (cMsg.length>0) // vgl. nCt==4
		{alert(cMsg);}
		nMsg=0;
		cMsg="";
		}
	else
		{
//		PosAdd(cArtB,cArtG,cText,nMng,nVk,nMngM);
// function	PosAdd(cArtB,cArtG,cText,nMng,nVk,nMax)
//	{
	if(top==self)
	{goParWin.gnVkG=goParWin.gnVkG + (nMng*nVk);}   // Warenwert Zugang minikado.de
	if(top!=self)
	{gnVkG=gnVkG + (nMng*nVk);}   // Warenwert Zugang babywelt.de
	gcArtS=gcArtS+"*"+cArtB+cArtG;
	gcArtMaxS=gcArtMaxS+Str(nMngM,3,0);
	// alert(" Test : "+gcArtMaxS);
	if(top==self)
		{oWin=window.frames[2].frames[0];}
	if(top!=self)
		{oWin=top.frames[1].frames[2].frames[0];}
	//	acValueS= ssplit(gcValueS,gcSepF); // Separator
	// alert(" 1:"+acValueS[acValueS.length-1]+"\n"+gcArtS);
	gnAnzPos++;
	//    				 0     3     6     46            47           =53
	if ((top.gnSonderReduziert<1) || (top.gnEurorabatt>0))
		{cPxxXX="S";}
	else
		{cPxxXX="N";}
	lXX=SetValue("pos",cArtB+cArtG+cText+Str(nMng,1,0)+Str(nVk,6,2)+cPxxXX, 1);
//	alert(cPxxXX);

	gcCartMsg="<FONT color=#CC0000>Art. "+cArtB+" Gr. "+cArtG+" notiert</FONT>";
	if (gcVer=="N3")
		{delayms(500);}
	if ((gcVer.charAt(0)=="N") || (gcVer.charAt(1)>="4"))
		{cXX="../";}
	else
		{cXX="";}
	if (gnArtSuch==1)
		{cXX="../HTML/";}
	oWin.location.href=cXX+"HT31Displ.HTM";
//	return true;
//	}

		}

	return false;
	}

// ------------
function gSetArtForm(cArt,nFormCt,nMode)
	{
	var cForm="";
	if (nMode==1)
		{
		var cXX=GetSelection(cArt);
		if (cXX.length>0)
			{
			// cForm="<TABLE border=0><TR><TD height='10' valign='TOP'>";
			cForm=cForm+"<FORM name='A"+cArt+"' onSubmit='return goParWin.ReadArtForm(document.A"+cArt+")'>";
			cForm=cForm+"<input type='hidden' name='cArtB' value='"+cArt+"'>";
			// cForm=cForm+"Gr&ouml;&szlig;e: <input type='text' name='cArtG' value='' size='3' maxlength='3'>";
			cForm=cForm+"<input type='hidden' name='cArtG' value=''><input type='hidden' name='nOInd' value=0>";
			cForm=cForm+cXX+"<br><br>";
			cForm=cForm+"Menge: <input type='text' name='nMng' value=1 size='1' maxlength='1'>";
			cForm=cForm+"<br>";
			// cForm=cForm+"<input type=image src='../../PICT_NEU/CART_NOTIERENx.GIF' width='70' height='25'>";
			cForm=cForm+"</FORM>";
			}
		}
	if (nMode==2)
		{
		if (gcVer.charAt(1)=="3")
			{cXX="";}
		else
			{cXX="onMouseOver='MouseDrueber("+nFormCt+")' onMouseOut='MouseRunter("+nFormCt+")'";}
		cForm="<A href='javascript:FormSubmit("+nFormCt+")'"+cXX+">";
		cForm=cForm+"<img src='/PICT_NEU/CART_NOTIERENx.GIF' border='0' alt='Position notieren'></A>";
		// cForm=cForm+</TD></TR></TABLE>";
		}
	
	return cForm
	}
// ------------
function GetArtS(cArtB)
	{
	var cLArtS=window.frames[2].frames[1].gcArtS;
	var nAt= cLArtS.indexOf("a"+cArtB);
	if (nAt>=0)
		{
		nLen= parseInt(cLArtS.substring(nAt+7,nAt+10));
		//alert(nLen);
		cArtS=cLArtS.substring(nAt+11,nAt+nLen);
		//alert("--"+cArtS+"--");
		}
	else
		{cArtS="";}
	return cArtS;
	}

// ------------
function GetSelection(cArtB)
	{
	top.gnGrIndexSelect=0;
	nGrIndexSelect=0;
	cRet="";
	cArtS=GetArtS(cArtB);
	if (cArtS.length>0)
		{
		cArtS=cArtS.substring(41,cArtS.length);
		while (cArtS.charAt(0)=="g")
			{
			cArtG=cArtS.substring(1,4);
			if (cArtS.substring(1,4)==top.gcSuchGr)
			{
			top.gnGrIndexSelect=nGrIndexSelect;
			// die Hintergrundfarbe der Selektion
			cRet=cRet+"<OPTION value='"+cArtG+"' style='background-color:#CCFFCC;' size='3' maxlength='3' >"+cArtG+" ";
			}
			else
			{cRet=cRet+"<OPTION value='"+cArtG+"' size='3' maxlength='3' >"+cArtG+" ";}
			nGrIndexSelect++;
			cArtS=cArtS.substring(13,cArtS.length);
			}
		}
		if (cRet.length>0)
			{cRet="Gr. <SELECT size=1 name='GrListe' onChange='SetOpt(this.form)'> "+cRet+" </SELECT>"
			}
	return cRet;
	}

// ------------
function gSetOpt(oForm)
	{
	nInd=oForm.GrListe.options.selectedIndex;
	oForm.nOInd.value=nInd;
	oForm.cArtG.value=oForm.GrListe.options[nInd].value;
	oForm.nMng.value=1;
	}


// ------------
function InitValues()
	{
	// --- Separator (vgl. auch HT32AdrErf.HTM) :
	gcValueS="nname"+gcSepV+"2"+gcSepF+"vname"+gcSepV+"1"+gcSepF+"str"+gcSepV+"s"+gcSepF+"land"+gcSepV+"l"+gcSepF+"ort"+gcSepV+"o"+gcSepF+"tel"+gcSepV+""+gcSepF+"e_mail"+gcSepV+"e"+gcSepF+"gbd"+gcSepV+""+gcSepF+"news"+gcSepV+"n"+gcSepF+"zahlung"+gcSepV+"z"+gcSepF+"texta"+gcSepV+gcSepF+"pos"+gcSepV+"x";
	gcArtMaxS="";
   }
// ------------

// ------------
function SetValue(cKey,cValue,nAdd)
	{
//	alert(cValue);
	cRet="";
	acItems=ssplit(gcValueS,gcSepF); // Separator
	nLen=acItems.length-1;
	for(nCt=0; nCt <= nLen; nCt++)
		{
		acXX=ssplit(acItems[nCt],gcSepV);
		// alert(acXX[0]+"/"+acXX[1]);
		if (acXX[0]==cKey)
			{
			if (cKey=="pos")
				{if ((gnAnzPos<=1) || (nAdd==0))
					{acItems[nCt]=acXX[0]+gcSepV+cValue;}
				else
					{acItems[nCt]="pos"+gcSepV+acXX[01]+cValue;}
				}
			else
				{acItems[nCt]=cKey+gcSepV+cValue;}
				
			gcValueS="";
			for(nCt=0; nCt <= nLen-1; nCt++)
				{gcValueS=gcValueS+acItems[nCt]+gcSepF;} // Separator
			gcValueS=gcValueS+acItems[nLen];
//alert(gcValueS);
			nCt=nLen+10;
			}
		} // NEXT nCt
	//alert(gcValueS);
	return true;
	}
// ------------
function GetValue(cKey)
	{
	cRet="";
	acItems=ssplit(gcValueS,gcSepF); // Separator
	nLen=acItems.length-1;
	for(nCt=0; nCt <= nLen; nCt++)
		{
		acXX=ssplit(acItems[nCt],gcSepV);
		if (acXX[0]==cKey)
			{cRet=acXX[1];
			break;
			}
		} // NEXT nCt
	//alert(gcValueS);
	return cRet;
	}
// ------------
function EmptyAdr()
	{
	return((GetValue("nname")=="2") && (GetValue("vname")=="1"));
	}
// ------
function delayms(nMSec)
{
oDate=new Date();
nSt=oDate.getTime();
nAkt=nSt;
while(nAkt-nSt<nMSec)
	{
	oDate=new Date();
	nAkt=oDate.getTime();
   }
}
// ------------
// ------------