function MakeArray(n) {
   this.length = n;
   for (var i = 1; i <= n; i++) { 
     this[i] = 0 }
     return this
     }
// function MakeArray()

// fonction pour déterminer la tranche tarif poids 
function TPoids(CodeZone,Pays) {
var Poids, NZoneTarif;
Tz = new MakeArray(20);
Poids = parseFloat(document.Order.TotalWeight_PoidsColis.value)


// ZONE A --> union europeenne et suisse, gibraltar, liechtenstein, saint marin et vatican
// ZONE B --> autres pays d'europe, algérie, maroc et tunisie;
// ZONE C --> autres pays d'afrique, canada, états-unis, proche et moyen orient
// ZONE D --> autres destinations

// Soleil\Parking\LaPoste Le répertoire ou se trouve les fichiers de références des prix effectuer par de la poste datant du 13/10/2006
// Tarif colieco retrouver à l'adresse : http://www.coliposte.net/gp/services/convoyeurpage.jsp?iddoc=318&popup=popup

// Tz[1] --> Colis postaux SERVICE PRIORITAIRE ZONE A
// Tz[2] --> Colis postaux SERVICE PRIORITAIRE ZONE B
// Tz[3] --> Colis postaux SERVICE PRIORITAIRE ZONE C
// Tz[4] --> Colis postaux SERVICE PRIORITAIRE ZONE D
// Tz[7] --> Colissimo INTRA-DEPARTEMENTAL  !!!!  contient maintenant intra et extra
// Tz[8] --> Colissimo EXTRA-DEPARTEMENTAL  !!!!  n'est plus en vigeur --> remplacé par Tz[7]
// Tz[9] --> Colis OUTRE-MER DOM PRIORITAIRE
// Tz[10] --> Colis OUTRE-MER TOM PRIORITAIRE
// Tz[11] --> Colis postaux SERVICE ECONOMIQUE ZONE A  !!!!!  n'est plus en vigeur --> remplacé par Tz[1]
// Tz[12] --> Colis postaux SERVICE ECONOMIQUE ZONE B  
// Tz[13] --> Colis postaux SERVICE ECONOMIQUE ZONE C 
// Tz[14] --> Colis postaux SERVICE ECONOMIQUE ZONE D  
// Tz[17] --> COLIECO 
// Tz[19] --> Colis OUTRE-MER DOM ECONOMIQUE
// Tz[20] --> Colis OUTRE-MER TOM ECONOMIQUE


if (Poids < 500)			Tz[1]=15.90,  	Tz[2]=19.20,  	Tz[3]= 22.10, 	Tz[4]= 24.40,	Tz[7]= 5.50,	Tz[8]=0.00,		Tz[9]= 8.35,	Tz[10]=	10.00,		Tz[12]=15.45,		Tz[13]= 16.90,	 	Tz[14]= 21.50,		Tz[19]= 6.70,		Tz[20]=8.80;	
else if (Poids < 1000) 		Tz[1]=15.90,  	Tz[2]=19.20,  	Tz[3]= 22.10, 	Tz[4]= 24.40,	Tz[7]= 6.70,	Tz[8]=0.00,		Tz[9]=12.55,	Tz[10]=	15.00,		Tz[12]=15.45,		Tz[13]= 16.90,	 	Tz[14]= 21.50,		Tz[19]= 8.55,		Tz[20]=11.40;	
else if (Poids < 2000)		Tz[1]=17.45, 	Tz[2]=21.10, 	Tz[3]= 29.50, 	Tz[4]= 36.60, 	Tz[7]= 7.65,	Tz[8]=0.00,		Tz[9]=17.15, 	Tz[10]= 26.50,		Tz[12]=18.00, 		Tz[13]= 21.05,		Tz[14]= 28.80,		Tz[19]= 9.50,		Tz[20]=18.60;	
else if (Poids < 3000)		Tz[1]=21.05, 	Tz[2]=25.50,  	Tz[3]= 38.70, 	Tz[4]= 48.80, 	Tz[7]= 8.60,	Tz[8]=0.00,		Tz[9]=21.75, 	Tz[10]= 38.00,		Tz[12]=21.60, 		Tz[13]= 25.20, 		Tz[14]= 36.90,		Tz[19]=10.45,		Tz[20]=25.80;
else if (Poids < 4000)		Tz[1]=24.65, 	Tz[2]=29.90, 	Tz[3]= 47.90,  	Tz[4]= 61.00,	Tz[7]=10.50,	Tz[8]=0.00,		Tz[9]=26.35, 	Tz[10]= 49.50,		Tz[12]=25.20, 		Tz[13]= 32.40, 		Tz[14]= 45.00,		Tz[19]=11.40,		Tz[20]=33.00;
else if (Poids < 5000)		Tz[1]=28.25, 	Tz[2]=34.30,  	Tz[3]= 57.10,	Tz[4]= 73.20,	Tz[7]=10.50,	Tz[8]=0.00,		Tz[9]=30.95,	Tz[10]= 61.00,		Tz[12]=28.80, 		Tz[13]= 39.60, 		Tz[14]= 53.10,		Tz[19]=12.35,		Tz[20]=40.20;
else if (Poids < 6000)		Tz[1]=31.85,  	Tz[2]=38.70,  	Tz[3]= 66.30,  	Tz[4]= 85.40,	Tz[7]=12.40,	Tz[8]=0.00,		Tz[9]=35.55, 	Tz[10]= 72.50,		Tz[12]=32.40, 		Tz[13]= 46.80, 		Tz[14]= 61.20,		Tz[19]=13.30,		Tz[20]=47.40;
else if (Poids < 7000)		Tz[1]=35.45,  	Tz[2]=43.10,  	Tz[3]= 75.50,  	Tz[4]= 97.60,	Tz[7]=12.40,	Tz[8]=0.00,		Tz[9]=40.15, 	Tz[10]= 84.00,		Tz[12]=36.00, 		Tz[13]= 54.00, 		Tz[14]= 69.30,		Tz[19]=14.80,		Tz[20]=54.60;
else if (Poids < 8000)		Tz[1]=39.05,  	Tz[2]=47.50,  	Tz[3]= 84.70,  	Tz[4]=109.80,	Tz[7]=15.25,	Tz[8]=0.00,		Tz[9]=44.75, 	Tz[10]= 95.50,		Tz[12]=39.60, 		Tz[13]= 61.20, 		Tz[14]= 77.40,		Tz[19]=16.30,		Tz[20]=61.80;
else if (Poids < 9000)		Tz[1]=42.65,  	Tz[2]=51.90, 	Tz[3]= 93.90,  	Tz[4]=122.00,	Tz[7]=15.25,	Tz[8]=0.00,		Tz[9]=49.35,	Tz[10]=107.00,		Tz[12]=43.20, 		Tz[13]= 68.40, 		Tz[14]= 85.50,		Tz[19]=17.80,		Tz[20]=69.00;
else if (Poids < 10000)		Tz[1]=46.25, 	Tz[2]=56.30, 	Tz[3]=103.10,  	Tz[4]=134.20,	Tz[7]=15.25,	Tz[8]=0.00,		Tz[9]=53.95,	Tz[10]=118.50,		Tz[12]=46.80, 		Tz[13]= 75.60, 		Tz[14]= 93.60,		Tz[19]=19.30,		Tz[20]=76.20;
else if (Poids < 15000)		Tz[1]=53.25, 	Tz[2]=66.40,  	Tz[3]=126.10,  	Tz[4]=158.60,	Tz[7]=17.25,	Tz[8]=0.00,		Tz[9]=76.95, 	Tz[10]=176.50,		Tz[12]=54.40, 		Tz[13]= 90.20, 		Tz[14]=112.80,		Tz[19]=25.20, 		Tz[20]=122.20;
else if (Poids < 20000)		Tz[1]=60.25, 	Tz[2]=76.50,  	Tz[3]=149.10,  	Tz[4]=183.00,	Tz[7]=23.25,	Tz[8]=0.00,		Tz[9]=99.95, 	Tz[10]=234.50,		Tz[12]=62.00, 		Tz[13]=104.80, 		Tz[14]=132.00,		Tz[19]=31.10, 		Tz[20]=168.20;
else if (Poids < 25000)		Tz[1]=67.25,  	Tz[2]=86.60,  	Tz[3]=172.10,  	Tz[4]=231.80,	Tz[7]=23.25,	Tz[8]=0.00,		Tz[9]=122.95,	Tz[10]=292.50,		Tz[12]=69.60, 		Tz[13]=119.40, 		Tz[14]=151.20,		Tz[19]=37.00, 		Tz[20]=214.20;
else if (Poids < 30000)		Tz[1]=74.25,  	Tz[2]=96.70,  	Tz[3]=195.10,  	Tz[4]=280.60,	Tz[7]=23.25,	Tz[8]=0.00,		Tz[9]=145.95, 	Tz[10]=350.50,		Tz[12]=77.20, 		Tz[13]=134.00, 		Tz[14]=170.40,		Tz[19]=42.90, 		Tz[20]=260.20;

NZoneTarif = CodeZone;

if (document.Order.L_Country_Pays.value == "France" || document.Order.Country_Pays.value == "France") 
{
	if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "" && document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "67") NZoneTarif = 'region';
	else if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "" && document.Order.ZipCode_CodePostal.value.substring(0,2) == "67") NZoneTarif = 'region';
	
	if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "" && document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "68") NZoneTarif = 'region';
	else if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "" && document.Order.ZipCode_CodePostal.value.substring(0,2) == "68") NZoneTarif = 'region';
	
	if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "" && document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "88") NZoneTarif = 'region';
	else if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "" && document.Order.ZipCode_CodePostal.value.substring(0,2) == "88") NZoneTarif = 'region';
	
	if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "" && document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "57") NZoneTarif = 'region';
	else if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "" && document.Order.ZipCode_CodePostal.value.substring(0,2) == "57") NZoneTarif = 'region';
	
	if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "" && document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "54") NZoneTarif = 'region';
	else if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "" && document.Order.ZipCode_CodePostal.value.substring(0,2) == "54") NZoneTarif = 'region';
}

