var SWFenetre;

var dlettres = ".........";

var SW_Lettres = "ABCDEFGHI"; // à modifier si la liste des tables évolue
var SW_M = new Array();
var SW_D = new Array();
var SW_DL = new Array();
var SW_Titre = new Array();
var SW_FChoisi = new Array();
var SW_ZSelect = new Array();
var SW_Table = new Array();
var SW_DDL = new Array();

var C_Main = colonne_TG("Main");
var C_Gant = colonne_TG("Gant");
var C_Diametre = colonne_TG("Diametre");
var C_Forme = colonne_TG("Forme");
var C_Longueur = colonne_TG("Longueur");
var C_Matiere = colonne_TG("Matiere");
var C_Taille = colonne_TG("Taille");
var C_Epaisseur = colonne_TG("Epaisseur");
var C_Support = colonne_TG("Support");

var Radio_Support = "";
var Radio_Main = "";

//alert (C_Main + " " + C_Gant + " " + C_Diametre + " " + C_Forme + " " + C_Longueur + " " + C_Matiere + " " + C_Taille + " " + C_Epaisseur + " " + C_Support);

function chargement_SW() {
	SW_M = Array();
	SW_D = Array();
	SW_DL = Array();
	SW_Titre = Array();
	SW_FChoisi = Array();
	SW_ZSelect = Array();
	SW_Table = Array();
	SW_DDL = Array();
	for ( var i = 0; i < SW_Lettres.length; i++ ) {
	   SW_M[i]="";
	   SW_D[i]=".";
	   SW_DL[i]=".";
	   SW_Table[i]=SW_Lettres.substring(i,i+1);
	   SW_DDL[i]=""+(i+1)+""; 
	   for ( var j = 0; j < TG.length; j++ ) {
	     if ( TG[j].substring(0,2) == SW_Lettres.substring(i,i+1) + "1" ) {	
	        SW_Titre[i]=TG[j].substring(2);
	     }
	     if ( TG[j].substring(0,2) == SW_Lettres.substring(i,i+1) + "2" ) {	
	        SW_FChoisi[i]=TG[j].substring(2)+"Choisi";
		  SW_ZSelect[i]=TG[j].substring(2)+"Select";
	     }	
	   }
	}
} 

function afficheReference() {
	if ( Radio_Support != "" && Radio_Main != "" ) {
	dlettres = SW_DL[0] + SW_DL[1] + SW_DL[2] + SW_DL[3] + SW_DL[4] + SW_DL[5] + SW_DL[6] + SW_DL[7] + SW_DL[8];
	//alert ("afficheReference " + dlettres);
	voirSW(dlettres);
	dlettres = SW_DL[0] + SW_DL[1] + SW_DL[2] + SW_DL[3] + SW_DL[4] + SW_DL[5] + SW_DL[6] + SW_DL[7] + SW_DL[8];
	var existe = Recherche_Reference(dlettres);
	if ( SW_DL[0] == "." || SW_DL[1] == "." || SW_DL[2] == "." || SW_DL[3] == "." || SW_DL[4] == "." || SW_DL[5] == "." || SW_DL[6] == "." || SW_DL[7] == "." || SW_DL[8] == "." ) {
		existe = Mention[11]
		} else {
		if ( existe == "existe" ) { existe = ''; }
		if ( existe == "?" ) { existe = Mention[12]; }
		}
	document.input.result.value = SW_D[C_Forme] + SW_D[C_Longueur] + " " + SW_D[C_Matiere] + " " + SW_D[C_Taille] + " " + SW_D[C_Epaisseur] + " " + SW_D[C_Support];
	if ( existe != '' ) { document.input.result.value = document.input.result.value + "  (" + existe + ")" }
	voirSWFenetre();
	}
}

function afficheNouvelleReference() {

	if ( Radio_Support == "" || Radio_Main == "" ) {
		alert (Mention[2]);
	} else {
	chargement_SW();
	setRadio();
	afficheReference();
	}
}

