
//DEF.: funktion til åbning af nyt vindue til visning af resultat:
function aabenVindue(resultatvis){
      tekstVindue=window.open('', '', 'width=300,height=200');
	tekstVindue.document.write("<html><head><title>Resultat</title></head>");
	tekstVindue.document.write("<body bgcolor='#e0e0e0' text='#000000' style='font-family: Verdana; font-size: 8pt'");
	tekstVindue.document.write("<font color=#000000><b>Resultat</font></b>");
	tekstVindue.document.write("<form name='VisForm'>");
	tekstVindue.document.write(resultatvis);
	tekstVindue.document.write("<br>&nbsp;<br>&nbsp;");
	tekstVindue.document.write("<input type='button' name='Luk' value='Luk'  onClick='self.focus();self.close()' style='border:1px outset #000000; color: #000000; font-weight: bold; background-color: #FFFFFF; font-family:Verdana; font-size: 8pt'>");
	tekstVindue.document.write("</form>");
	tekstVindue.document.write("</body></HTML>");
}

//DEF.: funktion til åbning af nyt vindue til visning af 5 kurser fra array:
function aabenKursliste(){
      document.write("<table cellpadding='2' style='border-collapse: collapse; font-family=verdana; font-size: 8pt' bordercolor='#000000' width=100%  bgcolor=#ffffff>");
      for (var i=0; i<5; i++){
          if (anbLAND[i].substr(0,3) == "***"){
             anbLAND[i]="EURO"
           }
          document.write( "<tr><td width=90 align='left' bordercolor='#FFFFFF' style='border-left-width: 1; border-right-width: 1; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1'>" + anbLAND[i] + "</td><td width=70 align=right bordercolor='#FFFFFF' style='border-left-width: 1; border-right-width: 1; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1'>" + anbSALG[i] + "</td></tr>");
      }
      document.write("</table>");
}

//DEF.: funktion til åbning af nyt vindue til visning af totalliste over kurser fra array:
function aabenKurslisteTotal(){
document.write("<table cellpadding='2' style='border-collapse: collapse; font-family=verdana; font-size: 8pt' bordercolor='#000000' width=180  bgcolor=#ffffff>");
 for (var i=0; i<anbISO.length; i++){
      if (anbLAND[i].substr(0,3) == "***"){
         anbLAND[i]="EURO"
         }
      
         document.write( "<tr><td align='left' bordercolor='#FFFFFF' style='border-left-width: 1; border-right-width: 1; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1'>" + anbLAND[i] + "</td><td align=right bordercolor='#FFFFFF' style='border-left-width: 1; border-right-width: 1; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1'>" + anbSALG[i] + "</td></tr>");
         }
     document.write("</table>");
}

//DEF.: funktion til generering af dropdown-indhold ud fra overført ISO-kode:
function dropDown(){
document.write("<option>Vælg valuta....</option>");
       for (var i=0; i < anbISO.length; i++){
         if (anbLAND[i].substr(0,3) == "***"){
             anbLAND[i]="EURO"
          }
          document.write( "<option>" + anbLAND[i] + "</option>");
}}


//Funktion håndtering af  decimaltegn (.=tusinder): - check først, om decimaler, så isoler disse i Xdecim
function talres(inddata) {
	var temp = "";  len= ""; decimal = ""; Xdecim = ""
	Xdecipos = inddata.indexOf(",");
	if (Xdecipos > 0) {
		inddata1 = inddata.substr(0,Xdecipos);
		Xdecim = inddata.substr(Xdecipos,3);
	}
	else{
		inddata1 = inddata
	}
	var temp=inddata1 + ""
	len = temp.length
	if (len<4) {
	decimal = temp+Xdecim; }
	if (len==4) {
	decimal = temp.substring(0,1)+"."+temp.substring(1,4)+Xdecim; }
	if (len==5) {
	decimal = temp.substring(0,2)+"."+temp.substring(2,5)+Xdecim; }
	if (len==6) {
	decimal = temp.substring(0,3)+"."+temp.substring(3,6)+Xdecim; }
	if (len==7) {
	decimal = temp.substring(0,1)+"."+temp.substring(1,4)+"."+temp.substring(4,7)+Xdecim; }
	if (len==8) {
	decimal = temp.substring(0,2)+"."+temp.substring(2,5)+"."+temp.substring(5,8)+Xdecim; }
	if (len==9) {
	decimal = temp.substring(0,3)+"."+temp.substring(3,6)+"."+temp.substring(6,9)+Xdecim; }
	if (len==10) {
	decimal = temp.substring(0,1)+"."+temp.substring(1,4)+"."+temp.substring(4,7)+"."+temp.substring(7,10)+Xdecim; }
	if (len==11) {
	decimal = temp.substring(0,2)+"."+temp.substring(2,5)+"."+temp.substring(5,8)+"."+temp.substring(8,11)+Xdecim; }
	if (len==12) {
	decimal = temp.substring(0,3)+"."+temp.substring(3,6)+"."+temp.substring(6,9)+"."+temp.substring(9,12)+Xdecim; }
	if (len > 12){
		alert("Maks. 999.999.999.999");
		return false;
	}
	return decimal
	
}

