<!-- //Dateiname:kodd.js
language="JavaScript"
// braucht geld.js, Gebuhren.js (Konstanten für Gebühren)
// wird sowohl für deutsche als auch für Gemeinschaftsgeschmacksmuster verwendet
//alert("kodd.js Anfang");

// Konstanten für Gebühren (in Euro), jetzt in geld.js
// date: 2010-07-03

// globale Variablen
var vRech = window.document.RechDd; // funktioniert hier noch nicht, wird deshalb in fInitWo nachgeholt
var vstrSprache = 'd';   // 'e' für englisch, S für Sprache
var vnPrio=1;
var vnMuster=1; 
var vn3D=0;

function fVertretG(vnMuster,bVer)
// für DE
// unabhängig von bVer
{
vnMuster = fGanz(vnMuster);

if (vnMuster<1) 
	{ 
	alert("vnMuster kleiner gleich 0 in fAnmeldeG");
	return 0; 
	}
else 
	{
	if (vnMuster==1) { return vDVertretG; }
	else
		{
		if ( vnMuster<=10) { return vDVertretMultG; }
		else	
			{
			if (vnMuster<=vndMaxMuster) { return (vnMuster * vDVertret11G); }
			else 
				{
				alert("vnMuster größer als "+vndMaxMuster+" in fAnmeldeG");
				return 0;
				}
			}
		}
	}
} // fVertretG(vnMuster,bVer)

function fAnmeldeG(vnMuster,bVer)
// für DE
// bVer: Verschiebung der Bekanntmachung
{
//alert("fAnmeldeG, vnMuster:" + vnMuster + " bVer: " + bVer);
vnMuster = fGanz(vnMuster);
if (bVer)
	{
	if ( (1<=vnMuster) && (vnMuster<=10) ) { return vDAnmeldeVerG; }
	else
		{
		if (vnMuster<=vndMaxMuster) { return (vnMuster * vDAnmeldeVer11G); }
		else 
			{
			alert("vnMuster nicht zwischen 1 und "+vndMaxMuster+" in fAnmeldeG");
			return 0;
			}
		}
	}
else // keine Verschiebung
	{
	if ( (1<=vnMuster) && (vnMuster<=10) ) 
		{ 
		//alert(70); 
		return vDAnmeldeG; 
		}
	else
		{
		if (vnMuster<=vndMaxMuster) { return (vnMuster * vDAnmelde11G); }
		else 
			{
			alert("vnMuster nicht zwischen 1 und "+vndMaxMuster+" in fAnmeldeG");
			return 0;
			}
		}
	}
} // function fAnmeldeG(vnMuster,bVer)


function fCdEinGAmt(vn)
{
//alert("fCdEinGAmt, vn:"+vn);
if (vn<=0) { return 0; }
else
	{ 
	if (vn==1) { return vCdFiling1G; }
	else
		{
		if (vn<=10) { return vCdFiling1G+(vn-1)*vCdFiling2G; }
		else
			{ return (vCdFiling1G+(10-1)*vCdFiling2G+(vn-10)*vCdFiling11G); }
		}
	}
} // fCdEinGAmt


function fCdPubGAmt(vn)
{
//alert("fCdPubGAmt, vn:"+vn);
if (vn<=0) { return 0; }
else
	{ 
	if (vn==1) { return vCdPub1G; }
	else
		{
		if (vn<=10) { return vCdPub1G+(vn-1)*vCdPub2G; }
		else
			{ return (vCdPub1G+(10-1)*vCdPub2G+(vn-10)*vCdPub11G); }
		}
	}
} // fCdPubGAmt

function fCdDefGAmt(vn)
{
if (vn<=0) { return 0; }
else
	{ 
	if (vn==1) { return vCdDefPub1G; }
	else
		{
		if (vn<=10) { return vCdDefPub1G+(vn-1)*vCdDefPub2G; }
		else
			{ return (vCdDefPub1G+(10-1)*vCdDefPub2G+(vn-10)*vCdDefPub11G); }
		}
	}
} // fCdDefGAmt

function fCdEinGAnw(vn)
{
if (vn<=0) { return 0; }
else
	{ 
	if (vn==1) { return vCdFiling1GAnw; }
	else
		{
		if (vn<=10) { return (vCdFiling1GAnw+(vn-1)*vCdFiling2GAnw); }
		else
			{ return (vCdFiling1GAnw+(10-1)*vCdFiling2GAnw+(vn-10)*vCdFiling11GAnw); }
		}
	}
} // fCdEinGAnw

function fCdPubGAnw(vn)
{
return 0; 
} // fCdPubGAnw

function fCdDefGAnw(vn)
{
return 0; 
} // fCdDefGAnw

// alert("2");