function voirSW(dlettres) {
	//alert ("voirSW " + dlettres);
	if ( dlettres.length != SW_M.length ) { alert ("dlettres:" + dlettres + " long " + dlettres.length + " diff " + SW_M.length); }
	var SW;
	var ZTGG;
	for ( var i = 0; i < SW_M.length; i++ ) { 
		if ( dlettres.substring(i,i+1) != ".") {SW_M[i] = dlettres.substring(i,i+1);} else {SW_M[i] = "";} 
	}
	for ( var i = 0; i < TGG.length; i = i + SW_M.length ) {
	   ZTGG = TGG.substring(i,i + SW_M.length);
	   SW = 1;
	   for ( var j = 0; j < SW_M.length; j++ ) {
	      if ( dlettres.substring(j,j+1) != "." && dlettres.substring(j,j+1) != ZTGG.substring(j,j+1)) { SW = 0;}
	   }
	   if ( SW == 1 ) {
		for ( var j = 0; j < SW_M.length; j++ ) {
	         if ( dlettres.substring(j,j+1) == "." ) {
		      if ( SW_M[j].indexOf(ZTGG.substring(j,j+1)) == -1 ) { SW_M[j] = SW_M[j] + ZTGG.substring(j,j+1); }
		   }
	   	}
	   }
	}
	//alert (L[0] + " " + L[1] + " " + L[2] + " " + L[3] + " " + L[4] + " " + L[5] );
	// spécial Forme ==> Main , Gant et Diam
	if ( SW_DL[3] != '.' ) {
		if ( SW_M[C_Main].length == 1 && SW_M[C_Gant].length == 1 && SW_M[C_Diametre].length == 1 ) {
			SW_DL[C_Main] = SW_M[C_Main]; SW_D[C_Main] = design_TG("A" + SW_M[C_Main]); 
			SW_DL[C_Gant] = SW_M[C_Gant]; SW_D[C_Gant] = design_TG("B" + SW_M[C_Gant]); 
			SW_DL[C_Diametre] = SW_M[C_Diametre]; SW_D[C_Diametre] = design_TG("C" + SW_M[C_Diametre]); 
		}
	}
	for ( var i = 0; i < SW_Lettres.length; i++) {		
		if ( SW_M[i].length == 1 ) { SW_DL[i] = SW_M[i]; SW_D[i] = design_TG(SW_Lettres.substring(i,i+1) + SW_M[i]); }
	}
	for ( var i = 0; i < SW_M.length; i++ ) { 
		SW_M[i] = tri_dlettres(SW_M[i]);
	}	
}
function colonne_TG(nom) {
	var colonne = "?";
	for ( var j = 0; j < TG.length; j++) {
		if ( TG[j].substring(1) == "2" + nom ) {
			colonne = SW_Lettres.indexOf(TG[j].substring(0,1));
			break;
		}
	}
	return colonne; 	
}
function design_TG(tablet) {
	var design = "?";
	for ( var j = 0; j < TG.length; j++) {
		if ( TG[j].substring(0,2) == tablet ) {
			design = TG[j].substring(2);
			break;
		}
	}
	return design; 	
}
function design_matiere(code) {
	var design = "?";
	for ( var j = 0; j < TG.length; j++ ) {
		if ( TG[j].substring(0,1) == "J" && TG[j].substring(2,2 + code.length + 1) == code + ":" ) {
			design = TG[j].substring(2 + code.length + 1);
			break;
		} 
	}
	return design;
}
function tri_dlettres(DL) {
	var ii;
	var p;
	var z;
	ii = DL.length - 1;
	do {  p = 0;
		for ( var i = 0; i < ii; i++ ) {
			if (DL.substring(i,i+1) > DL.substring(i+1,i+2)) {
				p = 1;
				z = DL.substring(0,i) + DL.substring(i+1,i+2) + DL.substring(i,i+1) + DL.substring(i+2);
				DL = z;
			}
		}
		ii = ii - 1;
	} while ( p == 1 );
	return DL;
}
function showFormes() {	window.open("g_formes.htm","sub","")}
function showMatieres() { 
	
	if ( Radio_Support == "" || Radio_Main == "" ) {
		alert (Mention[3]);
	} else {
	window.open("g_matieres.htm","sub","")}
}
function showTailles() { window.open("g_tailles.htm",
						 "sub",
						 "width=" + (screen.width - 10) + "," + 
						 "height=" + (screen.height - 70) + "," + 
						 "left=0,top=0,scrollbars=yes")}
