/*---------------------------------------------------------------------------------
Ensemble de commande pour le site GS Soft - 
copyright = GS Soft et Stéphane Garnaud 1999 - 2001
adresse = http://perso.magic.fr/gs-soft
version = 1.01
important= placé après tarif_01.js dans le bon de commande
---------------------------------------------------------------------------------*/
// Variables 
var gc_numdes=0;
var gc_numcom=0;
var gt_incom=new Array()
var gc_prixinter=0;
var gc_prixtotal=0;

// Fonctions 
function gs_cookielire(gt_e,gt_d){
var gt_arg = gt_e + "=";var gt_a = gt_arg.length;
var gt_c = document.cookie.length; var gt_i = 0;
while (gt_i < gt_c)
{var gt_j = gt_i + gt_a;
if (document.cookie.substring(gt_i, gt_j) == gt_arg){return gs_cookievaleur (gt_j);}
gt_i = document.cookie.indexOf(" ", gt_i) + 1;
if (gt_i==0){break;}}
return gt_d;}

function gs_cookievaleur (gt_o){
var gt_e = document.cookie.indexOf (";", gt_o);
if (gt_e == -1){gt_e = document.cookie.length;}
return unescape(document.cookie.substring(gt_o, gt_e));}

function gs_split(gt_t,gt_d,gt_s){
var gt_im=gt_d;var gt_inc=0;
var gt_possep=gt_im.indexOf(gt_s);
while (gt_possep!=-1)
{gt_t[gt_inc]=gt_im.substring(0,gt_possep);
gt_inc++;gt_im=gt_im.substring(gt_possep+1);
gt_possep=gt_im.indexOf(gt_s);}
gt_t[gt_inc]=gt_im;}

function gs_elementexiste(gt_f,gt_ne){
if(gt_f)
{var gt_r=0;var gt_nb=gt_f.elements.length;
for (var gt_v=0; gt_v<gt_nb;gt_v++){if (gt_f.elements[gt_v].name.toUpperCase()==gt_ne.toUpperCase()){gt_r++}}
return gt_r;}
else{return 0;}}

function gs_texteremplace(gt_te,gt_e1,gt_e2){
var gt_deb=0;var gt_r=gt_te;
var gt_fin=gt_r.indexOf(gt_e1,0);
while ( gt_fin!=-1 )
{var gt_p1=gt_r.substring(0,gt_fin);
var gt_p2=gt_r.substr(gt_fin+gt_e1.length);
gt_r=gt_p1+gt_e2+gt_p2;gt_fin=gt_r.indexOf(gt_e1,0);}
return gt_r;}

function gs_conveuro(gt_p){
var gt_e=gt_p/6.55957;
gt_e=Math.floor(gt_e*100)
gt_e=gt_e/100;
gt_e=gs_monnaie(gt_e);
return gt_e+" €"
}

function gs_convfranc(gt_p){
var gt_e=gt_p*6.55957;
gt_e=Math.floor(gt_e*100)
gt_e=gt_e/100;
gt_e=gs_monnaie(gt_e);
return gt_e+" F"
}

function gs_monnaie(gt_es){
gt_es=gt_es.toString();
gt_es=gs_texteremplace(gt_es,".",",");
var gt_po=gt_es.indexOf(",");
if (gt_po==-1){gt_es=gt_es+",00";}
if (gt_po==gt_es.lenght-2){gt_es=gt_es+"0";}   
return gt_es;  
}

/*function gs_razcookie(){
document.cookie="com="+""+"; expires=Thu, 01-Jan-70 00:00:01 GMT";
document.cookie="nom="+""+"; expires=Thu, 01-Jan-70 00:00:01 GMT";
document.cookie="adr="+""+"; expires=Thu, 01-Jan-70 00:00:01 GMT";
document.cookie="res="+""+"; expires=Thu, 01-Jan-70 00:00:01 GMT";}*/

function gs_ajoutcommande(gt_t){
var gt_d=gs_cookielire("com","");
if(gt_d==""){document.cookie="com="+gt_t}
else{document.cookie="com="+gt_d+"§"+gt_t}
alert("L'application demandée a été rajoutée à votre bon de commande.")}

function gs_commandecours() {
//lit le cookie
var gt_d=gs_cookielire("com","");
if( gt_d!=""){gs_split(gt_incom,gt_d,"§");}
}

function gs_designation() {
//place les données
var gt_t='<select name="designation" onchange="gs_ajoutproduit('+gc_numdes+');return false;">';
gc_numdes++
if( gt_d=="")
	{gt_t=gt_t+"<option selected></option>\r";
	for(var i=0;i<gv_designation.length; i++ ) 
		{gt_t=gt_t+"<option>"+gv_designation[i]+"</option>\r"}}
else
	{gt_t=gt_t+"<option></option>\r";
	var gt_a=0;
	for(var i=0;i<gv_designation.length; i++ )
		{if(gt_incom[gc_numcom]==gv_ref[i] && gt_a==0)
			{gc_numcom++;gt_a=1;
			gt_t=gt_t+"<option selected>"+gv_designation[i]+"</option>\r";}
		else
			{gt_t=gt_t+"<option>"+gv_designation[i]+"</option>\r";}}}
gt_t=gt_t+"</select>\r";
document.write(gt_t);  
}

