<!-- //Dateiname:koep.js
language="JavaScript"
// date: 2009-10-11
// braucht geld.js, Gebuhren.js (Konstanten für Gebühren)
// alert("koep.js");

// globale Variablen
var vRech = window.document.RechWo; // funktioniert hier noch nicht, wird deshalb in fInitWo nachgeholt
var vstrSprache = 'd'   // 'e' für englisch
var vBeB =10; 
var vAnsB= 3;
var vFigB= 3;
var vZusB = 1;
var vAntB= 5;
var vWortf;		// Zwischenspeicher um Änderungen zu ermitteln
var vB30B=1;	// Zwischenspeicher um Änderungen zu ermitteln
var vnPrio=0;
var vRecherchenF; // Zwischenspeicher
var vnAnspruch;
var vnKopie;
var vnNach;
// alert("1");


function fPBD(vnBlatt)
// Funktion PrioBelegDeutsch, gibt die Kosten desselben zurück
{
var vPreis=20; // Grundgebühr
//alert("vnBlatt:"+vnBlatt);
if (vnBlatt<=50) { vPreis += 0.5*vnBlatt; }
else {
	vPreis += 25;
	vPreis += (vnBlatt-50)*0.15;
}
return vPreis;
} // function fPBD(nBatt)

// alert("koep.js, Vor fEpSeitenGAmt");
function fEpSeitenGAmt(nPages)
// berechnet die Seitengebühren
{
//alert("koep.js, fEpSeitenGAmt, nPages: " + nPages);
if (nPages<=35) { return 0; }
else { return ( (nPages-35)*vEpAnmeldeG36 ); }
}

//alert("koep.js, Vor fEpSeitenGAnw");
function fEpSeitenGAnw(nPages)
// berechnet die Seitengebühren
{
//alert("koep.js, fEpSeitenGAnw, nPages: " + nPages);
if (nPages<=35) { return 0; }
else { return ( (nPages-35)*vEpVertretG36 ); }
}

//alert("koep.js, Vor fEpClaimG");
function fEpClaimG(n)
// berechnet die Anspruchsgebühren
{
//alert("koep.js, fEpClaimG, n: " + n);
if (n<=15) { return 0; }
else { 
	if (n<=50) { return ( (n-15) * vEpAnspruchsG ); }
	else { return (  35*vEpAnspruchsG + (n-50) * vEpAnspruchsG51  ); }
}
} // fEpClaimG(n)


//alert("koep.js, Vor fEpClaimGAnw");
function fEpClaimGAnw(n)
// berechnet die Anspruchsgebühren
{
//alert("koep.js, fEpClaimGAnw, n: " + n);
if (n<=15) { return 0; }
else { 
	if (n<=50) { return ( (n-15) * vEpAnspruchsGAnw ); }
	else { return (  35*vEpAnspruchsGAnw + (n-50) * vEpAnspruchsGAnw51  ); }
}
} // fEpClaimGAnw(n)




//alert("koep.js, Vor fInitWoEp");
function fInitWoEp(strSprache)
{
// alert("fInitWoEp");
if (fInitWoEp.arguments.length>0)
	{ vstrSprache=fInitWoEp.arguments[0]; }

vRech = window.document.RechWoEp;

vRech.Stunden.value=0;
vRech.Stundensatz.value=vStundenSatz;
vRech.Worter.value=0;
vRech.WortF.value=0;
//alert(BeB);
vRech.AnmeldeG.value=fGeld(vEpAnmeldeG);
vRech.VertretG.value=fGeld(vWoEpVertretG);
vRech.SeiteG.value = vEpAnmeldeG36;
vRech.nFilingPages.value=35;

vRech.bSearchFee.checked=1;
vRech.bSearchFeeReduced.checked=1;

vRech.nAnspruch.value=15;

vRech.KopieG.value=vEpKopieG;
vRech.nKopie.value=1;

vRech.bExamination.checked = 1;

vRech.ErstreckG.value=vEpErstreckG;
vRech.nErstreck.value=0;

vRech.Jahr3G.value=aEpR[3];
vRech.bJahr3.checked=0;

vRech.nNach.value=0;
vRech.bMWST.checked=0;

fWoEp(); 
// alert("fInitWoEp, Ende");
}; //function fInitWoEp()		

// alert("3");

