function StopError(error)
{
 return(true);
}
function go(s)
{
 if((s=='2')||(s=='6'))
 {
  f=check_doc();
 }
 else
 {
  f=true;
 }
 if(f)
 {
  var oldecran=getvalue('ECRAN');
  setvalue('ECRAN',s);
  document.forms[0].submit();
  setvalue('ECRAN',oldecran);
 }
}
function getinput(s)
{
 s=window.document.forms[0][s];
 return(s);
}
function getvalue(s)
{
 s=getinput(s);
 if(s!=null)
 {
  s=s.value;
 }
 else
 {
  s='';
 }
 return(s);
}
function setvalue(s,v)
{
 s=getinput(s);
 if(s!=null)
 {
  s.value=v;
 }
}
function download(s)
{
 var oldecran=getvalue('ECRAN');
 setvalue('ECRAN',s);
 document.forms[0].submit();
 setvalue('ECRAN',oldecran);
}
function StopError(error)
{
 return(true);
}
 function getelement(doc,element)
 {
  if(window.mmIsOpera) return(doc.getElementById(element));
  if (doc.all) return(doc.all[element]);
  if (doc.getElementById) return(doc.getElementById(element));
  return(false);
 }
function getstyle(doc,element)
{
 element=getelement(doc,element);
 if(element!=null) element=element.style;
 return(element);
}
function showelement(doc,element,f)
{
 element=getstyle(doc,element);
 if(element!=null)
 {
  if(f)
  {
   element.display='block';
   element.visibility='visible';
  }
  else
  {
   element.display='none';
   element.visibility='hidden';
  }
 }
}
function showblock(id,f)
{
 setvalue(id+'_VISIBLE',f);
 showelement(document,id+'_SHORTTITLE',!f);
 showelement(document,id+'_MAXIMIZE',!f);
 showelement(document,id+'_MINIMIZE',f);
 showelement(document,id+'_NORMAL',f);
}
function error(name,msg,fselect)
{
 var item=getinput(name);
 alert(msg);
 if(fselect)
 {
  item.select();
 }
 item.focus();
}
function trim(string)
{
 return(string.replace(/(^\s*)|(\s*$)/g,''));
}
function ValidStrLength(name,len,msg)
{
 var item=getinput(name);
 f=(trim(item.value).length==len);
 if(!f)
 {
  error(name,msg,true);
 }
 return(f);
}
function ValidMinStrLength(name,len,msg)
{
 var item=getinput(name);
 f=(trim(item.value).length>=len);
 if(!f)
 {
  error(name,msg,true);
 }
 return(f);
}
function ValidMaxStrLength(name,len,msg)
{
 var item=getinput(name);
 f=(item.value.length<=len);
 if(!f)
 {
  error(name,msg,true);
 }
 return(f);
}
function ValidIntLength(name,len,msg)
{
 var item=getinput(name);
 f=((item.value.length==len)&&(!isNaN(item.value))&&(item.value>0));
 if(!f)
 {
  error(name,msg,true);
 }
 return(f);
}
function ValidComboInt(name,min,msg)
{
 var item=getinput(name);
 f=((!isNaN(item.options[item.selectedIndex].value))&&(item.options[item.selectedIndex].value>=min));
 if(!f)
 {
  error(name,msg,false);
 }
 return(f);
}
function ValidComboMaxInt(name,max,msg)
{
 var item=getinput(name);
 f=((!isNaN(item.options[item.selectedIndex].value))&&(item.options[item.selectedIndex].value-max<0));
 if(!f)
 {
  error(name,msg,false);
 }
 return(f);
}
function ValidComboMinStrLength(name,len,msg)
{
 var item=getinput(name);
 f=((trim(item.options[item.selectedIndex].value).length)>=len);
 if(!f)
 {
  error(name,msg,false);
 }
 return(f);
}
function ValidInt(name,min,msg)
{
 var item=getinput(name);
 f=((!isNaN(item.value))&&(item.value>=min));
 if(!f)
 {
  error(name,msg,true);
 }
 return(f);
}
function _ValidEmail(emailStr)
{
 var checkTLD=1;
 var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
 var emailPat=/^(.+)@(.+)$/;
 var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
 var validChars="\[^\\s" + specialChars + "\]";
 var quotedUser="(\"[^\"]*\")";
 var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
 var atom=validChars + "+";
 var word="(" + atom + "|" + quotedUser + ")";
 var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
 var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
 var matchArray=emailStr.match(emailPat);
 if(matchArray==null) 
 {
  return(false);
 }
 var user=matchArray[1];
 var domain=matchArray[2];
 for(i=0;i<user.length; i++)
 {
  if(user.charCodeAt(i)>127)
  {
   return(false);
  }
 }
 for(i=0;i<domain.length;i++)
 {
  if(domain.charCodeAt(i)>127)
  {
   return(false);
  }
 }
 if(user.match(userPat)==null) 
 {
  return(false);
 }
 var IPArray=domain.match(ipDomainPat);
 if(IPArray!=null) 
 {
  for(var i=1;i<=4;i++)
  {
   if(IPArray[i]>255)
   {
    return(false);
   }
  }
  return(true);
 }
 var atomPat=new RegExp("^" + atom + "$");
 var domArr=domain.split(".");
 var len=domArr.length;
 for (i=0;i<len;i++) 
 {
  if(domArr[i].search(atomPat)==-1)
  {
   return(false);
  }
 }
 if((checkTLD)&&(domArr[domArr.length-1].length!=2)&&(domArr[domArr.length-1].search(knownDomsPat)==-1))
 {
  return(false);
 }
 if(len<2)
 {
  return(false);
 }
 return(true);
}
function ValidEmail(name,msg)
{
 var item=getinput(name);
 f=_ValidEmail(item.value.toLowerCase());
 if(!f)
 {
  error(name,msg,true);
 }
 return(f);
}
function myprint(div,title,s)
{
 var c=getelement(document,div+'_NORMAL');
 c.innerHTML=s;
 c=getelement(document,div+'_SHORTTITLE');
 c.innerHTML=title;
}
function myprintpanier(div,s)
{
 var c=getelement(document,div);
 alert(s);
 c.innerHTML=s;
}
function mystop()
{
 if(navigator.appName == "Microsoft Internet Explorer")
  document.execCommand('Stop');
 else
  window.stop();
}
function updatememoinfo(s,memoinfo)
{
 var c=getelement(document,s+'_INFO');
 c.innerHTML='<i>'+memoinfo+'</i>';
}
 function check_memo(s,i)
 {
  c=getinput(s);
  if(c.value.length>i)
   c.value=c.value.substring(0,i);
  if(c.value.length>0)
  {
  updatememoinfo(s,'&nbsp;&nbsp;&nbsp;<i>('+c.value.length+'/'+i+' caract&egrave;res maximum)</i>');
  }
  else
  {
  updatememoinfo(s,'&nbsp;&nbsp;&nbsp;<i>('+i+' caract&egrave;res maximum)</i>');
  }
  return 1;
 }
