// Procédures globales du projet
function _WMD(c){var a=c.substring(0,4);var d=new Date(a,eval(c.substring(4,6)+'-1'),c.substring(6,8),c.substring(8,10),c.substring(10,12),c.substring(12,14),c.substring(14,16)+"0");if(eval(a)<100)d.setFullYear(a);return d}
function _WBI(a){if(a%4)return 0;if(a>1582){if(a%100)return 1;if(a%400)return 0}return 1}
function _EVD(e,f){var t=new Array(12);t[0]=31;t[1]=28;t[2]=31;t[3]=30;t[4]=31;t[5]=30;t[6]=31;t[7]=31;t[8]=30;t[9]=31;t[10]=30;t[11]=31;var a=Math.floor((eval(e) + 657071)/365);var x=_WMD('18000101');var y=_WMD(a+'0101')
var z=Math.floor((y-x)/(1000*3600*24))+1;while(z>eval(e)){a--;y=_WMD(a+'0101');z=Math.floor((y-x)/(1000*3600*24))+1}var j=eval(e)-z;var d=_WBI(a);var m=1;var i=0;t[1]=28+d;while(j>=t[i]){j-=t[i];m++;i++}j++;var b=""+a;var n=""+m
if(n.length==1)n="0"+n;var k=""+j;if(k.length==1)k="0"+k;if(f=='A')return b;if(f=='M')return n;if(f=='J')return k;return b+n+k}
function _COE(c,v,d){var n=new Date();var o=new Date(1800,00,01);var e=_WMD(_EVD(Math.round(((n-o)/(1000*3600*24))+1)+d));document.cookie=c+"="+escape(v)+";expires="+e.toGMTString()}
function _SAE(c,o){var d=0;c += "";var f=c.length-1;if(o&1)while(c.charAt(d)==" ")d++;if(o&2)while(c.charAt(f)==" ")f--;if (f < d) f= d;return c.substring(d,f+1)}
function _COL(c){var l=document.cookie;var d=l.indexOf(c+"=");if(d==-1)return"";d=l.indexOf("=",d)+1;var e=l.indexOf(";",d);if(e==-1)e=l.length;return(unescape(l.substring(d,e)))}
function _EC(c,p,s,n){var t=new Array();if(typeof(s)!=typeof(t))t[0]=s;else t=s;if (!(n == 1)){var d=0;for(var i=0;i<p-1;i++){var m=-1;var l=0;for(var j=0;j<t.length;j++){s=t[j];var k=c.indexOf(s,d);if((k>-1)&&((m<0)||(k<m))){m=k;l=s.length}}d=m+l
if(d==-1)return(p==1?c:"\b")}var f=-1;for(var j=0;j<t.length;j++){var k=c.indexOf(t[j],d);if((k>-1)&&((f<0)||(k<f)))f=k}if(f==-1)f=c.length;return c.substring(d,f)}else{var d = c.length;for(var i=0;i<p-1;i++){var m=-1;for(var j=0;j<t.length;j++){
var k=c.lastIndexOf(t[j],d-1);if(k>m)m=k}d=m;if (d == -1)	return (p==1?c:"\b")}var f=-1;var l=0;for(var j=0;j<t.length;j++){s=t[j];var k=c.lastIndexOf(s,d-1);if(k>f){f=k;l=s.length}}f+=l;if (f == -1)return c.substr(0, d);return c.substr(f, d - f)}}
function _VAL(v){var r=parseFloat(v);return isNaN(r)?0:r}
function _JDTW(d){var s = d.getFullYear();var m = d.getMonth() + 1;s += ((m < 10) ? "0" : "") + m;var j = d.getDate();s += ((j < 10) ? "0" : "") + j;return s}
function _DS(){return _JDTW(new Date())}
function PPANIERNAV_AJOUTEITEM(VNIDENTIFIANT, VSLIBELLE, VNQUANTITE, VNPRIXUNITAIRE){{var VSCONTENUPANIER=PPANIERNAV_PANIERLISTE();if((Position(VSCONTENUPANIER,(("*"+VNIDENTIFIANT)+"$"),null)!=0)){PPANIERNAV_MODIFIEITEM(VNIDENTIFIANT,1,true);return}
if((VSCONTENUPANIER!="")){VSCONTENUPANIER=VSCONTENUPANIER+"@@@"}VSCONTENUPANIER=VSCONTENUPANIER+((((((("*"+VNIDENTIFIANT)+"$")+VSLIBELLE)+"$")+VNQUANTITE)+"$")+VNPRIXUNITAIRE);_COE(PPANIERNAV_GETCOOKIENAME(),VSCONTENUPANIER,1)}}
function PPANIERNAV_PANIERLISTE(){{return(_SAE(_COL(PPANIERNAV_GETCOOKIENAME()),3))}}
function PPANIERNAV_MODIFIEITEM(VNIDENTIFIANT, VNQUANTITE, VBAJOUTE){{if (VBAJOUTE===undefined) VBAJOUTE=false;{var VSLIGNEPANIER="";var VSCONTENUPANIER=PPANIERNAV_PANIERLISTE();var VNPOS=Position(VSCONTENUPANIER,(("*"+VNIDENTIFIANT)+"$"),null)
if((VNPOS!=0)){var VNPOSFIN=Position(VSCONTENUPANIER,"@@@",(VNPOS+2));if((VNPOSFIN==0)){VNPOSFIN=VSCONTENUPANIER.length}VSLIGNEPANIER=(VSCONTENUPANIER + "").substring(VNPOS-1, VNPOSFIN);if((VBAJOUTE==false)){
VSLIGNEPANIER=((((((_EC(VSLIGNEPANIER,1,"$",0)+"$")+_EC(VSLIGNEPANIER,2,"$",0))+"$")+VNQUANTITE)+"$")+_EC(VSLIGNEPANIER,4,"$",0))}else {
VSLIGNEPANIER=((((((_EC(VSLIGNEPANIER,1,"$",0)+"$")+_EC(VSLIGNEPANIER,2,"$",0))+"$")+(_VAL(_EC(VSLIGNEPANIER,3,"$",0))+VNQUANTITE))+"$")+_EC(VSLIGNEPANIER,4,"$",0))}
VSCONTENUPANIER=(((VSCONTENUPANIER + "").substr(0, (VNPOS-1))+VSLIGNEPANIER)+(VSCONTENUPANIER + "").substr((VNPOSFIN+1)-1))}_COE(PPANIERNAV_GETCOOKIENAME(),VSCONTENUPANIER,1)}}}
function PPANIERNAV_SUPPRIMEITEM(VNIDENTIFIANT){{var VSLIGNEPANIER="";var VSCONTENUPANIER=PPANIERNAV_PANIERLISTE();var VNPOS=Position(VSCONTENUPANIER,(("*"+VNIDENTIFIANT)+"$"),null);if((VNPOS!=0)){
var VNPOSFIN=Position(VSCONTENUPANIER,"@@@",(VNPOS+2));if((VNPOSFIN==0)){VNPOSFIN=VSCONTENUPANIER.length}if((VNPOS<=1)){VNPOS=2}VSCONTENUPANIER=(((VSCONTENUPANIER + "").substr(0, (VNPOS-2))+"")+(VSCONTENUPANIER + "").substr((VNPOSFIN+2)-1))}
_COE(PPANIERNAV_GETCOOKIENAME(),VSCONTENUPANIER,1)}}
function PPANIERNAV_VIDEPANIER(){{_COE(PPANIERNAV_GETCOOKIENAME(),"",1)}}
function PPANIERNAV_GETCOOKIENAME(){{return(("PanierCatalogue"+_DS()))}}