function showTaillesAmbi() { window.open("g_tambi.htm",
						 "sub",
						 "width=" + (screen.width - 10) + "," + 
						 "height=" + (screen.height - 70) + "," + 
						 "left=0,top=0,scrollbars=yes")}
function showTaillesAnato() { window.open("g_tanato.htm",
						 "sub",
						 "width=" + (screen.width - 10) + "," + 
						 "height=" + (screen.height - 70) + "," + 
						 "left=0,top=0,scrollbars=yes")}
function Trad_Choix(Choix) {
	   for ( var i = 0; i < TG.length; i++ ) {
		if (TG[i].substring(0,2) == Choix) {
			return TG[i].substring(2);
			break;
		}
	   }
}
function Lettre_Choix(Table, Choix) {
	var lettre;
	lettre = "?";
	   for ( var i = 0; i < TG.length; i++ ) {
		if (TG[i].substring(0,1) == Table && TG[i].substring(2) == Choix) {
			lettre = TG[i].substring(1,2);
			break;
		}
	   }
	return lettre;
}
function table_titre(T) {
	for ( var i = 0; i < TG.length; i++ ) {
	if ( TG[i].substring(1) == "1" + T ) {
		return TG[i].substring(0,1);
		break;
		}
	}
}

function from_g_matieres(choix) {
	var table = table_titre("Matière");
	var lettre = Lettre_Choix(table,choix);
	var i = SW_Lettres.indexOf(table); 
	//alert("choix:" + choix + " table:" + table + " lettre:" + lettre + " i:" + i);
	if ( choix != '' ) { 
		SW_D[i] = choix;
		SW_DL[i] = lettre;
	}
	afficheReference();
}


function Recherche_Reference(A) {
var z;
z = "?";
for ( var i = 0; i < TGG.length; i = i + SW_Lettres.length ) {
   if (TGG.substring(i,i + SW_Lettres.length) == A ) {
	z = "existe";
	break;
   }	
}
return z;
}

// --------------------------- sub window SW... ---------------------------------------------------------------------
	
function voirSWFenetre() {
	var largeur = screen.width - 35;
	if (typeof(SWFenetre)== "object") { SWFenetre.close(); }
	SWFenetre = window.open("","","height=355,width=" + largeur + ",top=0,left=0,scrollbars=yes,toolbar=no,personalbar=no,menubar=no,location=no,directories=no,statusbar=no");
	SWFenetre.focus();
	SWFenetre.document.write(grilleSW());
	SWFenetre.document.close();
}