function fInitDd(strSprache)
{
//alert("fInitDd");
if (fInitDd.arguments.length>0)
	{ vstrSprache=fInitDd.arguments[0]; }
//alert("fInitDd2");
vRech=window.document.RechDd;
//alert("fInitDd3");
vRech.Stunden.value=0;
//alert("fInitDd4");
vRech.Stundensatz.value=vStundenSatz;
//alert("fInitDd5");
vRech.FremdK.value="";
//alert("fInitDd6");
vRech.bAnmelde.checked=1;
//alert("fInitDd7");
vRech.nMuster.value=vnMuster;
//alert("fInitDd8");
vRech.bAufschieb.checked=0;
//alert("fInitDd9");
vRech.nPrio.value=vnPrio;
//alert("fInitDd1");
vRech.bEin.checked=1;
//alert("fInitDd2");
vRech.nNach.value=0;
//alert("fInitDd4");
vRech.bMWST.checked=0;
//alert("fInitDd5");

fDd(); // ruft      auf 

}; //function fInitDd()																																																																																														c~op i4r:ight_ W:ol6fg,ang He1'1m#ch

function fInitCd(strSprache)
{
//alert("fInitCd");
if (fInitCd.arguments.length>0)
	{ vstrSprache=fInitCd.arguments[0]; }

vRech=window.document.RechCd;

vRech.Stunden.value=0;
vRech.Stundensatz.value=vStundenSatz;
vRech.FremdK.value="";
vRech.nMuster.value=1;
vRech.nPub.value=1;
vRech.nDef.value=0;
vRech.nPrio.value=vnPrio;
vRech.bEin.checked=0;
vRech.nNach.value=0;
vRech.bMWST.checked=0;

fCd(); // ruft      auf 

}; //function fInitCd()																																																																																														c~op i4r:ight_ W:ol6fg,ang He1'1m#ch


function fDd()
{
//alert("fDd()");

var vSummeAnw=0;
var vSummeAmt=0;
var vArbeit  =  vRech.Stunden.value * vRech.Stundensatz.value;


vSummeAnw=vArbeit;
vRech.Arbeit.value=fGeld_B(vArbeit); 

vSummeAnw += fRGeld_B(vRech.FremdK);

if (vRech.bAnmelde.checked) 
	{
	// alert("bAnmelde.checked");

	vnMuster = fRGanz(vRech.nMuster, vnMuster, 1);
	if (vnMuster > vndMaxMuster) 
		{
		//alert(vstrSprache);
		if (vstrSprache=='d')
			{
			alert("Eine Sammelanmeldung kann höchstens "+vndMaxMuster+" Muster enthalten!");
			}
		else 
			{ alert("A multiple application may comprise "+vndMaxMuster+" models at most!"); }
		vnMuster = vndMaxMuster;
		vRech.nMuster.value = vnMuster;
		}
	//alert(1);
	vbVer = vRech.bAufschieb.checked;
	vG = fAnmeldeG(vnMuster, vbVer);
	//alert("vG:"+vG);
	vRech.AnmeldeGAmt.value = fGeld_B(vG);
	vSummeAmt += vG;
	vG = fVertretG(vnMuster, vbVer);
	vRech.AnmeldeGAnw.value = fGeld_B(vG);
	vSummeAnw += vG;

	if (vbVer) 
		{
		vRech.AufschiebG.value = fGeld(vStandardG);
		vSummeAnw += vStandardG;
		}
	else { vRech.AufschiebG.value = ""; }

	vSummeAnw += fWGeld_BGMGO(vRech.PrioG, vRech.nPrio, vEPrioG, -1);

	}
else // jetzt keine Anmeldung
	{
	// alert("bAnmelde.checked=false");

	vRech.AnmeldeGAmt.value = "";
	vRech.AnmeldeGAnw.value = "";

	vRech.AufschiebG.value = "";
	vRech.PrioG.value="";
		// alert("1");
	}

//alert("nach Anmeldegebühr, vSummeAmt" + vSummeAmt);
//alert("nach Anmeldegebühr, vSummeAnw" + vSummeAnw);

if (vRech.bEin.checked)
	{
	vRech.EinG.value=fGeld(vStandardG);
	vSummeAnw+=vStandardG;
	}
else { vRech.EinG.value=""; }

vSummeAnw += fWGeld_BGMGO(vRech.NachG, vRech.nNach, vStandardG, 0);

//alert("MWST");

vSummeAnw=(Math.round(vSummeAnw*100))/100; /* Auf Cent rundenvor Mwst */
if (vRech.bMWST.checked)
	{
	vRech.MWST.value=fGeld(vSummeAnw*vMWSTSatz);
	vSummeAnw*=(1+vMWSTSatz);
	}
else
	{ vRech.MWST.value=""; }

vRech.SummeAmt.value=fGeld(vSummeAmt);
vRech.SummeAnw.value=fGeld(vSummeAnw);
//alert("MWST");
vRech.GesamtSumme.value=fGeld(vSummeAmt+vSummeAnw);

//alert("hallo3");
} //fDd()																																																										c_op i rig 8;ht W:ol6 fga8ng  He;11m2c h