function gs_initcommande() {
//lecture nom et adresse
document.forms[0].nom.value=gs_cookielire("nom","");
document.forms[0].adresse.value=gs_cookielire("adr","");
document.forms[0].responsable.value=gs_cookielire("res","");
var gt_c=gs_cookielire("met","0");document.forms[0].radiobutton[gt_c/1].checked=true;
gt_c=gs_cookielire("cdr","0");document.forms[0].radiobutton1[gt_c/1].checked=true;
for ( var i=0; i<gc_numdes; i++ ) {gs_remplit(i);}
gs_calculprix();
}

function gs_ajoutproduit(gt_n) {
gs_remplit(gt_n);
gs_calculprix();
//écrit le cookie commande
var gt_d="";
for(var i=0;i<gs_elementexiste(document.forms[0],"ref"); i++)
	{var gt_ac=document.forms[0].ref[i].value;
	if (gt_ac!="" )
  			{if(gt_d==""){gt_d=gt_ac;}
			else{gt_d=gt_d+"§"+gt_ac}}}
document.cookie="com="+gt_d;
}

function gs_gardeinfo(gt_i) {
	if(gt_i==0){document.cookie="nom="+document.forms[0].nom.value+"; expires=Thu, 01-Jan-10 00:00:01 GMT";}
	if(gt_i==1){document.cookie="adr="+document.forms[0].adresse.value+"; expires=Thu, 01-Jan-10 00:00:01 GMT";}
	if(gt_i==2){document.cookie="res="+document.forms[0].responsable.value+"; expires=Thu, 01-Jan-10 00:00:01 GMT";}
	if(gt_i==3)
		{gs_calculprix();
		if(document.forms[0].radiobutton[0].checked==true){var gt_r=0;}else{var gt_r=1;}
		document.cookie="met="+gt_r+"; expires=Thu, 01-Jan-10 00:00:01 GMT";}
if(gt_i==4)
		{gs_calculprix();
		if(document.forms[0].radiobutton1[0].checked==true){var gt_r=0;}else{var gt_r=1;}
		document.cookie="cdr="+gt_r+"; expires=Thu, 01-Jan-10 00:00:01 GMT";}		
}

function gs_remplit(gt_n) {
var gt_d=document.forms[0].designation[gt_n].selectedIndex;
if(gt_d==0)
	{document.forms[0].ref[gt_n].value="";
	document.forms[0].prix[gt_n].value="";}
else
	{document.forms[0].ref[gt_n].value=gv_ref[gt_d-1];
	document.forms[0].prix[gt_n].value=gv_prix[gt_d-1];}
}

function gs_calculprix() {
var gt_p=0;
for(var i=0;i<gs_elementexiste(document.forms[0],"prix"); i++)
	{var gt_ac=document.forms[0].prix[i].value
	if (gt_ac!="" )
  			{gt_ac=gt_ac.substring(0,gt_ac.indexOf("€"));//modif pour euro
  			gt_ac=gs_texteremplace(gt_ac,",",".");
  			gt_p=gt_p+gt_ac/1;}}
if (gt_p==0)
	{gt_po="";gt_to=""}
else
	{if(document.forms[0].radiobutton1[1].checked==true)
		{if (gt_p<gv_portfraisnum[4]+1)//modif pour euro
			{var gt_po=gv_portfrais[6];}//modif pour euro	
		else
			{gt_p=gt_p+gv_portfraisnum[5];var gt_po=gv_portfrais[5];}}//modif pour euro
	else
 		{if (gt_p<gv_portfraisnum[0]+1)//modif pour euro
 			{if(document.forms[0].radiobutton[1].checked==true)
 				{gt_p=gt_p+gv_portfraisnum[2];var gt_po=gv_portfrais[2];}//modif pour euro
  			else
 				{gt_p=gt_p+gv_portfraisnum[1];var gt_po=gv_portfrais[1];}}//modif pour euro
 		else
 			{if(document.forms[0].radiobutton[1].checked==true)
 				{gt_p=gt_p+gv_portfraisnum[3];var gt_po=gv_portfrais[3];}//modif pour euro
 			else
 				{var gt_po=gv_portfrais[6];}}}//modif pour euro				
	var gt_to= gs_monnaie(gt_p)+" € ("+gs_convfranc(gt_p)+")";}//modif pour euro
document.forms[0].total.value=gt_to;
document.forms[0].port.value=gt_po;
}

function gs_razcommande() {
for(var i=0;i<gs_elementexiste(document.forms[0],"ref"); i++)
	{document.forms[0].ref[i].value="";
	document.forms[0].prix[i].value="";
	document.forms[0].designation[i].selectedIndex=0;}
document.cookie="com="+""+"; expires=Thu, 01-Jan-70 00:00:01 GMT"
gs_calculprix()	
}

