/*©marketing.steinmann@t-online.de*/

//xxx004 Fenster mit Hilfedatei öffnen
function Hilfe()
{
window.open("hilfepreis.html","","width=600,height=600, resizable=yes, scrollbars=yes, dependent=yes");
} //Ende Fkt Hilfe

/*/xxx005 Block anzeigen
function show(name) {if (ns)
{document.layers['' + name].visibility = "show";}
else
{document.all['' + name].style.visibility = "visible";}
}

//xxx006 Block ausblenden
function hide(name) {if (ns)
{document.layers['' + name].visibility = "hide";}
else
{document.all['' + name].style.visibility = "hidden";}
}*/

//xxx007 XXXX aus Eingabe durch 0 ersetzen
function Leer(form)
{
if(form.KuSko.value=="XXXXXXXXXX"
|| form.KuSko.value=="")
form.KuSko.value=0;
if(form.LiRab.value=="XXXXXXXXXX"
|| form.LiRab.value=="")
form.LiRab.value=0;
if(form.LiSko.value=="XXXXXXXXXX"
|| form.LiSko.value=="")
form.LiSko.value=0;
if(form.Gewinn.value=="XXXXXXXXXX"
|| form.Gewinn.value=="")
form.Gewinn.value=0;
if(form.KuRab.value=="XXXXXXXXXX"
|| form.KuRab.value=="")
form.KuRab.value=0;
if(form.LiBo.value=="XXXXXXXXXX"
|| form.LiBo.value=="")
form.LiBo.value=0;
if(form.BeKo.value=="XXXXXXXXXX"
|| form.BeKo.value=="")
form.BeKo.value=0;
} //END FKT Leer