//Funktion til check af, at felter er udfyldt med tal - uden decimal ::::
function talCheck(vaerdiTastet) {
	if (vaerdiTastet == ""){
		return false;
	}
	for (i=0; i<vaerdiTastet.length; i++) {
		if (vaerdiTastet.charAt(i) < "0") {
			alert("Indtast kun HELE tal")
			return false;
			break;
		}
		if (vaerdiTastet.charAt(i) > "9") {
			alert("Indtast kun HELE tal")
			return false;
			break;
		}
	}
	return true
}

//Funktion til at sætte rigtige tegn (.,):
function SaetTegn(berbelob){
	//opdel berbelob i 2 for at erstatte punktum med komma som decimaltegn:
	Laengde =  berbelob.length;
	//Sæt komma som decimal-tegn:
	Xbelobpos1 = berbelob.indexOf(".");
	if (Xbelobpos1 >= 1){
		beloeb1 = berbelob.substr(0,Xbelobpos1);
		beloeb2 = berbelob.substr(Xbelobpos1 + 1,Laengde);
		beloeb = beloeb1+","+beloeb2;
	}
	else{
		beloeb = berbelob;
	}
	xbeloeb = String(beloeb);
	//Vis beloeb med punktum ved tusinder:
	talres(xbeloeb);
	resul1 = decimal
}


//BerKob1 anvendes, når der beregnes køb FRA kroner TIL valuta (K Ø B):

function BerKob1(valgKob){
	var xvalgkob,  valgkob, valgmntfod
	xvalgkob=valgKob.selectedIndex;
	valgkob=anbISO[xvalgkob-1] ;
      valgmnt=anbMNTFOD[xvalgkob-1];
	kob = document.ValutaForm.belobkob.value;
	if (talCheck(kob)){
            kobresul2 = anbSALG[xvalgkob-1]/100;
		kobresul1 = kob - gebyr;
		kobresul1 = kobresul1/kobresul2;
		xkobresul1 = String(kobresul1);
		//Vis resul1 med kun 2 decimaler
		decikob = xkobresul1.indexOf(".");
		if (decikob >= 1){
			xkobresul1 = xkobresul1.substr(0,decikob + 3);
		}
		SaetTegn(xkobresul1);
		talres(kob);
		kob = decimal
		
		// Opsætter tekst til KØB resultat:
		kobresul1 = "Du får " + resul1 + " " + valgmnt + " for dine  " + kob + " danske kroner <br>(Kurs: " + anbSALG[xvalgkob-1] + ")  <p><b>BEMÆRK! </b> Der skal betales kr. 25,00 i vekselgebyr, som du dog sparer, hvis du er aktionær i banken.";
		aabenVindue(kobresul1);
		}
}

//BerKob2 anvendes, når der beregnes køb TIL kroner FRA valuta (K Ø B):


function BerKob2(valgKob){
	var xvalgkob,  valgkob
	xvalgkob=valgKob.selectedIndex
	valgmnt=anbMNTFOD[xvalgkob-1];
      valgkob=anbISO[xvalgkob-1];
	kob = document.ValutaForm.belobkob2.value;
	if (talCheck(kob)){
		kobresul2 = anbSALG[xvalgkob-1]/100;
		kobresul1 = kob*kobresul2;
		kobresul1 = kobresul1 + gebyr;
		xkobresul1 = String(kobresul1);
		//Vis resul1 med kun 2 decimaler
		decikob = xkobresul1.indexOf(".");
		if (decikob >= 1){
			xkobresul1 = xkobresul1.substr(0,decikob + 3);
		}
		SaetTegn(xkobresul1);
		talres(kob);
		kob = decimal
		
		// Opsætter tekst til KØB resultat:
		kobresul1 = "Du skal betale  " + resul1 + " danske kroner for at købe  " + kob + "  " + valgmnt +"<br> (Kurs: " + anbSALG[xvalgkob-1] + ")  <p><b> BEMÆRK! </b>Der er inkluderet " + gebyr + " danske kroner  i gebyr, som du dog sparer, hvis du er aktionær i Tønder Bank";
		aabenVindue(kobresul1);
	}
}