if (document.Order.VitessePort.value == "1") 
{
	if (document.Order.Shipping_Mode_Envoi[1].checked)  NZoneTarif = CodeZone + 10;

	if (NZoneTarif == 11) { NZoneTarif = 7 } ; //// Tz[11] --> Colis postaux SERVICE ECONOMIQUE ZONE A  !!!!!  n'est plus en vigeur --> remplacé par Tz[1]
	if (NZoneTarif == 17) { NZoneTarif = 7 } ; // plus d'écocoli depuis 2006 ;
	
}
if (document.Order.VitessePort.value == "2") 
{
      NZoneTarif = CodeZone + 10;
// si Colis postaux SERVICE ECONOMIQUE ZONE A plus en vigueur
	// si certains tarifs plyus en vigeur on les lie au bons
	if (NZoneTarif == 11) { NZoneTarif = 7 } ; //// Tz[11] --> Colis postaux SERVICE ECONOMIQUE ZONE A  !!!!!  n'est plus en vigeur --> remplacé par Tz[1]
	if (NZoneTarif == 17) { NZoneTarif = 7 } ; // plus d'écocoli depuis 2006 ;
	
}

// initialisation variables
	ContreRemboursement=8.4;
	FraisExpedition=0;

// decommenter si difference intra et extradepartemental
// if (NZoneTarif == 7){
// 	if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "" && document.Order.L_ZipCode_CodePostal.value.substring(0,2) != "67") NZoneTarif = 8;
// 	else if (document.Order.L_ZipCode_CodePostal.value.substring(0,2) == "" && document.Order.ZipCode_CodePostal.value.substring(0,2) != "67") NZoneTarif = 8;
// 	}