function grilleSW() {
	
	//alert ("grilleSW");

	var z_TD = "align=center class=normal"; // + "><font face='Arial, Helvetica, sans-serif' size=1";
	var chx;
	var code;
	var jcode;
	var lettre;
	var tablet;
	var zz;
	var zzz;

	var z = "<HTML><HEAD><TITLE>Tables</TITLE>" + "\r\n";

	z += "<style " + "type='text/css'>" + "\r\n";
	z += "<" + "!" + "--" + "\r\n";
	z += "a { text-decoration: none; color: #000099;}" + "\r\n";
	z += "a:hover { text-decoration: none; color: #FF0000;}" + "\r\n";
	z += ".normal {  font-family: Arial, Helvetica, sans-serif; font-size: 8pt; font-style: normal; font-weight: normal}";
	z += ".blanc {  font-family: Arial, Helvetica, sans-serif; font-size: 10pt; font-style: normal; font-weight: normal; color: #FFFFFF;}";
	z += ".visu2 {  font-family: Arial, Helvetica, sans-serif; font-size: 10pt; font-weight: bold; color: #000099};";
	z += "--" + ">" + "\r\n";
	z += "</" + "style>" + "\r\n";
	
	
	zz = "<script" + " language=" + "javascript>" + "\r\n";
	for ( var k = 0; k < SW_M.length; k++ ) {
		zz += "function " + SW_FChoisi[k] + "(num) {" + "\r\n";
	      zz += "   var valeur = opener.TG[num].substring(2);" + "\r\n";
		zz += "   var lettre = opener.TG[num].substring(1,2);" + "\r\n";
		zz += "   var tablet = opener.TG[num].substring(0,2);" + "\r\n";
	      zz += "   if (num == 0) {valeur = '.'; lettre = '.';}";
		zz += "   opener.SW_D[" + k + "] = valeur;" + "\r\n";
	      zz += "   opener.SW_DL[" + k + "] = lettre;" + "\r\n";
		zz += "   if (lettre == 'D') {";
		zz += "   				";   
		zz += "   }";
		zz += "   opener.afficheReference();" + "\r\n";
		zz += "}" + "\r\n";
	}	
	zz += "</sc" + "ript>" + "\r\n";
	

	zzz = zz;
	//alert(zz);

	z += zz;
	z += "</HEAD>" + "\r\n";
	z += "<BODY bgcolor=#F2E4D8>" + "\r\n";
	
	zz = "<TABLE border=0 align=center valign=top cellspacing=0 cellpadding=0 class=visu2>" + "\r\n";
	zz += "<TR>" + "\r\n";
	zz += "<TD valign=top align=center>" + "\r\n";
	//alert ("C_Support:" + SW_M[C_Support] + " C_Main:" + SW_M[C_Main]); 
	if ( SW_M[C_Support] == "A" ) { 
		if ( SW_M[C_Main] == "A" ) { zz += Mention[24] + " ";}
		if ( SW_M[C_Main] == "B" ) { zz += Mention[25] + " ";}
		} 
	else {
		zz += Mention[4] + " ";
		if ( SW_M[C_Support] == "B" && SW_M[C_Main] == "A" ) { zz += Mention[5] + " " + Mention[8];}
		if ( SW_M[C_Support] == "C" && SW_M[C_Main] == "B" ) { zz += Mention[9];}
		if ( SW_M[C_Support] == "D" && SW_M[C_Main] == "B" ) { zz += Mention[10];}
		}
	zz += "<BR>&nbsp;</TD>";
	zz += "</TR></TABLE>";
	zz += "<TABLE border=0 align=center valign=top cellspacing=1 cellpadding=2 bgcolor=#003399 class=normal width=100%>" + "\r\n";
	zz += "<TR bgcolor=#FFFFFF width=100%>" + "\r\n";
	for ( var k = 0; k < SW_M.length; k++ ) {
	   if ( k != C_Support && k != C_Main ) {	
		
		var width_pcent = "10%";
		if ( k == C_Matiere ) { width_pcent = "30%"; }
		if ( k == C_Epaisseur || k == C_Gant ) { width_pcent = "15%"; }
		

		zz += "<TD valign=top " + z_TD + " width=" + width_pcent + ">" + "\r\n";
		zz += "<TABLE border=0 align=center valign=top cellspacing=1 cellpadding=0 bgcolor=#003399 class=normal width=100%>" + "\r\n";
		zz += "<TR bgcolor=#000099>";
		zz += "   <TD align=center class=blanc >";
		zz += "      <script" + " language=" + "javascript>";
	      zz += "         if ( opener.SW_D[" + k + "] == '' ) {"; 
		zz += "         document.write('&nbsp;'); }";
		zz += "         else { document.write('<B>&nbsp;&nbsp;&nbsp;' + opener.SW_D[" + k + "] + '&nbsp;&nbsp;&nbsp;</B>');}";
	      zz += "	 </script>";
		zz += "   </B></TD>";
		zz += "</TR>" + "\r\n";
		zz += "</TABLE>";	
		
		zz += "<TABLE border=0 align=center valign=top cellspacing=0 cellpadding=0 bgcolor=#F2E4D8 class=normal width=100%>" + "\r\n";
		zz += "<TR><TD>&nbsp</TD></TR>";
		zz += "</TABLE>";	
		
		zz += "<TABLE border=0 align=center valign=top cellspacing=1 cellpadding=0 bgcolor=#003399 class=normal width=100%>" + "\r\n";
		if ( k == 2 ) { SW_Titre[k] = Mention[15] };
		zz += "<TR bgcolor=#FFFFFF>" + "<TD " + z_TD + " width=100%>&nbsp;&nbsp;" + SW_Titre[k] + "&nbsp;&nbsp;</TD>";
		zz += "</TR>" + "\r\n";
		
		zz += "<TR bgcolor=#FFFFFF>" + "\r\n";
		zz += "<TD " + z_TD + " >" + "\r\n";
		zz += "<A HREF=\"java" + "script:" + SW_FChoisi[k] + "(0);\">" + "<B>" + "&nbsp;&nbsp;&nbsp;&nbsp;* *&nbsp;&nbsp;&nbsp;&nbsp;" +"</B></A>";
		zz += "</TD>" + "\r\n";
	   	zz += "</TR>" + "\r\n";
		
		
		for ( var i = 0; i < SW_M[k].length; i++) {
	   		chx = i + 1;
	   		lettre = SW_M[k].substring(i, i + 1);
         		tablet = SW_Table[k] + lettre;
         		//alert("tablet:" + tablet);
	   		for ( var j = 0; j < TG.length; j++) {
				if ( TG[j].substring(0,2) == tablet ) {
					code = TG[j].substring(2);
					jcode = j;
					break;
				}
	   		} 	
	   		if (code == "") { code = "sans"; }
			if ( SW_D[k] == "." ) { 
			   zz += "<TR bgcolor=#FFFFFF>" + "\r\n";
			   zz += "<TD " + z_TD + ">" + "\r\n";
			   zz += "<A HREF=\"java" + "script:" + SW_FChoisi[k] + "(" + jcode + ");\">";
			   if ( k == C_Matiere ) {		
				zz += "<B>" + "&nbsp;&nbsp;" + design_matiere(code) + " (" + code + ")&nbsp;&nbsp;" +"</B>";
			   } else {	
				zz += "<B>" + "&nbsp;&nbsp;" + code + "&nbsp;&nbsp;" +"</B>";
			   }
			   zz += "</A>";
			   zz += "</TD>" + "\r\n";
	   		   zz += "</TR>" + "\r\n";
			}
		}
		zz += "</TABLE>" + "\r\n";
		zz += "</TD>" + "\r\n";
	   }	
	}   		
	zz += "</TR>" + "\r\n";
	zz += "</TABLE>" + "\r\n";
	
	zzz += zz;
	//alert(zzz);
	z += zz;
	
	z += "</BODY></HTML>" + "\r\n";
	return z;
}