function check_doc()
{
 f=1;
 f=((f)&&(ValidMinStrLength(      'REC_NOM',             1, 'Veuillez saisir votre nom !'                )));
 f=((f)&&(ValidMinStrLength(      'REC_DATENAISSANCE',   6, 'Votre date de naissance est invalide !'     )));
 f=((f)&&(ValidMinStrLength(      'REC_ADRESSE',         1, 'Veuillez saisir votre adresse !'            )));
 f=((f)&&(ValidMinStrLength(      'REC_CP',              5, 'Votre code postal est invalide !'           )));
 f=((f)&&(ValidInt(               'REC_CP',              1, 'Votre code postal est invalide !'           )));
 f=((f)&&(ValidMinStrLength(      'REC_VILLE',           1, 'Veuillez saisir la ville !'                 )));
 f=((f)&&(ValidMinStrLength(      'REC_MOBILE',          5, 'Votre telephone mobile est invalide !'      )));
 f=((f)&&(ValidMinStrLength(      'REC_EMAIL',           1, 'Veuillez saisir l\'adresse e-mail !'       )));
 f=((f)&&(ValidEmail(             'REC_EMAIL',              'Votre adresse e-mail est invalide !'        )));
 idx=1;
 while((f)&&(getinput('REC_NOM'+idx)))
 {
  s=getinput('REC_CADEAU'+idx);
  if(s.options[s.selectedIndex].value=='O')
  {
  f=((f)&&(ValidMinStrLength(      'REC_NOM'+idx,             1, 'Veuillez saisir le nom !'                )));
  f=((f)&&(ValidMinStrLength(      'REC_EMAIL'+idx,           1, 'Veuillez saisir l\'adresse e-mail !'    )));
  f=((f)&&(ValidEmail(             'REC_EMAIL'+idx,              'L\'adresse e-mail est invalide !'       )));
 }
 else
 {
 }
 idx=idx+1;
}
 return(f);
}
var weekend = [0,6];
var weekendColor = "#e0e0e0";
var fontface = "Verdana";
var fontsize = 2;
var gNow = new Date();
var ggWinCal;
var EventOnChange ;
Calendar.Months = ["Janvier","Février","Mars","Avril","Mai","Juin","Juillet","Août","Septembre","Octobre","Novembre","Décembre"];
// Non-Leap year Month days..
Calendar.DOMonth = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
// Leap year Month days..
Calendar.lDOMonth = [31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
if (navigator.userAgent.toLowerCase().indexOf('msie'))
{
	isIE = true ;
	isNav = false ;
}
else
{
	isIE = false ;
	isNav = true ;
}
Calendar.get_month = Calendar_get_month;
Calendar.get_daysofmonth = Calendar_get_daysofmonth;
Calendar.calc_month_year = Calendar_calc_month_year;
Calendar.print = Calendar_print;
new Calendar();

function StringAsDate2(TheString, newfomart)
{
  switch (newfomart)
  {
    case "YYYY-MM-DD" :
      TheString = TheString.replace('.', '#DateSeparator#').replace('.', '#DateSeparator#') ;
      TheString = TheString.replace('-', '#DateSeparator#').replace('-', '#DateSeparator#') ;
      TheString = TheString.replace(' ', '#DateSeparator#').replace(' ', '#DateSeparator#') ;
      TheString = TheString.replace('/', '#DateSeparator#').replace('/', '#DateSeparator#') ;
      var myArray = TheString.split('#DateSeparator#') ;
      TheDay = parseInt(myArray[2],10) ;
      TheMonth = parseInt(myArray[1],10) - 1 ;
      TheYear = parseInt(myArray[0],10) ;
      if (isNaN(TheDay) || isNaN(TheMonth) || isNaN(TheYear))
      {
        var Result = new Date() ;
      }
      else
      {
        if (TheYear < 100)
          TheYear = TheYear + 2000 ;
      var Result = new Date(TheYear, TheMonth, TheDay) ;
      }
      return Result ;
      break;
    default:
      return(StringAsDate(TheString));
      break;
  }
}

function StringAsDate(TheString)
{
  TheString = TheString.replace('.', '#DateSeparator#').replace('.', '#DateSeparator#') ;
  TheString = TheString.replace('-', '#DateSeparator#').replace('-', '#DateSeparator#') ;
  TheString = TheString.replace(' ', '#DateSeparator#').replace(' ', '#DateSeparator#') ;
  TheString = TheString.replace('/', '#DateSeparator#').replace('/', '#DateSeparator#') ;
  var myArray = TheString.split('#DateSeparator#') ;
  TheDay = parseInt(myArray[0],10) ;
  TheMonth = parseInt(myArray[1],10) - 1 ;
  TheYear = parseInt(myArray[2],10) ;
  if (isNaN(TheDay) || isNaN(TheMonth) || isNaN(TheYear))
  {
    var Result = new Date();
  }
  else
  {
    if (TheYear < 100)
      TheYear = TheYear + 2000 ;
    var Result = new Date(TheYear, TheMonth, TheDay);
  }
  return Result;
}

function Calendar(p_item, p_WinCal, p_month, p_year, p_format)
{
  if ((p_month == null) && (p_year == null))
    return;
  if (p_WinCal == null)
    this.gWinCal = ggWinCal;
  else
    this.gWinCal = p_WinCal;
  if (p_month == null)
  {
    this.gMonthName = null;
    this.gMonth = null;
    this.gYearly = true;
  }
  else
  {
    this.gMonthName = Calendar.get_month(p_month);
    this.gMonth = new Number(p_month);
    this.gYearly = false;
  }
  this.gYear = p_year;
  this.gFormat = p_format;
  this.gBGColor = "white";
  this.gFGColor = "black";
  this.gTextColor = "black";
  this.gHeaderColor = "black";
  this.gReturnItem = p_item;
}

function Calendar_get_month(monthNo)
{
  return Calendar.Months[monthNo];
}

function Calendar_get_daysofmonth(monthNo, p_year)
{
  /* 
  Check for leap year ..
  1.Years evenly divisible by four are normally leap years, except for... 
  2.Years also evenly divisible by 100 are not leap years, except for... 
  3.Years also evenly divisible by 400 are leap years. 
  */
  if ((p_year % 4) == 0)
  {
    if ((p_year % 100) == 0 && (p_year % 400) != 0)
      return Calendar.DOMonth[monthNo];
    return Calendar.lDOMonth[monthNo];
  }
  else
    return Calendar.DOMonth[monthNo];
}

function Calendar_calc_month_year(p_Month, p_Year, incr)
{
  /*
  Will return an 1-D array with 1st element being the calculated month 
  and second being the calculated year 
  after applying the month increment/decrement as specified by 'incr' parameter.
  'incr' will normally have 1/-1 to navigate thru the months.
  */
  var ret_arr = new Array();
  
  if (incr == -1)
  {
    // B A C K W A R D
    if (p_Month == 0)
    {
      ret_arr[0] = 11;
      ret_arr[1] = parseInt(p_Year) - 1;
    }
    else
    {
      ret_arr[0] = parseInt(p_Month) - 1;
      ret_arr[1] = parseInt(p_Year);
    }
  } 
  else
    if (incr == 1)
    {
      // F O R W A R D
      if (p_Month == 11)
      {
        ret_arr[0] = 0;
        ret_arr[1] = parseInt(p_Year) + 1;
      }
      else
      {
        ret_arr[0] = parseInt(p_Month) + 1;
        ret_arr[1] = parseInt(p_Year);
      }
    }
  return ret_arr;
}

function Calendar_print()
{
  ggWinCal.print();
}

Calendar.prototype.getMonthlyCalendarCode = function()
{
  var vCode = "";
  var vHeader_Code = "";
  var vData_Code = "";
  // Begin Table Drawing code here..
  vCode = vCode + "<TABLE BORDER=1 BGCOLOR=\"" + this.gBGColor + "\">";
  vHeader_Code = this.cal_header();
  vData_Code = this.cal_data();
  vCode = vCode + vHeader_Code + vData_Code;
  vCode = vCode + "</TABLE>";
  return vCode;
}

Calendar.prototype.show = function()
{
  var vCode = "";
  this.gWinCal.document.open();
  // Setup the page...
  this.wwrite("<html>");
  this.wwrite("<head><title>Calendrier</title>");
  this.wwrite("</head>");
  this.wwrite("<body " + 
    "link=\"" + this.gLinkColor + "\" " + 
    "vlink=\"" + this.gLinkColor + "\" " +
    "alink=\"" + this.gLinkColor + "\" " +
    "text=\"" + this.gTextColor + "\">");
  this.wwriteA("<FONT FACE='" + fontface + "' SIZE=2><B>");
  this.wwriteA(this.gMonthName + " " + this.gYear);
  this.wwriteA("</B>&nbsp;&nbsp;&nbsp;<A HREF='#'  onClick=\"self.opener.document." + this.gReturnItem + ".value='';window.close();\">Effacer</A><BR>");
  // Show navigation buttons
  var prevMMYYYY = Calendar.calc_month_year(this.gMonth, this.gYear, -1);
  var prevMM = prevMMYYYY[0];
  var prevYYYY = prevMMYYYY[1];
  var nextMMYYYY = Calendar.calc_month_year(this.gMonth, this.gYear, 1);
  var nextMM = nextMMYYYY[0];
  var nextYYYY = nextMMYYYY[1];
  this.wwrite("<TABLE WIDTH='100%' BORDER=1 CELLSPACING=0 CELLPADDING=0 BGCOLOR='#e0e0e0'><TR><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"" +
    "javascript:window.opener.Build(" + 
    "'" + this.gReturnItem + "', '" + this.gMonth + "', '" + (parseInt(this.gYear)-1) + "', '" + this.gFormat + "'" +
    ");" +
    "\"><<<\/A>]</TD><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"" +
    "javascript:window.opener.Build(" + 
    "'" + this.gReturnItem + "', '" + prevMM + "', '" + prevYYYY + "', '" + this.gFormat + "'" +
    ");" +
    "\"><<\/A>]</TD><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"" +
    "javascript:window.opener.Build(" + 
    "'" + this.gReturnItem + "', '" + nextMM + "', '" + nextYYYY + "', '" + this.gFormat + "'" +
    ");" +
    "\">><\/A>]</TD><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"" +
    "javascript:window.opener.Build(" + 
    "'" + this.gReturnItem + "', '" + this.gMonth + "', '" + (parseInt(this.gYear)+1) + "', '" + this.gFormat + "'" +
    ");" +
    "\">>><\/A>]</TD></TR></TABLE><BR>");
  // Get the complete calendar code for the month..
  vCode = this.getMonthlyCalendarCode();
  this.wwrite(vCode);
  this.wwrite("</font></body></html>");
  this.gWinCal.document.close();
}

Calendar.prototype.showY = function()
{
  var vCode = "";
  var i;
  var vr, vc, vx, vy;    // Row, Column, X-coord, Y-coord
  var vxf = 285;      // X-Factor
  var vyf = 200;      // Y-Factor
  var vxm = 10;      // X-margin
  var vym;        // Y-margin
  if (isIE)
    vym = 75;
  else
    if(isNav)
      vym = 25;
  this.gWinCal.document.open();
  this.wwrite("<html>");
  this.wwrite("<head><title>Calendar</title>");
  this.wwrite("<style type=\"text/css\">\n<!--");
  for (i=0; i<12; i++)
  {
    vc = i % 3;
    if (i>=0 && i<= 2)
      vr = 0;
    if (i>=3 && i<= 5)
      vr = 1;
    if (i>=6 && i<= 8)
      vr = 2;
    if (i>=9 && i<= 11)
      vr = 3;
    vx = parseInt(vxf * vc) + vxm;
    vy = parseInt(vyf * vr) + vym;
    this.wwrite(".lclass" + i + " {position:absolute;top:" + vy + ";left:" + vx + ";}");
  }
  this.wwrite("-->\n</style>");
  this.wwrite("</head>");
  this.wwrite("<body " + 
    "link=\"" + this.gLinkColor + "\" " + 
    "vlink=\"" + this.gLinkColor + "\" " +
    "alink=\"" + this.gLinkColor + "\" " +
    "text=\"" + this.gTextColor + "\">");
  this.wwrite("<FONT FACE='" + fontface + "' SIZE=2><B>");
  this.wwrite("Year : " + this.gYear);
  this.wwrite("</B><BR>");
  // Show navigation buttons
  var prevYYYY = parseInt(this.gYear) - 1;
  var nextYYYY = parseInt(this.gYear) + 1;
  this.wwrite("<TABLE WIDTH='100%' BORDER=1 CELLSPACING=0 CELLPADDING=0 BGCOLOR='#e0e0e0'><TR><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"" +
    "javascript:window.opener.Build(" + 
    "'" + this.gReturnItem + "', null, '" + prevYYYY + "', '" + this.gFormat + "'" +
    ");" +
    "\" alt='Prev Year'><<<\/A>]</TD><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"javascript:window.print();\">Print</A>]</TD><TD ALIGN=center>");
  this.wwrite("[<A HREF=\"" +
    "javascript:window.opener.Build(" + 
    "'" + this.gReturnItem + "', null, '" + nextYYYY + "', '" + this.gFormat + "'" +
    ");" +
    "\">>><\/A>]</TD></TR></TABLE><BR>");
  // Get the complete calendar code for each month..
  var j;
  for (i=11; i>=0; i--)
  {
    if (isIE)
      this.wwrite("<DIV ID=\"layer" + i + "\" CLASS=\"lclass" + i + "\">");
    else
      if (isNav)
        this.wwrite("<LAYER ID=\"layer" + i + "\" CLASS=\"lclass" + i + "\">");
    this.gMonth = i;
    this.gMonthName = Calendar.get_month(this.gMonth);
    vCode = this.getMonthlyCalendarCode();
    this.wwrite(this.gMonthName + "/" + this.gYear + "<BR>");
    this.wwrite(vCode);
    if (isIE)
      this.wwrite("</DIV>");
    else
      if (isNav)
    this.wwrite("</LAYER>");
  }
  this.wwrite("</font><BR></body></html>");
  this.gWinCal.document.close();
}

Calendar.prototype.wwrite = function(wtext)
{
  this.gWinCal.document.writeln(wtext);
}

Calendar.prototype.wwriteA = function(wtext)
{
  this.gWinCal.document.write(wtext);
}

Calendar.prototype.cal_header = function()
{
  var vCode = "";
  vCode = vCode + "<TR>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Dim</B></FONT></TD>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Lun</B></FONT></TD>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Mar</B></FONT></TD>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Mer</B></FONT></TD>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Jeu</B></FONT></TD>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Ven</B></FONT></TD>";
  vCode = vCode + "<TD WIDTH='14%'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Sam</B></FONT></TD>";
  vCode = vCode + "</TR>";
  return vCode;
}

Calendar.prototype.cal_data = function()
{
  var vDate = new Date();
  vDate.setDate(1);
  vDate.setMonth(this.gMonth);
  vDate.setFullYear(this.gYear);
  var vFirstDay=vDate.getDay();
  var vDay=1;
  var vLastDay=Calendar.get_daysofmonth(this.gMonth, this.gYear);
  var vOnLastDay=0;
  var vCode = "";
  /*
  Get day for the 1st of the requested month/year..
  Place as many blank cells before the 1st day of the month as necessary. 
  */
  vCode = vCode + "<TR>";
  for (i=0; i<vFirstDay; i++)
  {
    vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(i) + "><FONT SIZE='2' FACE='" + fontface + "'> </FONT></TD>";
  }
  // Write rest of the 1st week
  for (j=vFirstDay; j<7; j++)
  {
    vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j) + "><FONT SIZE='2' FACE='" + fontface + "'>" + 
      "<A HREF='#' " + 
      "onClick=\"self.opener.document." + this.gReturnItem + ".value='" + 
      this.format_data(vDay) + 
      "';" + EventOnChange + "window.close();\">" + 
      this.format_day(vDay) + 
      "</A>" + 
      "</FONT></TD>";
    vDay=vDay + 1;
  }
  vCode = vCode + "</TR>";
  // Write the rest of the weeks
  for (k=2; k<7; k++)
  {
    vCode = vCode + "<TR>";
    for (j=0; j<7; j++)
    {
      vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j) + "><FONT SIZE='2' FACE='" + fontface + "'>" + 
        "<A HREF='#' " + 
        "onClick=\"self.opener.document." + this.gReturnItem + ".value='" + 
        this.format_data(vDay) + 
        "';" + EventOnChange + "window.close();\">" + 
        this.format_day(vDay) + 
        "</A>" + 
        "</FONT></TD>";
      vDay=vDay + 1;
      if (vDay > vLastDay)
      {
        vOnLastDay = 1;
        break;
      }
    }
    if (j == 6)
      vCode = vCode + "</TR>";
    if (vOnLastDay == 1)
      break;
  }
  // Fill up the rest of last week with proper blanks, so that we get proper square blocks
  for (m=1; m<(7-j); m++)
  {
    if (this.gYearly)
      vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j+m) + 
      "><FONT SIZE='2' FACE='" + fontface + "' COLOR='gray'> </FONT></TD>";
    else
      vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j+m) + 
      "><FONT SIZE='2' FACE='" + fontface + "' COLOR='gray'>" + m + "</FONT></TD>";
  }
  return vCode;
}