/*if (Tz[NZoneTarif] == 0) {
	window.alert("Le poids de la commande est trop lourd pour un colis postal. Nous vous contacterons pour organiser le port / postal packet to heavy, we will contact-you for shippment");
  	document.Order.Name_Nom.select();
  	document.Order.Name_Nom.focus();
	}
else {*/

// ajout cout forfaitaire emballage
	FraisExpedition = Tz[NZoneTarif]+ parseInt(document.Order.ForfaitEmballage.value*100)/100;

// recommandation
// France et DOM TOM
if (NZoneTarif == 7 || NZoneTarif == 8 || NZoneTarif == 9 || NZoneTarif == 10 || NZoneTarif == 17 || NZoneTarif == 19 || NZoneTarif == 20 ) 
{
// calcul du prix recommandation France,Dom et TOM
	if (parseFloat(document.Order.TotalMarchandises.value) > 153) Recommandation=0;
	else 
	{
		if (parseFloat(document.Order.TotalMarchandises.value) > 16) Recommandation=0;
		else Recommandation=2.50;
	}
	// ajout recommandation
	if (document.Order.RecommandationFrance.value == "1")
	{
		FraisExpedition =FraisExpedition+Recommandation;
			// ajout avis réception
			if (document.Order.AvisReceptionFrance.value == "1")	
			FraisExpedition = FraisExpedition+0;
	}
	// si recommandation pas en std il faut la prévoir dans le CR
	else ContreRemboursement = ContreRemboursement+Recommandation;
	
	// Franco ou réduction France certaine somme  
	document.Order.Frais_Exp_Indicatif.value = parseInt((FraisExpedition/document.Order.Devises.value)*100)/100;
	if (NZoneTarif == 7 || NZoneTarif == 8 ||  NZoneTarif == 17)
	{
		if ((parseFloat(document.Order.TotalMarchandises.value)/1) >= document.Order.FrancoTTCEuros.value) 
		{
			FexpCR = FraisExpedition + ContreRemboursement;
		}
		else 
		{
			if ((parseFloat(document.Order.TotalMarchandises.value)/1) >= document.Order.FrancoTTCEurosS2.value)
			{
				FexpCR = FraisExpedition/2 + ContreRemboursement;
			}
			else
			{
				FexpCR = ContreRemboursement;
			} 
		}
	}

	if (document.Order.CR.checked) 
	{
		FraisExpedition = FraisExpedition + ContreRemboursement;
	}
	else
	{
		if (NZoneTarif == 7 || NZoneTarif == 8 ||  NZoneTarif == 17)
		{
			if ((parseFloat(document.Order.TotalMarchandises.value)/1) >= document.Order.FrancoTTCEuros.value) 
			{
					FraisExpedition = 0;
			} 
			else 
			{
				if ((parseFloat(document.Order.TotalMarchandises.value)/1) >= document.Order.FrancoTTCEurosS2.value)
				{
					FraisExpedition = FraisExpedition/2;
				}
			}
		} 
	}
	
	// Frais fixe jusqu'à un certain poids
	/*if ((Poids < 5000) && (NZoneTarif == 7 || NZoneTarif == 8 || NZoneTarif == 17)) {
	FraisExpedition = 9.5;
	} */
	
	// Spindler
	if ((Poids < 3000) && (NZoneTarif == 7 || NZoneTarif == 8 || NZoneTarif == 17)) {
	FraisExpedition = 12.00;
	} 
	else if ((Poids > 3000) && (Poids < 5000) && (NZoneTarif == 7 || NZoneTarif == 8 || NZoneTarif == 17)) {
	FraisExpedition = 12.00;
	} 
	else if ((Poids > 5000) && (NZoneTarif == 7 || NZoneTarif == 8 || NZoneTarif == 17)) {
		FraisExpedition = 12.00*(parseInt(Poids/5000)+1);
	}
	
	// si c'est France DOM on vérifie que le prix normal de des dOM est inférieure au prix de la France, sans quoi on augmente au prix fixe.
	if (NZoneTarif == 19 ){
		
		FraisTest = 12.00*(parseInt(Poids/5000)+1);
		
		if ((Poids < 3000) && FraisExpedition<12.00){
		FraisExpedition = 12.00;}
		
		if ((Poids > 3000 && Poids < 5000) && FraisExpedition <12.00){
		FraisExpedition = 12.00;}
		
		if (Poids > 5000 && FraisExpedition < FraisTest ){
		FraisExpedition = FraisTest;}
	}
	
}
	// etranger