function gs_imprime() {
alert('Pour imprimer la page qui va s\'afficher, utilisez la\rcommande "Imprimer" de votre navigateur ou utilisez\rla combinaison de touches Ctrl+P.')
document.location="ach_051.htm";}

//fonction pour bon de commande

function gs_adresse() {
var gt_t="<img src='images/invis_01.gif' width='1' height='20'>"+gs_cookielire("nom","");
gt_t= gt_t+"\r"+gs_cookielire("adr","")+"<BR><img src='images/invis_01.gif' width='1' height='20'>";
document.write(gs_texteremplace(gt_t,"\r","<BR><img src='images/invis_01.gif' width='1' height='20'>"));
}

function gs_com1() {
if(gc_numcom<gt_incom.length)
	{document.write(gt_incom[gc_numcom]);}
else
	{document.write("&nbsp;");}
}

function gs_com2() {
if(gc_numcom<gt_incom.length)
	{for(var i=0;i<gv_designation.length; i++ )
		{if(gt_incom[gc_numcom]==gv_ref[i])
			{document.write(gv_designation[i]);return}}}
else
	{document.write("&nbsp;");}
}

function gs_com3() {
if(gc_numcom<gt_incom.length)
	{for(var i=0;i<gv_designation.length; i++ )
		{if(gt_incom[gc_numcom]==gv_ref[i])
			{document.write(gv_prix[i]);gc_prixinter=gv_prix[i];
			var gt_ac=gv_prix[i].substring(0,gv_prix[i].indexOf("€"));//modif pour euro
  			gt_ac=gs_texteremplace(gt_ac,",",".");
  			gc_prixtotal=gc_prixtotal+gt_ac/1;
			return}}}
else
	{document.write("&nbsp;");}
}

function gs_com4() {
if(gc_numcom<gt_incom.length)
	{document.write("1");}
else
	{document.write("&nbsp;");}
}

function gs_com5() {
if(gc_numcom<gt_incom.length)
	{document.write(gc_prixinter);gc_numcom++;}
else
	{document.write("&nbsp;");}
}

function gs_com6() {
if (gc_prixtotal==0)
	{document.write("&nbsp;")}
else
	{if(gs_cookielire("cdr","0")=="1")
		{if (gc_prixtotal<gv_portfraisnum[4]+1)//modif pour euro
			{document.write(gv_portfraisnum[0]);}//modif pour euro	
		else
			{document.write(gv_portfrais[5]);}}
	else
 	{if (gc_prixtotal<gv_portfraisnum[0]+1)//modif pour euro
 		{if(gs_cookielire("met","0")=="1")
 			{document.write(gv_portfrais[2]);}//modif pour euro
  		else
 			{document.write(gv_portfrais[1]);}}//modif pour euro
 	else
 		{if(gs_cookielire("met","0")=="1")
 			{document.write(gv_portfrais[3]);}//modif pour euro
 		else
 			{document.write(gv_portfrais[6]);}}}}//modif pour euro
}

function gs_com7() {
if (gc_prixtotal==0)
	{document.write("&nbsp;");}
else
	{if(gs_cookielire("cdr","0")=="1" )
		{if(gc_prixtotal>=gv_portfraisnum[4]+1){gc_prixtotal=gc_prixtotal+gv_portfraisnum[5];}}//modif pour euro
	else{
	if (gc_prixtotal<111)//modif pour euro
		{if(gs_cookielire("met","0")=="1"){gc_prixtotal=gc_prixtotal+gv_portfraisnum[2];}//modif pour euro
 		else{gc_prixtotal=gc_prixtotal+8;}}//modif pour euro
	else
		{if(gs_cookielire("met","0")=="1"){gc_prixtotal=gc_prixtotal+gv_portfraisnum[3];}}}//modif pour euro
	var gt_to= gs_monnaie(gc_prixtotal)+" € ("+gs_convfranc(gc_prixtotal)+")";//modif pour euro
	document.write(gt_to);}//modif pour euro
}

function gs_com8() {
if(gs_cookielire("cdr","0")=="1" && gc_prixtotal>=gv_portfraisnum[4]+1)//modif pour euro	
	{document.write("Remise sur port *");}
else
	{document.write("Frais de port");}
}

function gs_com9() {
if(gs_cookielire("cdr","0")=="1")
	{document.write("Aucun support ne vous sera envoyé. Vous recevrez uniquement une facture et votre licence.*")}
}

function gs_date() {
var Stamp = new Date();
var mois=Stamp.getMonth()+1;if(mois<10){mois="0"+mois;}else{mois=""+mois;}
var jour=Stamp.getDate();if(jour<10){jour="0"+jour;}else{jour=""+jour;}
document.write(jour + "/" + mois + "/"+Stamp.getFullYear() )
}