Calendar.prototype.format_day = function(vday)
{
  var vNowDay = gNow.getDate();
  var vNowMonth = gNow.getMonth();
  var vNowYear = gNow.getFullYear();
  if (vday == vNowDay && this.gMonth == vNowMonth && this.gYear == vNowYear)
    return ("<FONT COLOR=\"RED\"><B>" + vday + "</B></FONT>");
  return (vday);
}

Calendar.prototype.write_weekend_string = function(vday)
{
  var i;
  // Return special formatting for the weekend day.
  for (i=0; i<weekend.length; i++)
  {
    if (vday == weekend[i])
      return (" BGCOLOR=\"" + weekendColor + "\"");
  }
  return "";
}

Calendar.prototype.format_data = function(p_day)
{
  var vData;
  var vMonth = 1 + this.gMonth;
  vMonth = (vMonth.toString().length < 2) ? "0" + vMonth : vMonth;
  var vMon = Calendar.get_month(this.gMonth).substr(0,3).toUpperCase();
  var vFMon = Calendar.get_month(this.gMonth).toUpperCase();
  var vY4 = new String(this.gYear);
  var vY2 = new String(this.gYear.substr(2,2));
  var vDD = (p_day.toString().length < 2) ? "0" + p_day : p_day;
  switch (this.gFormat)
  {
    case "YYYY-MM-DD" :
      vData = vY4 + "-" + vMonth + "-" + vDD;
      break;
    case "MM\/DD\/YYYY" :
      vData = vMonth + "\/" + vDD + "\/" + vY4;
      break;
    case "MM\/DD\/YY" :
      vData = vMonth + "\/" + vDD + "\/" + vY2;
      break;
    case "MM-DD-YYYY" :
      vData = vMonth + "-" + vDD + "-" + vY4;
      break;
    case "MM-DD-YY" :
      vData = vMonth + "-" + vDD + "-" + vY2;
      break;
    case "DD\/MON\/YYYY" :
      vData = vDD + "\/" + vMon + "\/" + vY4;
      break;
    case "DD\/MON\/YY" :
      vData = vDD + "\/" + vMon + "\/" + vY2;
      break;
    case "DD-MON-YYYY" :
      vData = vDD + "-" + vMon + "-" + vY4;
      break;
    case "DD-MON-YY" :
      vData = vDD + "-" + vMon + "-" + vY2;
      break;
    case "DD\/MONTH\/YYYY" :
      vData = vDD + "\/" + vFMon + "\/" + vY4;
      break;
    case "DD\/MONTH\/YY" :
      vData = vDD + "\/" + vFMon + "\/" + vY2;
      break;
    case "DD-MONTH-YYYY" :
      vData = vDD + "-" + vFMon + "-" + vY4;
      break;
    case "DD-MONTH-YY" :
      vData = vDD + "-" + vFMon + "-" + vY2;
      break;
    case "DD\/MM\/YYYY" :
      vData = vDD + "\/" + vMonth + "\/" + vY4;
      break;
    case "DD\/MM\/YY" :
      vData = vDD + "\/" + vMonth + "\/" + vY2;
      break;
    case "DD-MM-YYYY" :
      vData = vDD + "-" + vMonth + "-" + vY4;
      break;
    case "DD-MM-YY" :
      vData = vDD + "-" + vMonth + "-" + vY2;
      break;
    default :
      vData = vMonth + "\/" + vDD + "\/" + vY4;
  }
  return vData;
}