else {
	Recommandation = 4.00;
	if (document.Order.RecommandationEtranger.value == "1")
	{
		FraisExpedition = FraisExpedition+Recommandation;
		if (document.Order.AvisReceptionEtranger.value == "1")	
				FraisExpedition = FraisExpedition+1.30;
	}
	// si recommandation pas en std il faut la prévoir dans le CR
	else ContreRemboursement = ContreRemboursement+Recommandation;
	document.Order.Frais_Exp_Indicatif.value = parseInt((FraisExpedition/document.Order.Devises.value)*100)/100;
	FexpCR = ContreRemboursement;
	
	frais_supp = (parseInt((parseFloat(document.Order.TotalMarchandises.value)/76.22))+1)*0.38; 
	if(frais_supp<2.29){frais_supp=2.29;}
	FraisExpedition = FraisExpedition + frais_supp;
}
// prix forfaitaire pour la France 
if (document.Order.ForfaitFrance.value != "0") 
{
	if (NZoneTarif == 7 || NZoneTarif == 8 || NZoneTarif == 17) 
	{ 
		ContreRemboursement = ContreRemboursement + FraisExpedition - parseFloat(document.Order.ForfaitFrance.value);
		FraisExpedition=parseFloat(document.Order.ForfaitFrance.value);
	}

	if (document.Order.recipient.value == "outillage2000@nsrv.com") 
	{
		if (document.Order.Lg.value == "fr")
		{
			// commande d'un catalogue uniquement à partir de France
			if (parseInt(document.Order.TotalMarchandises.value*100) == parseInt(document.Order.FrancoTTCEurosEgal.value*100))
			{
				// neutralise frais recommandation 
				FraisExpedition = 0;
			}
		}

	}
}