/*xxx008 Vom Lieferantenpreis zum Verkaufspreis*/
function LiPVKP(form)
{ //Beginn LiPVKP
//XXXX aus Eingabe durch 0 ersetzen
if(form.KuSko.value=="XXXXXXXXXX"
|| form.KuSko.value=="")
form.KuSko.value=0;
if(form.LiRab.value=="XXXXXXXXXX"
|| form.LiRab.value=="")
form.LiRab.value=0;
if(form.LiSko.value=="XXXXXXXXXX"
|| form.LiSko.value=="")
form.LiSko.value=0;
if(form.Gewinn.value=="XXXXXXXXXX"
|| form.Gewinn.value=="")
form.Gewinn.value=0;
if(form.KuRab.value=="XXXXXXXXXX"
|| form.KuRab.value=="")
form.KuRab.value=0;
if(form.LiBo.value=="XXXXXXXXXX"
|| form.LiBo.value=="")
form.LiBo.value=0;
if(form.BeKo.value=="XXXXXXXXXX"
|| form.BeKo.value=="")
form.BeKo.value=0;

//xxx008a Prüfen Mindessteingabe auf pos. Zahl
var chkZ=1;
var chkZZ=0;

for(i=0;i<document.EKP_VKP.LiP_net.value.length;++i)
{
if(document.EKP_VKP.LiP_net.value.charAt(i) < "0"
|| document.EKP_VKP.LiP_net.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.LiP_net.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1
|| document.EKP_VKP.LiP_net.value=="")
{
alert("Keine gültige Zahl! Bitte geben Sie den korrekten Listenpreis ein!");
document.EKP_VKP.LiP_net.focus();
return false;
} //ENDIF
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.HaKo.value.length;++i)
{
if(document.EKP_VKP.HaKo.value.charAt(i) < "0"
|| document.EKP_VKP.HaKo.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.HaKo.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1
|| document.EKP_VKP.HaKo.value=="")
{
alert("Keine gültige Zahl! Bitte geben Sie den richtigen Prozentsatz der Handlungskosten (zum Umsatz netto) ein!");
document.EKP_VKP.HaKo.focus();
return false;
} //ENDIF
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.MwSt.value.length;++i)
{
if(document.EKP_VKP.MwSt.value.charAt(i) < "0"
|| document.EKP_VKP.MwSt.value.charAt(i) > "9")
chkZ=-1;
} //ENDFOR
if(chkZ==-1
|| document.EKP_VKP.MwSt.value=="")
{
alert("Keine ganze Zahl! Bitte geben Sie den gesetzlichen Mehrwertsteuersatz ein!");
document.EKP_VKP.MwSt.focus();
return false;
} //ENDIF
//xxx008b Prüfen der übrigen Eingaben
if(document.EKP_VKP.LiRab.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.LiRab.value.length;++i)
{
if(document.EKP_VKP.LiRab.value.charAt(i) < "0"
|| document.EKP_VKP.LiRab.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.LiRab.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.LiRab.focus();
return false;
} //ENDIF
if(document.EKP_VKP.LiSko.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.LiSko.value.length;++i)
{
if(document.EKP_VKP.LiSko.value.charAt(i) < "0"
|| document.EKP_VKP.LiSko.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.LiSko.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.LiSko.focus();
return false;
} //ENDIF
if(document.EKP_VKP.LiBo.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.LiBo.value.length;++i)
{
if(document.EKP_VKP.LiBo.value.charAt(i) < "0"
|| document.EKP_VKP.LiBo.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.LiBo.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.LiBo.focus();
return false;
} //ENDIF
if(document.EKP_VKP.BeKo.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.BeKo.value.length;++i)
{
if(document.EKP_VKP.BeKo.value.charAt(i) < "0"
|| document.EKP_VKP.BeKo.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.BeKo.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.BeKo.focus();
return false;
} //ENDIF
if(document.EKP_VKP.Gewinn.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.Gewinn.value.length;++i)
{
if(document.EKP_VKP.Gewinn.value.charAt(i) < "0"
|| document.EKP_VKP.Gewinn.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.Gewinn.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.Gewinn.focus();
return false;
} //ENDIF
if(document.EKP_VKP.KuSko.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.KuSko.value.length;++i)
{
if(document.EKP_VKP.KuSko.value.charAt(i) < "0"
|| document.EKP_VKP.KuSko.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.KuSko.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.KuSko.focus();
return false;
} //ENDIF
if(document.EKP_VKP.KuRab.value!="")
var chkZ=1;
var chkZZ=0;
for(i=0;i<document.EKP_VKP.KuRab.value.length;++i)
{
if(document.EKP_VKP.KuRab.value.charAt(i) < "0"
|| document.EKP_VKP.KuRab.value.charAt(i) > "9")
chkZ=-1;
if(document.EKP_VKP.KuRab.value.charAt(i) == ".")
{
chkZ=1;
chkZZ++;
} //ENDIF
} //ENDFOR
if(chkZ==-1
|| chkZZ>1)
{
alert("Keine gültige Zahl!");
document.EKP_VKP.KuRab.focus();
return false;
} //ENDIF
//xxx008c Plausibilitätsprüfung
if(document.EKP_VKP.KuRab.value*1+document.EKP_VKP.KuSko.value*1+document.EKP_VKP.Gewinn.value*1+document.EKP_VKP.HaKo.value*1>=100)
{
alert("Handlungskosten+Gewinn+Kundenskonto+Kundenrabatt ist gleich oder größer als 100%!");
document.EKP_VKP.HaKo.focus();
return false;
} //ENDIF
//xxx008d Berechnungen
//xxx008e INPUT Variablen ersetzen für Iteraration
var HaKoIt=form.HaKo.value*1;
var GewinnIt=form.Gewinn.value*1;
var KuSkoIt=form.KuSko.value*1;
var KuRabIt=form.KuRab.value*1;
var Addition=form.HaKo.value*1+form.Gewinn.value*1;
var AdditionIt=form.HaKo.value*1+form.Gewinn.value*1;
var Addition_a=0;
//INPUT Eingabe-Variablen an VAR übergeben
var LiP_net=form.LiP_net.value*1;
var LiRab=form.LiRab.value*1;
var LiSko=form.LiSko.value*1;
var LiBo=form.LiBo.value*1;
var BeKo=form.BeKo.value*1;
var HaKo=form.HaKo.value*1;
var Gewinn=form.Gewinn.value*1;
var KuSko=form.KuSko.value*1;
var KuRab=form.KuRab.value*1;
var MwSt=form.MwSt.value*1;
//xxx008f Berechnung Teil 1
ZEKP = (LiP_net*(1-1*LiRab/100)); //ZielEKP
LiRab_a = (LiP_net*(1*LiRab/100)); //LieferantenRabatt absolut
BEKP = (ZEKP*(1-1*LiSko/100)); //Bar EKP=ZielEKP*(1-LieferSkonto)
LiSko_a = (ZEKP*(1*LiSko/100)); //LierantenSkonto absulut
BeKoR = (BEKP*(1-1*LiBo/100)); //Bezugskosten rab=BarEKP*(1-LierantenBonus)
LiBo_a = (BEKP*(1*LiBo/100)); //LierantenBonus absolut
BePreis = (BeKoR*1+BeKo*1); //Bezugspreis=BezugskostenRab+Bezugskosten
//Iterationen auf 1 Näherung begrenzen
//xxx008g Addition Gewinn+Handlungskosten
var j=0;
var jj;
while(j<10000)
{ //1. schleife
j++;
Addition_a=(BePreis/(1-AdditionIt/100)*AdditionIt/100);
BarVKP=(BePreis*1+1*Addition_a);
//KundenSkonto absolut
KuSko_a=(BarVKP/(1-KuSko/100)*KuSko/100);
//ZielverkaufsPreis=BarverkaufsPreis+Barverkaufspreis/(1-KundenSkonto)*KundenSkonto
ZVKP=(BarVKP*1+1*KuSko_a);
//Kundenrabatt absolut
KuRab_a=((ZVKP/(1-KuRab/100)*KuRab/100));
//ListenverkaufsPreis=ZielverkaufsPreis+ZielverkaufsPreis*KundenRabat/(1-Kundenrabat)
LiVKP=(ZVKP*1+1*KuRab_a);
//xxx008h letzte Berechnungen
//ListenVKP brutto
VKPbrut=(LiVKP*(1+1*MwSt/100));
//MwSt absolut
MwSt_a=(LiVKP*(MwSt/100));
//Handlungskosten 1. Iteration
jj=((Addition_a*100/LiVKP)-Addition*1);
if(jj > 0)
AdditionIt=AdditionIt*1+jj/2;
else
{
if(jj == 0)
j=10001;
else
AdditionIt=AdditionIt*1-jj/2;
} //ENDIF
} //END 1. schleife
// Auflösung der Addition
HaKo_a=HaKo/100*BePreis;
Gewinn_a=Gewinn/100*LiVKP;
SeKoPreis =(BePreis*1+HaKo_a*1);
//xxx008h Übergabe der Var an INPUT-Ausgabe
form.ZEKP.value = ZEKP;
form.LiRab_a.value = LiRab_a;
form.BEKP.value = BEKP;
form.LiSko_a.value = LiSko_a;
form.BeKoR.value = BeKoR;
form.LiBo_a.value = LiBo_a;
form.BePreis.value = BePreis;
form.SeKoPreis.value = SeKoPreis;
form.HaKo_a.value = HaKo_a;
form.BarVKP.value = BarVKP;
form.Gewinn_a.value = Gewinn_a;
form.ZVKP.value = ZVKP;
form.KuSko_a.value = KuSko_a;
form.LiVKP.value = LiVKP;
form.KuRab_a.value = KuRab_a;
form.VKPbrut.value = VKPbrut;
form.MwSt_a.value=MwSt_a;
//xxx008i Runden und Leerkästen füllen
if(form.Artikel.value=="")
form.Artikel.value="XXXXXXXXXXXXXXXXXXXX";
if(form.ZEKP.value==0
|| form.ZEKP.value=="")
form.ZEKP.value="XXXXXXXXXX";
else
form.ZEKP.value=Math.round(form.ZEKP.value*100)/100;
if(form.BePreis.value==0
|| form.BePreis.value=="")
form.BePreis.value="XXXXXXXXXX";
else
form.BePreis.value=Math.round(form.BePreis.value*100)/100;
if(form.SeKoPreis.value==0
|| form.SeKoPreis.value=="")
form.SeKoPreis.value="XXXXXXXXXX";
else
form.SeKoPreis.value=Math.round(form.SeKoPreis.value*100)/100;
if(form.KuSko.value==0
|| form.KuSko.value=="")
form.KuSko.value="XXXXXXXXXX";
else
form.KuSko.value=Math.round(form.KuSko.value*100)/100;
if(form.LiVKP.value==0
|| form.LiVKP.value=="")
form.LiVKP.value="XXXXXXXXXX";
else
form.LiVKP.value=Math.round(form.LiVKP.value*100)/100;
if(form.LiP_net.value==0
|| form.LiP_net.value=="")
form.LiP_net.value="XXXXXXXXXX";
else
form.LiP_net.value=Math.round(form.LiP_net.value*100)/100;
if(form.LiRab.value==0
|| form.LiRab.value=="")
form.LiRab.value="XXXXXXXXXX";
else
form.LiRab.value=Math.round(form.LiRab.value*100)/100;
if(form.BEKP.value==0
|| form.BEKP.value=="")
form.BEKP.value="XXXXXXXXXX";
else
form.BEKP.value=Math.round(form.BEKP.value*100)/100;
if(form.LiSko.value==0
|| form.LiSko.value=="")
form.LiSko.value="XXXXXXXXXX";
else
form.LiSko.value=Math.round(form.LiSko.value*100)/100;
if(form.BeKoR.value==0
|| form.BeKoR.value=="")
form.BeKoR.value="XXXXXXXXXX";
else
form.BeKoR.value=Math.round(form.BeKoR.value*100)/100;
if(form.BePreis.value==0
|| form.BePreis.value=="")
form.BePreis.value="XXXXXXXXXX";
else
form.BePreis.value=Math.round(form.BePreis.value*100)/100;
if(form.HaKo.value==0
|| form.HaKo.value=="")
form.HaKo.value="XXXXXXXXXX";
else
form.HaKo.value=Math.round(form.HaKo.value*100)/100;
if(form.BarVKP.value==0
|| form.BarVKP.value=="")
form.BarVKP.value="XXXXXXXXXX";
else
form.BarVKP.value=Math.round(form.BarVKP.value*100)/100;
if(form.Gewinn.value==0
|| form.Gewinn.value=="")
form.Gewinn.value="XXXXXXXXXX";
else
form.Gewinn.value=Math.round(form.Gewinn.value*100)/100;
if(form.KuRab.value==0
|| form.KuRab.value=="")
form.KuRab.value="XXXXXXXXXX";
else
form.KuRab.value=Math.round(form.KuRab.value*100)/100;
if(form.VKPbrut.value==0
|| form.VKPbrut.value=="")
form.VKPbrut.value="XXXXXXXXXX";
else
form.VKPbrut.value=Math.round(form.VKPbrut.value*100)/100;
if(form.LiRab_a.value==0
|| form.LiRab_a.value=="")
form.LiRab_a.value="XXXXXXXXXX";
else
form.LiRab_a.value=Math.round(form.LiRab_a.value*100)/100;
if(form.LiSko_a.value==0
|| form.LiSko_a.value=="")
form.LiSko_a.value="XXXXXXXXXX";
else
form.LiSko_a.value=Math.round(form.LiSko_a.value*100)/100;
if(form.LiBo.value==0
|| form.LiBo.value=="")
form.LiBo.value="XXXXXXXXXX";
else
form.LiBo.value=Math.round(form.LiBo.value*100)/100;
if(form.LiBo_a.value==0
|| form.LiBo_a.value=="")
form.LiBo_a.value="XXXXXXXXXX";
else
form.LiBo_a.value=Math.round(form.LiBo_a.value*100)/100;
if(form.BeKo.value==0
|| form.BeKo.value=="")
form.BeKo.value="XXXXXXXXXX";
else
form.BeKo.value=Math.round(form.BeKo.value*100)/100;
if(form.HaKo_a.value==0
|| form.HaKo_a.value=="")
form.HaKo_a.value="XXXXXXXXXX";
else
form.HaKo_a.value=Math.round(form.HaKo_a.value*100)/100;
if(form.Gewinn_a.value==0
|| form.Gewinn_a.value=="")
form.Gewinn_a.value="XXXXXXXXXX";
else
form.Gewinn_a.value=Math.round(form.Gewinn_a.value*100)/100;
if(form.KuSko_a.value==0
|| form.KuSko_a.value=="")
form.KuSko_a.value="XXXXXXXXXX";
else
form.KuSko_a.value=Math.round(form.KuSko_a.value*100)/100;
if(form.KuRab_a.value==0
|| form.KuRab_a.value=="")
form.KuRab_a.value="XXXXXXXXXX";
else
form.KuRab_a.value=Math.round(form.KuRab_a.value*100)/100;
if(form.ZVKP.value==0
|| form.ZVKP.value=="")
form.ZEKP.value="XXXXXXXXXX";
else
form.ZVKP.value=Math.round(form.ZVKP.value*100)/100;
if(form.MwSt_a.value==0
|| form.MwSt_a.value=="")
form.MwSt_a.value="0";
else
form.MwSt_a.value=Math.round(form.MwSt_a.value*100)/100;
//xxx008k Plausibilitätsprüfung
if(document.EKP_VKP.ZEKP.value*1<=0)
{
alert("Zieleinkaufspreis ist gleich oder kleiner 0!");
document.EKP_VKP.LiRab.focus();
return false;
} //ENDIF
if(document.EKP_VKP.BEKP.value*1<=0)
{
alert("Bareinkaufspreis ist gleich oder kleiner 0!");
document.EKP_VKP.LiSko.focus();
return false;
} //ENDIF
if(document.EKP_VKP.BeKoR.value*1<=0)
{
alert("Bezugskosten rabatiert ist gleich oder kleiner 0!");
document.EKP_VKP.LiBo.focus();
return false;
} //ENDIF
} //END FKT LipVKP

//Dieses Skript stammt von Michael Mailers JavaScripts
//URL: http://www.webaid.de/js  --  eMail: mm@webaid.de
if (document.layers){
    window.captureEvents(Event.MOUSEDOWN | Event.MOUSEUP)
    window.onmousedown=rightclick;
    window.onmouseup=rightclick;

    function rightclick(e) {
    if (e.which == 3) {
    // Put right mouse code here
    alert('Bitte beachten Sie die Urheberrechte.');
    return false;
    }
    else {
        return true;
        }
    }
}
if (document.all){
    function click() {
    if (event.button==2) {
    alert('Bitte beachten Sie die Urheberrechte.')
    }

    if (event.button==3) {
    alert('Bitte beachten Sie die Urheberrechte.')}
    }
    document.onmousedown=click
}