function Build(p_item, p_month, p_year, p_format)
{
  var p_WinCal = ggWinCal;
  gCal = new Calendar(p_item, p_WinCal, p_month, p_year, p_format);
  // Customize your Calendar here..
  gCal.gBGColor="white";
  gCal.gLinkColor="black";
  gCal.gTextColor="black";
  gCal.gHeaderColor="darkgreen";
  // Choose appropriate show function
  if (gCal.gYearly)
    gCal.showY();
  else
    gCal.show();
}

function show_calendar()
{
  /* 
    p_month : 0-11 for Jan-Dec; 12 for All Months.
    p_year  : 4-digit year
    p_format: Date format (mm/dd/yyyy, dd/mm/yy, ...)
    p_item  : Return Item.
  */
  p_item = arguments[0];
  p_month = new String(gNow.getMonth());
  p_year = new String(gNow.getFullYear().toString());
  if (arguments[1] == null)
    p_format = "DD/MM/YYYY";
  else
    p_format = arguments[1];
  vOldDate = eval("document." + p_item + ".value") ;
  if ((vOldDate != '') && (vOldDate != 'jj/mm/aaaa'))
  {
    // Récupération ancienne date
    vdtOldDate = StringAsDate2(vOldDate, p_format) ;
    p_month = vdtOldDate.getMonth();
    p_year = vdtOldDate.getFullYear().toString();
  }
  vWinCal = window.open("", "Calendar", 
    "width=300,height=250,status=no,resizable=no,top=200,left=200");
  vWinCal.opener = self;
  ggWinCal = vWinCal;
  if ((arguments[2] == null) || (arguments[2] == ''))
    EventOnChange = '' ;
  else
    EventOnChange = 'self.opener.' + arguments[2] + ';' ;
  Build(p_item, p_month, p_year, p_format);
  vWinCal.focus() ;
}