// Frais fixes pour départements limitrophes
if (NZoneTarif == 'region') FraisExpedition=9;
		
document.Order.Shipping_Port.value = parseInt((FraisExpedition/document.Order.Devises.value)*100)/100;
// spécifique port gratuit sauf en cas de CR
// document.Order.PrixCR.value = parseInt((FexpCR/document.Order.Devises.value)*100)/100;
// sinon
// document.Order.PrixCR.value = parseInt((ContreRemboursement/document.Order.Devises.value)*100)/100;

document.Order.Total_toPay_aPayer.value = parseFloat(document.Order.TotalMarchandises.value) + parseFloat(document.Order.Shipping_Port.value);
document.Order.Total_toPay_aPayer.value = parseInt(document.Order.Total_toPay_aPayer.value*100)/100;	
document.Order.Total_toPay_aPayer_DevisesSec.value = 'FF' + parseInt((document.Order.Total_toPay_aPayer.value*100)*6.55957)/100;

CorrectPrices(document.Order.Total_toPay_aPayer.value * 100);

document.Order.Total_toPay_aPayer_Dev.value =  fixprice;

}
// function TPoids()
// -->
// fonction pour déterminer la zone 
function DZone() {
var Pays;
var Ord;
var CodeZone;
Ord = document.Order;
CodeZone = 0;
Pays = Ord.Country_Pays.options[Ord.Country_Pays.selectedIndex].value; 
if (Ord.L_Country_Pays.options[Ord.L_Country_Pays.selectedIndex].value != "Select") Pays = Ord.L_Country_Pays.options[Ord.L_Country_Pays.selectedIndex].value; 
if (Pays == "") CodeZone = 0;
else if (Pays == "Select") CodeZone=0;
        else if (Pays == "France") CodeZone=7;
	  else if (Pays == "France DOM") CodeZone=9;
        else if (Pays == "France TOM") CodeZone=10;
        else if (Pays == "Afghanistan") CodeZone=4;
        else if (Pays == "Albania") CodeZone=2;
        else if (Pays == "Algeria") CodeZone=2;
        else if (Pays == "American Samoa") CodeZone=4;
        else if (Pays == "Andorra") CodeZone=2;
        else if (Pays == "Angola") CodeZone=3;
        else if (Pays == "Anguilla") CodeZone=4;
        else if (Pays == "Antarctica") CodeZone=4;
        else if (Pays == "Antigua and Barbuda") CodeZone=4;
        else if (Pays == "Argentina") CodeZone=4;
        else if (Pays == "Armenia") CodeZone=4;
        else if (Pays == "Australia") CodeZone=4;
        else if (Pays == "Austria") CodeZone=1;
        else if (Pays == "Azerbaijan") CodeZone=4;
        else if (Pays == "Bahamas") CodeZone=4;
        else if (Pays == "Bahrain") CodeZone=3;
        else if (Pays == "Bangladesh") CodeZone=4;
        else if (Pays == "Barbados") CodeZone=4;
        else if (Pays == "Belarus") CodeZone=2;
        else if (Pays == "Belgium") CodeZone=1;
        else if (Pays == "Belize") CodeZone=4;
        else if (Pays == "Benin") CodeZone=4;
        else if (Pays == "Bermuda") CodeZone=4;
        else if (Pays == "Bhutan") CodeZone=4;
        else if (Pays == "Bolivia") CodeZone=4;
        else if (Pays == "Bosnia and Herzegowina") CodeZone=2;
        else if (Pays == "Botswana") CodeZone=2;
        else if (Pays == "Bouvet Island") CodeZone=4;
        else if (Pays == "Brazil") CodeZone=4;
        else if (Pays == "British Indian Ocean Territory") CodeZone=4;
        else if (Pays == "Brunei Darussalam") CodeZone=4;
        else if (Pays == "Bulgaria") CodeZone=2;
        else if (Pays == "Burkina Faso") CodeZone=3;
        else if (Pays == "Burundi") CodeZone=3;
        else if (Pays == "Cambodia") CodeZone=4;
        else if (Pays == "Cameroon") CodeZone=3;
        else if (Pays == "Canada") CodeZone=3;
        else if (Pays == "CapeVerde") CodeZone=4;
        else if (Pays == "Cayman Islands") CodeZone=3;
        else if (Pays == "Central African Republic") CodeZone=3;
        else if (Pays == "Chad") CodeZone=3;
        else if (Pays == "Chile") CodeZone=4;
        else if (Pays == "China") CodeZone=4;
        else if (Pays == "Christmas Island") CodeZone=4;
        else if (Pays == "Cocos (Keeling) Islands") CodeZone=4;
        else if (Pays == "Colombia") CodeZone=4;
        else if (Pays == "Comoros") CodeZone=4;
        else if (Pays == "Congo") CodeZone=3;
        else if (Pays == "Cook Islands") CodeZone=4;
        else if (Pays == "Costa Rica") CodeZone=4;
        else if (Pays == "Cote D'Ivoire") CodeZone=3;
        else if (Pays == "Croatia") CodeZone=2;
        else if (Pays == "Cuba") CodeZone=3;
        else if (Pays == "Cyprus") CodeZone=2;
        else if (Pays == "Czech Republic") CodeZone=2;
        else if (Pays == "Denmark") CodeZone=1;
        else if (Pays == "Djibouti") CodeZone=3;
        else if (Pays == "Dominica") CodeZone=4;
        else if (Pays == "Dominican Republic") CodeZone=4;
        else if (Pays == "East Timor") CodeZone=4;
        else if (Pays == "Ecuador") CodeZone=4;
        else if (Pays == "Egypt") CodeZone=3;
        else if (Pays == "El Salvador") CodeZone=4;
        else if (Pays == "Equatorial Guinea") CodeZone=3;
        else if (Pays == "Eritrea") CodeZone=4;
        else if (Pays == "Estonia") CodeZone=2;
        else if (Pays == "Ethiopia") CodeZone=3;
        else if (Pays == "Falkland Islands") CodeZone=4;
        else if (Pays == "Faroe Islands") CodeZone=4;
        else if (Pays == "Fiji") CodeZone=4;
        else if (Pays == "Finland") CodeZone=2;
         else if (Pays == "Gabon") CodeZone=3;
        else if (Pays == "Gambia") CodeZone=3;
        else if (Pays == "Georgia") CodeZone=4;
        else if (Pays == "Germany") CodeZone=1;
        else if (Pays == "Ghana") CodeZone=3;
        else if (Pays == "Gibraltar") CodeZone=1;
        else if (Pays == "Greece") CodeZone=1;
        else if (Pays == "Greenland") CodeZone=4;
        else if (Pays == "Grenada") CodeZone=4;
        else if (Pays == "Guadeloupe") CodeZone=9;
        else if (Pays == "Guam") CodeZone=4;
        else if (Pays == "Guatemala") CodeZone=4;
        else if (Pays == "Guinea") CodeZone=3;
        else if (Pays == "Guinea-Bissau") CodeZone=3;
        else if (Pays == "Guyana") CodeZone=9;
        else if (Pays == "Haiti") CodeZone=4;
        else if (Pays == "Heard and McDonald Islands") CodeZone=4;
        else if (Pays == "Honduras") CodeZone=4;
        else if (Pays == "Hong Kong") CodeZone=4;
        else if (Pays == "Hungary") CodeZone=2;
        else if (Pays == "Iceland") CodeZone=2;
        else if (Pays == "India") CodeZone=4;
        else if (Pays == "Indonesia") CodeZone=4;
        else if (Pays == "Iran") CodeZone=3;
        else if (Pays == "Iraq") CodeZone=3;
        else if (Pays == "Ireland") CodeZone=1;
        else if (Pays == "Israel") CodeZone=3;
        else if (Pays == "Italy") CodeZone=1;
        else if (Pays == "Jamaica") CodeZone=4;
        else if (Pays == "Japan") CodeZone=4;
        else if (Pays == "Jordan") CodeZone=3;
        else if (Pays == "Kazakhstan") CodeZone=4;
        else if (Pays == "Kenya") CodeZone=3;
        else if (Pays == "Kiribati") CodeZone=4;
        else if (Pays == "Korea, North ") CodeZone=4;
        else if (Pays == "Korea, South") CodeZone=4;
        else if (Pays == "Kuwait") CodeZone=3;
        else if (Pays == "Kyrgyzstan") CodeZone=4;
        else if (Pays == "Lao People's Democratic Republic") CodeZone=4;
        else if (Pays == "Latvia") CodeZone=4;
        else if (Pays == "Lebanon") CodeZone=3;
        else if (Pays == "Lesotho") CodeZone=3;
        else if (Pays == "Liberia") CodeZone=3;
        else if (Pays == "Libyan Arab Jamahiriya") CodeZone=3;
        else if (Pays == "Liechtenstein") CodeZone=1;
        else if (Pays == "Lithuania") CodeZone=2;
        else if (Pays == "Luxembourg") CodeZone=1;
        else if (Pays == "Macau") CodeZone=4;
        else if (Pays == "Macedonia") CodeZone=2;
        else if (Pays == "Madagascar") CodeZone=3;
        else if (Pays == "Malawi") CodeZone=3;
        else if (Pays == "Malaysia") CodeZone=4;
        else if (Pays == "Maldives") CodeZone=4;
        else if (Pays == "Mali") CodeZone=3;
        else if (Pays == "Malta") CodeZone=2;
        else if (Pays == "Marshall Islands") CodeZone=4;
        else if (Pays == "Martinique") CodeZone=9;
        else if (Pays == "Mauritania") CodeZone=3;
        else if (Pays == "Mauritius") CodeZone=4;
        else if (Pays == "Mayotte") CodeZone=9;
        else if (Pays == "Mexico") CodeZone=4;
        else if (Pays == "Micronesia, Federated States of ") CodeZone=4;
        else if (Pays == "Moldova, Republic of ") CodeZone=2;
        else if (Pays == "Monaco") CodeZone=1;
        else if (Pays == "Mongolia") CodeZone=4;
        else if (Pays == "Montserrat") CodeZone=4;
        else if (Pays == "Morocco") CodeZone=2;
        else if (Pays == "Mozambique") CodeZone=3;
        else if (Pays == "Myanmar") CodeZone=4;
        else if (Pays == "Namibia") CodeZone=3;
        else if (Pays == "Nauru") CodeZone=4;
        else if (Pays == "Nepal") CodeZone=4;
        else if (Pays == "Netherlands") CodeZone=1;
        else if (Pays == "Netherlands Antilles") CodeZone=4;
        else if (Pays == "New Caledonia") CodeZone=10;
        else if (Pays == "New Zealand") CodeZone=4;
        else if (Pays == "Nicaragua") CodeZone=4;
        else if (Pays == "Niger") CodeZone=3;
        else if (Pays == "Nigeria") CodeZone=3;
        else if (Pays == "Niue") CodeZone=4;
        else if (Pays == "Norfolk Island") CodeZone=4;
        else if (Pays == "Northern Mariana Islands") CodeZone=4;
        else if (Pays == "Norway") CodeZone=2;
        else if (Pays == "Oman") CodeZone=3;
        else if (Pays == "Pakistan") CodeZone=4;
        else if (Pays == "Palau") CodeZone=4;
        else if (Pays == "Panama") CodeZone=4;
        else if (Pays == "Papau New Guinea") CodeZone=4;
        else if (Pays == "Paraguay") CodeZone=4;
        else if (Pays == "Peru") CodeZone=4;
        else if (Pays == "Philippines") CodeZone=4;
        else if (Pays == "Pitcairn") CodeZone=4;
        else if (Pays == "Poland") CodeZone=2;
        else if (Pays == "Portugal") CodeZone=1;
        else if (Pays == "Puerto Rico") CodeZone=4;
        else if (Pays == "Qatar") CodeZone=3;
        else if (Pays == "Reunion") CodeZone=9;
        else if (Pays == "Romania") CodeZone=2;
        else if (Pays == "Russian Federation ") CodeZone=2;
        else if (Pays == "Rwanda") CodeZone=3;
        else if (Pays == "Saint Kitts and Nevis") CodeZone=4;
        else if (Pays == "Saint Lucia") CodeZone=4;
        else if (Pays == "Saint Vincent and the Grenadines") CodeZone=4;
        else if (Pays == "Samoa") CodeZone=4;
        else if (Pays == "San Marino") CodeZone=1;
        else if (Pays == "Sao Tome and Principe") CodeZone=4;
        else if (Pays == "Saudi Arabia") CodeZone=4;
        else if (Pays == "Senegal") CodeZone=3;
        else if (Pays == "Seychelles") CodeZone=4;
        else if (Pays == "Sierra Leone") CodeZone=3;
        else if (Pays == "Singapore") CodeZone=4;
        else if (Pays == "Slovakia") CodeZone=2;
        else if (Pays == "Slovenia") CodeZone=2;
        else if (Pays == "Solomon Islands") CodeZone=4;
        else if (Pays == "Somalia") CodeZone=3;
        else if (Pays == "South Africa") CodeZone=3;
        else if (Pays == "South Georgia and the South Sandwich Islands") CodeZone=4;
        else if (Pays == "Spain") CodeZone=1;
        else if (Pays == "Sri Lanka") CodeZone=4;
        else if (Pays == "St. Helena") CodeZone=4;
        else if (Pays == "St. Pierre and Miquelon") CodeZone=9;
        else if (Pays == "Sudan") CodeZone=3;
        else if (Pays == "Suriname") CodeZone=4;
        else if (Pays == "Svalbard and Jan Mayen Islands") CodeZone=4;
        else if (Pays == "Swaziland") CodeZone=3;
        else if (Pays == "Sweden") CodeZone=2;
        else if (Pays == "Switzerland") CodeZone=1;
        else if (Pays == "Syrian Arab Republic") CodeZone=3;
        else if (Pays == "Taiwan") CodeZone=4;
        else if (Pays == "Tajikistan") CodeZone=4;
        else if (Pays == "Tanzania") CodeZone=3;
        else if (Pays == "Thailand") CodeZone=4;
        else if (Pays == "Togo") CodeZone=3;
        else if (Pays == "Tokelau") CodeZone=4;
        else if (Pays == "Tonga") CodeZone=4;
        else if (Pays == "Trinidad and Tobago") CodeZone=4;
        else if (Pays == "Tunisia") CodeZone=2;
        else if (Pays == "Turkey") CodeZone=4;
        else if (Pays == "Turkmenistan") CodeZone=4;
        else if (Pays == "Turks and Caicos Islands") CodeZone=4;
        else if (Pays == "Tuvalu") CodeZone=4;
        else if (Pays == "Uganda") CodeZone=3;
        else if (Pays == "Ukraine") CodeZone=2;
        else if (Pays == "United Arab Emirates") CodeZone=3;
        else if (Pays == "United Kingdom") CodeZone=1;
        else if (Pays == "United States") CodeZone=3;
        else if (Pays == "United States Minor Outlying Islands") CodeZone=4;
        else if (Pays == "Uruguay") CodeZone=4;
        else if (Pays == "Uzbekistan") CodeZone=4;
        else if (Pays == "Vanuatu") CodeZone=4;
        else if (Pays == "Vatican City State") CodeZone=1;
        else if (Pays == "Venezuela") CodeZone=4;
        else if (Pays == "Vietnam") CodeZone=4;
        else if (Pays == "Virgin Islands (British)") CodeZone=4;
        else if (Pays == "Virgin Islands (U.S.) ") CodeZone=4;
        else if (Pays == "Wallis and Futuna Islands") CodeZone=10;
        else if (Pays == "Western Sahara") CodeZone=3;
        else if (Pays == "Yemen") CodeZone=3;
        else if (Pays == "Yugoslavia") CodeZone=2;
        else if (Pays == "Zaire") CodeZone=3;
        else if (Pays == "Zambia") CodeZone=3;
        else if (Pays == "Zimbabwe") CodeZone=3;else CodeZone=0;
Ord.Zone.value = CodeZone;
TPoids(CodeZone,Pays)
}
 // function DZone()
 
function CorrectPrices(thisvalue){;

var CentsVar = 1;
var CurVar = 1;

var nvalue=thisvalue;
nvalue = eval(nvalue);
var nvalue2 = nvalue * (document.Order.Total_toPay_aPayer.value);
if (CentsVar == 0){;
 nvalue2 = (Math.floor(nvalue2/100));
} else {;
 nvalue2 = (Math.round(nvalue2)) / 100;
 if (Math.floor(nvalue2) == nvalue2){;
  nvalue2 = nvalue2 + '.00';
 } else if (Math.floor(nvalue2*10) == (nvalue2*10)){;
  nvalue2 = nvalue2 + '0';
 };
};
nvalue = (Math.round(nvalue)) / 100;
if (Math.floor(nvalue) == nvalue){;
 nvalue = nvalue + '.00';
} else if (Math.floor(nvalue*10) == (nvalue*10)){;
  nvalue = nvalue + '0';
};
if (CurVar != 1){;
 fixprice=' ' + nvalue + '  (' + nvalue2 + ' ' + CurName + ')';
} else {;
 fixprice=' ' + nvalue + ' ';
};
};