function closeSW() {
	//alert ("closeSW");
	if (typeof(SWFenetre)== "object") { SWFenetre.close(); }
}	
function on_unload() { 
	//alert ("unload");
	closeSW();
}
function on_load() {
	chargement_SW();
}

function setRadioSupport(valeur) {
	if (valeur == '1') { Mention[15] = Mention[22] }
	if (valeur == '2') { Mention[15] = Mention[23] }
	//alert ("**Mention[15]:" + Mention[15]);
	Radio_Support = valeur;	
	setRadio();
	afficheReference();
}
function setRadioMain(valeur,bs) {
	if (bs == "") { Radio_Support = "1" }
	if (bs == "BS") { Radio_Support = "2" }
	Radio_Main = valeur;
	setRadio();	
	afficheReference();
}
function setRadio() {
	var T_Support = SW_Lettres.substring(C_Support,C_Support+1);
	var T_Main = SW_Lettres.substring(C_Main,C_Main+1);
	var L_Support;
	var L_Main;
	if ( Radio_Support != "" && Radio_Main != "" ) {
		// gant pour rond de gant
		if ( Radio_Support == 1 ) { L_Support = "A"; } 
		// gant monté sur bague support
		if ( Radio_Support == 2 && Radio_Main == 1 ) { L_Support = "B"; } 
		if ( Radio_Support == 2 && Radio_Main == 2 ) { L_Support = "C"; } 
		if ( Radio_Support == 2 && Radio_Main == 3 ) { L_Support = "D"; } 
		if ( Radio_Main == 1 ) { L_Main = "A"; }		
		if ( Radio_Main == 2 || Radio_Main == 3 ) { L_Main = "B"; }		
		//
		SW_M[C_Support] = L_Support; 
		SW_DL[C_Support] = L_Support;
		SW_D[C_Support] = design_TG(T_Support + L_Support);
		SW_M[C_Main] = L_Main; 
		SW_DL[C_Main] = L_Main;
		SW_D[C_Main] = design_TG(T_Main + L_Main);
	}
}