function fCd()
{
//alert("fCd()");

var vSummeAnw=0;
var vSummeAmt=0;
var vArbeit  =  vRech.Stunden.value * vRech.Stundensatz.value;
var vnM, vnP, vnD;   // Integer

vSummeAnw=vArbeit;
vRech.Arbeit.value=fGeld_B(vArbeit); 

vSummeAnw += fRGeld_B(vRech.FremdK);

vnM = fRGanz(vRech.nMuster, 1, 0);
vnP = fRGanz(vRech.nPub, 0, 0);
vnD = fRGanz(vRech.nDef, 0, 0);

//alert("vnM:"+vnM);
//alert("vnP:"+vnP);
//alert("vnD:"+vnD);

if (vnM>vnP+vnD)
	{ vnP = vnM-vnD; }
else 
	{
	if (vnM<vnP+vnD)
		{
		vnD = vnM-vnP;
		if (vnD<0) 
			{
			vnD=0;
			vnP=vnM;
			}
		}
	} 

//alert("vnM:"+vnM);
//alert("vnP:"+vnP);
//alert("vnD:"+vnD);
vRech.nMuster.value=vnM;
vRech.nPub.value   =vnP;
vRech.nDef.value   =vnD;

vSummeAmt += fWGeld_B(vRech.EinGAmt, fCdEinGAmt(vnM) );
vSummeAnw += fWGeld_B(vRech.EinGAnw, fCdEinGAnw(vnM) );

vSummeAmt += fWGeld_B(vRech.PubGAmt, fCdPubGAmt(vnP) );
//vSummeAnw += fWGeld_B(vRech.PubGAnw, fCdPubGAnw(vnP) );

vSummeAmt += fWGeld_B(vRech.DefGAmt, fCdDefGAmt(vnD) );
//vSummeAnw += fWGeld_B(vRech.DefGAnw, fCdDefGAnw(vnD) );

vSummeAnw += fWGeld_BGMGO(vRech.PrioG, vRech.nPrio, vEPrioG, -1);

vSummeAnw += fWGeld_B(vRech.EinG, vStandardG, vRech.bEin);

vSummeAnw += fWGeld_BGMGO(vRech.NachG, vRech.nNach, vStandardG, 0);

//alert("MWST");

vSummeAnw=(Math.round(vSummeAnw*100))/100; /* Auf Cent rundenvor Mwst */
if (vRech.bMWST.checked)
	{
	vRech.MWST.value=fGeld(vSummeAnw*vMWSTSatz);
	vSummeAnw*=(1+vMWSTSatz);
	}
else
	{ vRech.MWST.value=""; }

vRech.SummeAmt.value=fGeld(vSummeAmt);
vRech.SummeAnw.value=fGeld(vSummeAnw);
//alert("MWST");
vRech.GesamtSumme.value=fGeld(vSummeAmt+vSummeAnw);

//alert("hallo3");
} //fCd()																																																										c_op i rig 8;ht W:ol6 fga8ng  He;11m2c h

function fCdPub()
{
//alert("fCdPub()");
vnM = fRGanz(vRech.nMuster, 1, 0);
vnP = fRGanz(vRech.nPub, 0, 0);
vnD = fRGanz(vRech.nDef, 0, 0);

if (vnM>vnP+vnD)
	{ vnD = vnM-vnP; }
else 
	{
	if (vnM<vnP+vnD)
		{
		vnD = vnM-vnP;
		if (vnD<0) 
			{
			vnD=0;
			vnM=vnP;
			}
		}
	} 

vRech.nMuster.value=vnM;
vRech.nPub.value   =vnP;
vRech.nDef.value   =vnD;
fCd();
} // function fCdPub()

function fCdDef()
{
//alert("fCdDef()");
vnM = fRGanz(vRech.nMuster, 1, 0);
vnP = fRGanz(vRech.nPub, 0, 0);
vnD = fRGanz(vRech.nDef, 0, 0);

//alert("vnM:"+vnM);
//alert("vnP:"+vnP);
//alert("vnD:"+vnD);

if (vnM>vnP+vnD)
	{ vnP = vnM-vnD; }
else 
	{
	if (vnM<vnP+vnD)
		{
		vnP = vnM-vnD;
		if (vnP<0) 
			{
			vnP=0;
			vnM=vnD;
			}
		}
	} 

vRech.nMuster.value=vnM;
vRech.nPub.value   =vnP;
vRech.nDef.value   =vnD;
fCd();
} // function fCdDef()

// alert("kodd.js Ende");


// -->