//alert("koep.js, Vor fInitEp");
function fInitEp(strSprache)
{
//alert("fInitEp");
if (fInitEp.arguments.length>0)
	{ vstrSprache=fInitEp.arguments[0]; }

vRech = window.document.RechEp;

vRech.Stunden.value=0;
vRech.Stundensatz.value=vStundenSatz;
vRech.Worter.value=0;
vRech.WortF.value=0;
//alert("BeB");
vRech.bFiling.checked=1;
vRech.SeiteG.value = vEpAnmeldeG36;
vRech.nFilingPages.value=35;

vRech.RecherchenG.value=vEpRecherchenG;
vRech.RecherchenF.value=1;

vRech.nAnspruch.value=15;

vRech.KopieG.value=vEpKopieG;
vRech.nKopie.value=2;

//alert("fInitEp Prio");
vRech.nPrio.value=0;
vRech.nNach.value=0; 
vRech.bSearchReport.checked=0;
vRech.bApplPubl.checked=0;

vRech.bExamination.checked=0;
vRech.bPACE.checked=0;
vRech.ErstreckG.value=vEpErstreckG;
vRech.nErstreck.value=0;
vRech.StundenE.value=0;
vRech.StundensatzE.value=vStundenSatz;

//alert("fInitEp Grant");
vRech.bGrant.checked=0;
vRech.bGrantFee.checked=0;

vRech.bMWST.checked=0;

fEp(); 

}; //function fInitEp()	


// alert("4");


function fWoEp()
{
// alert("fWoEp()");

var vSummeAnw=0;
var vSummeAmt=0;

var vAdd  =  vRech.Stunden.value * vRech.Stundensatz.value;
vSummeAnw += fWGeld_B( vRech.Arbeit, vAdd);

vAdd = vRech.WortF.value * vRech.Worter.value;
vRech.Ubersetz.value=fGeld_B(vAdd); 
vSummeAnw += vAdd;

vAdd = vRech.AnmeldeG.value;
vSummeAmt += vAdd-0;

vAdd = vRech.VertretG.value;
vSummeAnw += vAdd-0;

//alert("fWoEp() SeitenG");
vn = fRGanz(vRech.nFilingPages, 35, 1);
vSummeAmt += fWGeld_B(vRech.SeitenG, fEpSeitenGAmt(vn));
// alert("fEp() SeitenGAnw");
vSummeAnw += fWGeld_B(vRech.SeitenGAnw, fEpSeitenGAnw(vn));

// alert("fWoEp() RecherchenG");
vRech.RecherchenG.value=vEpRecherchenG;
if (vRech.bSearchFee.checked) {
	if (vRech.bSearchFeeReduced.checked) {
		vAdd = vEpRecherchenGreduziert;
	}
	else {
		vAdd = vEpRecherchenG;
	}
}
else { vAdd = 0; }
vSummeAmt += fWGeld_B( vRech.RecherchenGF, vAdd );

// alert("fWoEp() AnspruchsGF");
vn = fRGanz(vRech.nAnspruch, 15, 1);
vSummeAmt += fWGeld_B( vRech.AnspruchsGF, fEpClaimG(vn) );
vSummeAnw += fWGeld_B( vRech.AnspruchsGFAnw, fEpClaimGAnw(vn) );
//alert("Anspruch");

//alert("fWoEp() nKopie");
vn = fRGanz(vRech.nKopie, 1, 1);
vn--; 
vSummeAmt += fWGeld_B( vRech.KopieGF, vRech.KopieG.value * vn );
//alert("Kopie");

//alert("fWoEp() bExamination; vRech.bExamination.checked: " + vRech.bExamination.checked);
if (vRech.bExamination.checked)	{
	//alert("fWoEp() PrufungsG");
	if ( vRech.bSearchFee.checked )
		{ vSummeAmt += fWGeld_B(vRech.PrufungsGFAmt, vEpPrufungsG); }
	else 
		{ vSummeAmt += fWGeld_B(vRech.PrufungsGFAmt, vEpPrufungsG2005); }
	
	vSummeAmt += fWGeld_B( vRech.BenennGF, vEpBenennG9 );

	vn = fRGanz(vRech.nErstreck,0,0);
	vSummeAmt += fWGeld_B( vRech.ErstreckGF, vRech.ErstreckG.value * vn );
	//alert("Erstreck");
}
else {
	vRech.PrufungsGFAmt.value=""; 
	vRech.PrufungsGFAnw.value="";
	vRech.BenennGF.value="";
	vRech.ErstreckGF.value="";
}

vSummeAnw += fWGeld_B(vRech.PACEG, vEpPace, vRech.bPACE);
//alert("Erstreck");
//alert("vSummeAmt:"+ vSummeAmt);

vSummeAmt += fWGeld_B(vRech.Jahr3GF, aEpR[3], vRech.bJahr3);


vAdd = vStandardG * fRGanz(vRech.nNach, 0, 0);
vSummeAnw += fWGeld_B( vRech.NachG, vAdd );

//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");
} //fWoEp()																																																										c_op i rig 8;ht W:ol6 fga8ng  He;11m2c h