function show_yearly_calendar(p_item, p_year, p_format)
{
  // Load the defaults..
  if (p_year == null || p_year == "")
    p_year = new String(gNow.getFullYear().toString());
  if (p_format == null || p_format == "")
    p_format = "MM/DD/YYYY";
  var vWinCal = window.open("", "Calendar", "scrollbars=yes,resizable=yes,width=800,height=500");
  vWinCal.opener = self;
  ggWinCal = vWinCal;
  Build(p_item, null, p_year, p_format);
}

function clear_calendar(date_to_clear)
{
var value1 = eval("this.document." + date_to_clear);
value1.value='';
}
function set_calendar(date_to_set, value)
{
var value1 = eval("this.document." + date_to_set);
value1.value=value;
}
function thismonth(date_start, date_end, flag_set)
{
  var tmp_month = new String(gNow.getMonth() + 1);
  if (tmp_month.length == 1)
     tmp_month = new String("0" + tmp_month);
  var tmp_year = new String(gNow.getFullYear().toString());
  var tmp_day = new String("01");
  var value1 = eval("this.document." + date_start);
  value1.value = tmp_year.toString() + "-" + tmp_month.toString() + "-" + tmp_day.toString(); 
  var tmp2 = gNow.getFullYear();
  var tmp = gNow.getMonth() + 2;
  if (tmp == 13)
    {
         tmp = 1;
    tmp2++;
    }
  tmp_month = new String(tmp);
  if (tmp_month.length == 1)
     tmp_month = new String("0" + tmp_month);
  tmp_year = new String(tmp2.toString());
  tmp_day = "01";
  value1 = eval("this.document." + date_end);
  value1.value = tmp_year.toString() + "-" + tmp_month.toString() + "-" + tmp_day.toString();
}

