// Java Script functions 
// Calcolo del codice fiscale
// (c) Copyright 2001 Fabio TUCOL
// start          : 16/01/2001
// ultima modifica: 26/01/2001

// Autore:
// -----------------------------
// Fabio TUCOL
// tucol@supereva.it
// http://www.tucol.com
// -----------------------------

// Variables:
// --------------------------------------------------------------------------

var strCodFis="";
var strcognome="";
var strnome="";
var strgiornosex="";
var chrcontrollo='';



// Controls/Definitions:
// --------------------------------------------------------------------------
DefaultValues();

// --------------------------------------------------------------------------

// Functions:

// --------------------------------------------------------------------------
// Setta i prodotti ed i valori di default
// --------------------------------------------------------------------------
function DefaultValues() {
	strCodFis="";
	strcognome="";
	strnome="";
	strgiornosex="";
	chrcontrollo='';
	
	Cognome = "";
	Nome = "";
	Sesso = 0;
	Comune = "";
	CodiceFiscale = "";
	AnnoCento = 19;
	AnnoDieci = "0";
	AnnoZero = "0";
	Mese = "A";
	Giorno = 1;

	return;
}
// --------------------------------------------------------------------------
function CheckCognome() {
	if(document.FormCodFis.Cognome.value.length < 1) {
		alert("Attenzione:\nManca il Cognome!");
    	return(0);
   }
	document.FormCodFis.Cognome.value = document.FormCodFis.Cognome.value.toUpperCase();

	return(1);
}
// --------------------------------------------------------------------------
function CheckNome() {
	if(document.FormCodFis.Nome.value.length < 1) {
    	alert("Attenzione:\nManca il Nome!");
    	return(0);
   }
	document.FormCodFis.Nome.value = document.FormCodFis.Nome.value.toUpperCase();

	return(1);
}
// --------------------------------------------------------------------------
function CheckComune() {
	if(document.FormCodFis.Comune.value.length < 1) {
    	alert("Attenzione:\nManca il Comune!");
    	return(0);
   }
	document.FormCodFis.Comune.value = document.FormCodFis.Comune.value.toUpperCase();

	return(1);
}
// --------------------------------------------------------------------------
function CalcolaCodiceFiscale() {
	var gs=0;
	var i=0;
	var somma=0;
	
	strCodFis="";
	strcognome="";
	strnome="";
	strgiornosex="";
	chrcontrollo='';

	Giorno=parseInt(document.FormCodFis.Giorno.options[document.FormCodFis.Giorno.selectedIndex].value,10); 
	AnnoCento=parseInt(document.FormCodFis.AnnoCento.options[document.FormCodFis.AnnoCento.selectedIndex].value,10);
	AnnoDieci=document.FormCodFis.AnnoDieci.options[document.FormCodFis.AnnoDieci.selectedIndex].value;
	AnnoZero=document.FormCodFis.AnnoZero.options[document.FormCodFis.AnnoZero.selectedIndex].value;
	Mese=document.FormCodFis.Mese.options[document.FormCodFis.Mese.selectedIndex].value;
	Comune=document.FormCodFis.Comune.value;
	Sesso=parseInt(document.FormCodFis.Sesso.options[document.FormCodFis.Sesso.selectedIndex].value,10);

	if(CheckCognome() && CheckNome()) {
		//------------------------------------------------------------ 
  		// Processa il cognome
  		//----------------------------------------------------------------
    	for (i=0; i<document.FormCodFis.Cognome.value.length; i++) {
			switch (document.FormCodFis.Cognome.value.charAt(i)) {
				case 'A':
				case 'E':
				case 'I':
				case 'O':
				case 'U': break;            
				default : if((document.FormCodFis.Cognome.value.charAt(i)<='Z') && (document.FormCodFis.Cognome.value.charAt(i)>'A'))
								strcognome = strcognome + document.FormCodFis.Cognome.value.charAt(i);
			}
		}
    	if (strcognome.length < 3) {
       	for (i=0; i<document.FormCodFis.Cognome.value.length; i++) {
      		switch (document.FormCodFis.Cognome.value.charAt(i)) {
	            case 'A':
	            case 'E':
	            case 'I':
	            case 'O':
	            case 'U': strcognome = strcognome + document.FormCodFis.Cognome.value.charAt(i);
				}
			}
       	if (strcognome.length < 3) {
        		for (i=strcognome.length; i<=3; i++) {
        			strcognome = strcognome + 'X';
        		}
         }
      }
   	strcognome = strcognome.substring(0,3);
 		//------------------------------------------------------------ 
  		// processa il nome
  		//----------------------------------------------------------------
    	for (i=0; i<document.FormCodFis.Nome.value.length; i++) {
   		switch (document.FormCodFis.Nome.value.charAt(i)) {
	         case 'A':
	         case 'E':
	         case 'I':
	         case 'O':
	         case 'U': break;
	         default: if((document.FormCodFis.Nome.value.charAt(i)<='Z') && (document.FormCodFis.Nome.value.charAt(i)>'A'))
                  		strnome = strnome + document.FormCodFis.Nome.value.charAt(i);
			}
		}
    	if (strnome.length > 3) {
      	strnome = strnome.substring(0,1) + strnome.substring(2,4);
      } 
    	else {
    		if (strnome.length < 3) {
         	for (i=0; i<document.FormCodFis.Nome.value.length; i++) {
          		switch (document.FormCodFis.Nome.value.charAt(i)) {
             		case 'A':
		          	case 'E':
		            case 'I':
		            case 'O':
		            case 'U': strnome = strnome + document.FormCodFis.Nome.value.charAt(i);
		    		}
         	}
       		if (strnome.length < 3) {
          		for (i=strnome.length; i<=3; i++) 
           			{strnome = strnome + 'X';}
        		}
     		}
     		strnome = strnome.substring(0,3);
  		}
		//--------------------------------------- Fine processa nome
 		// processa giorno e sesso
 		//--------------------------------------------
  		gs = Giorno + (40 * Sesso);
  		if(gs<10) strgiornosex = "0" + gs;
  		else strgiornosex =  gs;

 		strCodFis = strcognome + strnome + AnnoDieci + AnnoZero + Mese + strgiornosex + Comune;
 		//--------------------------------------------
 		// calcola la cifra di controllo
 		//--------------------------------------------
		for (i=0; i<15; i++) {
			if (((i+1) % 2) != 0) {								//caratteri dispari
				switch (strCodFis.charAt(i)) {
		         case '0':
		         case 'A':{ somma += 1; break;}
		         case '1':
		         case 'B':{ somma += 0; break;}
		         case '2':
		         case 'C':{ somma += 5; break;}
		         case '3':
		         case 'D':{ somma += 7; break;}
		         case '4':
		         case 'E':{ somma += 9; break;}
		         case '5':
		         case 'F':{ somma += 13; break;}
		         case '6':
		         case 'G':{ somma += 15; break;}
		         case '7':
		         case 'H':{ somma += 17; break;}
		         case '8':
		         case 'I':{ somma += 19; break;}
		         case '9':
		         case 'J':{ somma += 21; break;}
		         case 'K':{ somma += 2; break;}
		         case 'L':{ somma += 4; break;}
		         case 'M':{ somma += 18; break;}
		         case 'N':{ somma += 20; break;}
		         case 'O':{ somma += 11; break;}
		         case 'P':{ somma += 3; break;}
		         case 'Q':{ somma += 6; break;}
		         case 'R':{ somma += 8; break;}
		         case 'S':{ somma += 12; break;}
		         case 'T':{ somma += 14; break;}
		         case 'U':{ somma += 16; break;}
		         case 'V':{ somma += 10; break;}
		         case 'W':{ somma += 22; break;}
		         case 'X':{ somma += 25; break;}
		         case 'Y':{ somma += 24; break;}
		         case 'Z':{ somma += 23; break;}
				}
			} 
			else { 														//caratteri pari
				switch (strCodFis.charAt(i)) {
		         case '0':
		         case 'A':{ somma += 0; break;}
		         case '1':
		         case 'B':{ somma += 1; break;}
		         case '2':
		         case 'C':{ somma += 2; break;}
		         case '3':
		         case 'D':{ somma += 3; break;}
		         case '4':
		         case 'E':{ somma += 4; break;}
		         case '5':
		         case 'F':{ somma += 5; break;}
		         case '6':
		         case 'G':{ somma += 6; break;}
		         case '7':
		         case 'H':{ somma += 7; break;}
		         case '8':
		         case 'I':{ somma += 8; break;}
		         case '9':
		         case 'J':{ somma += 9; break;}
		         case 'K':{ somma += 10; break;}
		         case 'L':{ somma += 11; break;}
		         case 'M':{ somma += 12; break;}
		         case 'N':{ somma += 13; break;}
		         case 'O':{ somma += 14; break;}
		         case 'P':{ somma += 15; break;}
		         case 'Q':{ somma += 16; break;}
		         case 'R':{ somma += 17; break;}
		         case 'S':{ somma += 18; break;}
		         case 'T':{ somma += 19; break;}
		         case 'U':{ somma += 20; break;}
		         case 'V':{ somma += 21; break;}
		         case 'W':{ somma += 22; break;}
		         case 'X':{ somma += 23; break;}
		         case 'Y':{ somma += 24; break;}
		         case 'Z':{ somma += 25; break;}
				}
			}
		}
   	somma %= 26;
   	switch (somma) {
			case 0: {chrcontrollo='A'; break;}
			case 1: {chrcontrollo='B'; break;}
			case 2: {chrcontrollo='C'; break;}
			case 3: {chrcontrollo='D'; break;}
			case 4: {chrcontrollo='E'; break;}
			case 5: {chrcontrollo='F'; break;}
			case 6: {chrcontrollo='G'; break;}
			case 7: {chrcontrollo='H'; break;}
			case 8: {chrcontrollo='I'; break;}
			case 9: {chrcontrollo='J'; break;}
			case 10: {chrcontrollo='K'; break;}
			case 11: {chrcontrollo='L'; break;}
			case 12: {chrcontrollo='M'; break;}
			case 13: {chrcontrollo='N'; break;}
			case 14: {chrcontrollo='O'; break;}
			case 15: {chrcontrollo='P'; break;}
			case 16: {chrcontrollo='Q'; break;}
			case 17: {chrcontrollo='R'; break;}
			case 18: {chrcontrollo='S'; break;}
			case 19: {chrcontrollo='T'; break;}
			case 20: {chrcontrollo='U'; break;}
			case 21: {chrcontrollo='V'; break;}
			case 22: {chrcontrollo='W'; break;}
			case 23: {chrcontrollo='X'; break;}
			case 24: {chrcontrollo='Y'; break;}
			case 25: {chrcontrollo='Z'; break;}
		}
		//--------------------------------------------

		document.FormCodFis.CodiceFiscale.value = strCodFis + chrcontrollo;
	}

return; 
}

function wind(str) {
	searchWin = window.open(str,'wind','scrollbars=no,resizable=no,width=400,height=200,status=no,location=no,toolbar=no');
}

function vai() {
	pos=document.prov.comuni.selectedIndex;

	if (pos>-1) {
		com=document.prov.comuni.options[pos].value;
     	window.opener.document.FormCodFis.Comune.value=com;
     	self.close();
	}
}

function esci() {
	self.close();
}

// --------------------------------------------------------------------------
//  END OF SCRIPT
// --------------------------------------------------------------------------