// alert("koep.js, Vor fEp");
function fEp()
{
// alert("fEp()");

var vSummeAnw=0;
var vSummeAmt=0;
var vn=0;

var vAdd  =  vRech.Stunden.value * vRech.Stundensatz.value;
vSummeAnw = fWGeld_B(vRech.Arbeit, vAdd);

vAdd = vRech.WortF.value * vRech.Worter.value;
vSummeAnw += fWGeld_B(vRech.Ubersetz, vAdd ); 

//alert("fEp() AnmeldeG");
vSummeAmt += fWGeld_B(vRech.AnmeldeG, vEpAnmeldeG, vRech.bFiling);
vSummeAnw += fWGeld_B(vRech.VertretG, vEpVertretG, vRech.bFiling);

// alert("fEp() SeitenG");
vn = fRGanz(vRech.nFilingPages, 35, 1);
vSummeAmt += fWGeld_B(vRech.SeitenG, fEpSeitenGAmt(vn), vRech.bFiling);
// alert("fEp() SeitenGAnw");
vSummeAnw += fWGeld_B(vRech.SeitenGAnw, fEpSeitenGAnw(vn), vRech.bFiling);

// alert("fEp() RecherchenG");
vRech.RecherchenG.value=vEpRecherchenG;
vn = fRFloat(vRech.RecherchenF, 1, 0);
vAdd = vRech.RecherchenG.value * vn
vSummeAmt += fWGeld_B( vRech.RecherchenGF, vAdd ); // hier wird auch vRech.RecherchenGF.value gesetzt
if( vn > 1 ) { 
	vSummeAnw += fWGeld( vRech.RecherchenGFAnw, Math.ceil(vn-1)*vEpRecherchenGAnw ); 
}
else { vRech.RecherchenGFAnw.value=""; }

vn = fRGanz(vRech.nAnspruch, 15, 1);
vSummeAmt += fWGeld_B( vRech.AnspruchsGF, fEpClaimG(vn) );
vSummeAnw += fWGeld_B( vRech.AnspruchsGFAnw, fEpClaimGAnw(vn) );
// alert("Anspruch");

vn = fRGanz(vRech.nKopie, 1, 1);
vn--; 
vSummeAmt += fWGeld_B( vRech.KopieGF, vRech.KopieG.value * vn );
//alert("Kopie");

vSummeAnw += fWGeld_BGMGO(vRech.PrioG, vRech.nPrio, vEPrioG, -1);

vSummeAnw += fWGeld_BGMGO(vRech.NachG, vRech.nNach, vStandardG, 0);

vSummeAnw += fWGeld_B(vRech.SearchReportG, vEpSearchReportG, vRech.bSearchReport);
vSummeAnw += fWGeld_B(vRech.ApplPublG,      vStandardG, vRech.bApplPubl);

//alert("Examination");
if (vRech.bExamination.checked)	{
	//alert("PrufungsGFAmt"); 
	vSummeAmt += fWGeld_B(vRech.PrufungsGFAmt, vEpPrufungsG);  
	vSummeAnw += fRGeld(vRech.PrufungsGFAnw, vEpPrufungsGAnw);

	vSummeAmt += fWGeld_B( vRech.BenennGF, vEpBenennG9 );

	vn = fRGanz(vRech.nErstreck,0,0);
	vSummeAmt += fWGeld_B( vRech.ErstreckGF, vRech.ErstreckG.value * vn );
	//alert("Erstreck");

}
else {
	vRech.PrufungsGFAmt.value=""; 
	vRech.PrufungsGFAnw.value="";
	vRech.BenennGF.value="";
	vRech.ErstreckGF.value="";
}

vSummeAnw += fWGeld_B(vRech.PACEG, vEpPace, vRech.bPACE);

//alert("vSummeAmt:"+ vSummeAmt);

vAdd  =  vRech.StundenE.value * vRech.StundensatzE.value;
vSummeAnw += fWGeld_B( vRech.ArbeitE, vAdd);

vSummeAnw += fWGeld_B(vRech.R514G, vEpR514G, vRech.bGrant);
if (vRech.bGrantFee.checked) {
	vSummeAmt += fWGeld_B(vRech.GrantG, vEpGrantG ); 
	vSummeAnw += fWGeld_B(vRech.GrantGAnw, vEpGrantGAnw );
}
else {
	vRech.GrantG.value="";
	vRech.GrantGAnw.value="";
}

//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");
} //fEp()


// alert("6");
// alert("koep.js, Vor fEpFiling");
function fEpFiling() // wird bisher nicht verwendet
{
if (vRech.bFiling.checked)
	{ vRech.RecherchenF.value=1;
	vRech.nAnspruch.value=15;
	vRech.nKopie.value=2;
}
else {
	vRech.RecherchenF.value=0;
	vRech.nAnspruch.value=0;
	vRech.nKopie.value=1;
	vRech.nNach.value=0;
	vRech.nPrio.value="";
}

fEp();
} //function fEpFiling()

function fEpExamination() // wird bisher nicht verwendet
{
if (vRech.bExamination.checked) { ; }
else {
	vRech.bPACE.checked=0;
	vRech.nErstreck.value=0; 
}

fEp();
} //function fEpExamination()

function fEpGrant() // wird bisher nicht verwendet
{
if (vRech.bGrant.checked)
	{
	vRech.bGrantFee.checked=1;
	}
else 
	{
	vRech.bGrantFee.checked=0;
	}

fEp();
} //function fEpGrant()




// -->