function find(item)
{
 if( window.mmIsOpera ) return(document.getElementById(item));
 if (document.all) return(document.all[item]);
 if (document.getElementById) return(document.getElementById(item));
 return(false);
}
function js_fetch(method)
{
 this.fetcher         = false;
 this.fetch_method    = method;
 this.fetch_url       = false;
 this.error           = '';
 this.result          = '';
 this.httpstatus      = 0;
 this._params         = new Array();
 this._events         = new Array();
 this._initialized    = false;
 this._contentBody    = '';
 this._AdditionalURL  = '';
 if (typeof(XMLHttpRequest) == 'undefined')
 {
  if (typeof(ActiveXObject) != 'undefined')
  {
   window.XMLHttpRequest = function ()
   {
    var ActiveXControl = false;
    ActiveXControl = new ActiveXObject('Microsoft.XMLHTTP');
    if (ActiveXControl)
    {
     return (ActiveXControl);
    }
    else
    {
     this.error = 'Please use a JScript compatible version of your browser';
     return (false);
    }
   }
  }
  if (window.opera && !window.XMLHttpRequest)
  {
   window.XMLHttpRequest = function ()
   {
    this.error = 'You need at least Opera 7.60 to use js_fetch library';
    return (false);
   }
  }
 }
 this.init=function ()
 {
  if (this._fetch_ctor() != false)
  {
   return (true);
  }
  else
  {
   return (false);
  }
 }
 this.add_param=function (Name, Value)
 {
  if (!this._initialized)
  {
   this.error = 'Object is not Initialized, use init()';
   return (false);
  }
  this._params[Name] = Value;
  return (true);
 }
 this.go=function (url)
 {
  if (!this._initialized)
  {
   this.error = 'Object is not Initialized, use fetch_init';
   return (false);
  }
  if (this.fetch_method == 'POST')
  {
   this._prepare_post();
   this._go_post(url);
  }
  else
  {
   this._prepare_get();
   this._go_get(url);
  }
  return (true);
 }
 this.set_handler=function (func)
 {
  if (!this._initialized) {
   this.error = 'Object is not Initialized, use fetch_init';
   return (false);
  }
  this.fetcher.onreadystatechange = func;
  return (true);
 }
 this.result=function ()
 {
  if (!this._initialized)
  {
   this.error = 'Object is not Initialized, use fetch_init';
   return (-1);
  }
  if (this.fetcher.readyState == 4)
  {
   this.result = this.fetcher.responseText;
   this.httpstatus = this.fetcher.status;
   return (this.result);
  }
  else
  {
   return ('');
  }
 }
 this.get_state=function ()
 {
  if (!this._initialized)
  {
   this.error = 'Object is not Initialized, use fetch_init';
   return (-1);
  }
  return (this.fetcher.readyState);
 }
 this._fetch_ctor=function ()
 {
  if (typeof(XMLHttpRequest) != 'undefined')
  {
   this.fetcher = new XMLHttpRequest();
   if (this.fetcher)
   {
    if (this.fetch_method.toLowerCase() == 'post')
    {
     this.fetch_method = 'POST';
    }
    else
    {
     this.fetch_method = 'GET';
    }
    this._initialized = true;
    return (true);
   }
   else
   {
    return (false);
   }
  }
  return (false);
 }
 this._prepare_post=function ()
 {
  this._contentBody = '';
  for (i in this._params) {
   this._contentBody += encodeURI(i);
   this._contentBody += '=';
   this._contentBody += encodeURI(this._params[i]);
   this._contentBody += '&';
  }
  if (this._contentBody.substr(this._contentBody.length - 1, 1) == '&')
  {
   this._contentBody = this._contentBody.substr(0, this._contentBody.length - 1);
  }
 }
 this._go_post=function (url)
 {
  this.fetcher.open('POST', url, true);
  this.fetcher.setRequestHeader('X-Powered-by', 'js_fetch Lib');
  this.fetcher.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
  this.fetcher.setRequestHeader('Content-Length', this._contentBody.length);
  this.fetcher.send(this._contentBody);
 }
 this._prepare_get=function ()
 {
  this._AdditionalURL = '';
  for (i in this._params)
  {
   this._AdditionalURL += encodeURI(i);
   this._AdditionalURL += '=';
   this._AdditionalURL += encodeURI(this._params[i]);
   this._AdditionalURL += '&';
  }
  if (this._AdditionalURL.substr(this._AdditionalURL.length - 1, 1) == '&')
  {
   this._AdditionalURL = this._AdditionalURL.substr(0, this._AdditionalURL.length - 1);
  }
 }
 this._go_get   = function (url)
 {
  if (url.indexOf('?') == -1) {
   url += '?' + this._AdditionalURL;
  }
  else
  {
   url += '&' + this._AdditionalURL;
  }
  this.fetcher.open('GET', url, true);
  this.fetcher.setRequestHeader('X-Powered-by', 'js_fetch Lib');
  this.fetcher.send('');
 }
}
function _getpanier()
{
 span=find('panier');
	if(typeof(fetchergetpanier)=='undefined')
 {
  return(true);
 }
	switch(fetchergetpanier.get_state())
 {
  case 4:
   s=fetchergetpanier.result();
   if((s.indexOf('<script>')>=0)&&(s.lastIndexOf('</script>')>=0))
   {
    var sc=s.substring(s.indexOf('<script>')+8,s.lastIndexOf('</script>'));
    if(sc!='') eval(sc);
   }
   else
   {
   span.innerHTML=s;
   }
 }
	return(true);
}
function getpanier()
{
 fetchergetpanier=new js_fetch('POST');
 if(!fetchergetpanier.init())
 {
  alert(fetchergetpanier.error);
  return (true);
 }
 fetchergetpanier.add_param('ECRAN','GETPANIER');
 fetchergetpanier.set_handler(_getpanier);
 fetchergetpanier.go('/boutique/');
}
function _addpanier()
{
 span=find('panier');
	if(typeof(fetcheraddpanier)=='undefined')
 {
  return(true);
 }
	switch(fetcheraddpanier.get_state())
 {
  case 4:
   span.innerHTML=fetcheraddpanier.result();
   document.location='http://www.pro-pulsion.com/panier.htm';
 }
	return(true);
}
function addpanier(item,value)
{
 fetcheraddpanier=new js_fetch('POST');
 if(!fetcheraddpanier.init())
 {
  alert(fetcheraddpanier.error);
  return (true);
 }
 fetcheraddpanier.add_param('ECRAN','ADDPANIER');
 fetcheraddpanier.add_param('ITEM',item);
 fetcheraddpanier.add_param('COUNT',value);
 fetcheraddpanier.set_handler(_addpanier);
 fetcheraddpanier.go('/boutique/');
}
function _delpanier()
{
 span=find('panier');
	if(typeof(fetcherdelpanier)=='undefined')
 {
  return(true);
 }
	switch(fetcherdelpanier.get_state())
 {
  case 4:
   span.innerHTML=fetcherdelpanier.result();
   showpanier();
 }
	return(true);
}
function delpanier(item)
{
 fetcherdelpanier=new js_fetch('POST');
 if(!fetcherdelpanier.init())
 {
  alert(fetcherdelpanier.error);
  return (true);
 }
 fetcherdelpanier.add_param('ECRAN','DELPANIER');
 fetcherdelpanier.add_param('ITEM',item);
 for(i=0;i<document.forms[0].elements.length;i++)
 {
  fetcherdelpanier.add_param(document.forms[0].elements[i].name,document.forms[0].elements[i].value);
 }
 fetcherdelpanier.set_handler(_delpanier);
 fetcherdelpanier.go('/boutique/');
}
function _setpromo()
{
 span=find('panier');
	if(typeof(fetchersetpromo)=='undefined')
 {
  return(true);
 }
	switch(fetchersetpromo.get_state())
 {
  case 4:
   span.innerHTML=fetchersetpromo.result();
   showpanier();
 }
	return(true);
}
function setpromo(item,abrpromotion,datestage)
{
 fetchersetpromo=new js_fetch('POST');
 if(!fetchersetpromo.init())
 {
  alert(fetchersetpromo.error);
  return (true);
 }
 fetchersetpromo.add_param('ECRAN','SETPROMO');
 fetchersetpromo.add_param('ITEM',item);
 fetchersetpromo.add_param('ABRPROMOTION',abrpromotion);
 fetchersetpromo.add_param('DATESTAGE',datestage);
 for(i=0;i<document.forms[0].elements.length;i++)
 {
  fetchersetpromo.add_param(document.forms[0].elements[i].name,document.forms[0].elements[i].value);
 }
 fetchersetpromo.set_handler(_setpromo);
 fetchersetpromo.go('/boutique/');
}
function _showpanier()
{
 span=find('contenupanier');
	if(typeof(fetchershowpanier)=='undefined')
 {
  return(true);
 }
	switch(fetchershowpanier.get_state())
 {
  case 4:
   span.innerHTML=fetchershowpanier.result();
   getpanier();
 }
	return(true);
}
function showpanier()
{
 fetchershowpanier=new js_fetch('POST');
 if(!fetchershowpanier.init())
 {
  alert(fetchershowpanier.error);
  return (true);
 }
 fetchershowpanier.add_param('ECRAN','SHOWPANIER');
 fetchershowpanier.set_handler(_showpanier);
 fetchershowpanier.go('/boutique/');
}
function _viderpanier()
{
 span=find('panier');
	if(typeof(fetcherviderpanier)=='undefined')
 {
  return(true);
 }
	switch(fetcherviderpanier.get_state())
 {
  case 4:
   span.innerHTML=fetcherviderpanier.result();
   showpanier();
 }
	return(true);
}
function viderpanier()
{
 fetcherviderpanier=new js_fetch('POST');
 if(!fetcherviderpanier.init())
 {
  alert(fetcherviderpanier.error);
  return (true);
 }
 fetcherviderpanier.add_param('ECRAN','VIDERPANIER');
 fetcherviderpanier.set_handler(_viderpanier);
 fetcherviderpanier.go('/boutique/');
}
function sauverpanier()
{
 fetchersauverpanier=new js_fetch('POST');
 if(!fetchersauverpanier.init())
 {
  alert(fetchersauverpanier.error);
  return (true);
 }
 fetchersauverpanier.add_param('ECRAN','SAUVERPANIER');
 for(i=0;i<document.forms[0].elements.length;i++)
 {
  fetchersauverpanier.add_param(document.forms[0].elements[i].name,document.forms[0].elements[i].value);
 }
 fetchersauverpanier.go('/boutique/');
}
function _payerpanier()
{
 span=find('panier');
	if(typeof(fetcherpayerpanier)=='undefined')
 {
  return(true);
 }
	switch(fetcherpayerpanier.get_state())
 {
  case 4:
   span.innerHTML=fetcherpayerpanier.result();
   document.location='http://www.pro-pulsion.com//boutique/?ECRAN=PAYERPANIER';
 }
	return(true);
}
function _payerpanier_chk()
{
 span=find('panier');
	if(typeof(fetcherpayerpanier)=='undefined')
 {
  return(true);
 }
	switch(fetcherpayerpanier.get_state())
 {
  case 4:
   span.innerHTML=fetcherpayerpanier.result();
   w=window.open('http://www.pro-pulsion.com//boutique/?ECRAN=PAYERPANIER','bondecommande','left=20,top=20,width=700,height=750,toolbar=yes,location=no,status=no,menubar=no,resizable=yes,scrollbars=yes');w.focus();
 }
	return(true);
}
function payerpanier(mode)
{
 if(check_doc())
 {
  setvalue('REC_MODE',mode);
  if(mode=='CB')
  {
   fetcherpayerpanier=new js_fetch('POST');
   if(!fetcherpayerpanier.init())
   {
    alert(fetcherpayerpanier.error);
    return (true);
   }
   fetcherpayerpanier.add_param('ECRAN','SAUVERPANIER');
   for(i=0;i<document.forms[0].elements.length;i++)
   {
    fetcherpayerpanier.add_param(document.forms[0].elements[i].name,document.forms[0].elements[i].value);
   }
   fetcherpayerpanier.set_handler(_payerpanier);
   fetcherpayerpanier.go('/boutique/');
  }
  else
  {
   fetcherpayerpanier=new js_fetch('POST');
   if(!fetcherpayerpanier.init())
   {
    alert(fetcherpayerpanier.error);
    return (true);
   }
   fetcherpayerpanier.add_param('ECRAN','SAUVERPANIER');
   for(i=0;i<document.forms[0].elements.length;i++)
   {
    fetcherpayerpanier.add_param(document.forms[0].elements[i].name,document.forms[0].elements[i].value);
   }
   fetcherpayerpanier.set_handler(_payerpanier_chk);
   fetcherpayerpanier.go('/boutique/');
  }
 }
}
function _rechargerpanier()
{
 span=find('panier');
	if(typeof(fetcherrechargerpanier)=='undefined')
 {
  return(true);
 }
	switch(fetcherrechargerpanier.get_state())
 {
  case 4:
   span.innerHTML=fetcherrechargerpanier.result();
   showpanier();
 }
	return(true);
}
function rechargerpanier()
{
 fetcherrechargerpanier=new js_fetch('POST');
 if(!fetcherrechargerpanier.init())
 {
  alert(fetcherrechargerpanier.error);
  return (true);
 }
 fetcherrechargerpanier.add_param('ECRAN','SAUVERPANIER');
 for(i=0;i<document.forms[0].elements.length;i++)
 {
  fetcherrechargerpanier.add_param(document.forms[0].elements[i].name,document.forms[0].elements[i].value);
 }
 fetcherrechargerpanier.set_handler(_rechargerpanier);
 fetcherrechargerpanier.go('/boutique/');
}