function checkRadio(a,s)
{for(var i=0;i<a.length;i++)
{a[i].checked=false}
for(var i=0;i<a.length;i++)
{if(a[i].value==s)
{a[i].checked=true
return}}
a[0].checked=true}
function getSelectValue(frm,name){for(var i=0;i<document.forms[frm].elements[name].length;i++){if(document.forms[frm].elements[name][i].selected==true){return document.forms[frm].elements[name][i].value}}
return-1}
function getRadioValue(frm,rdio)
{for(i=0;i<document.forms[frm].elements[rdio].length;i++){if(document.forms[frm].elements[rdio][i].checked==true){return document.forms[frm].elements[rdio][i].value;}}
return 0}
function checkFields(name)
{var i;var curTag;for(i=0;i<document.forms[name].elements.length-1;i++){curTag=document.forms[name].elements[i];if(curTag.type=="text"){if(curTag.value!=""){var dataType=window.checkType[i];if(dataType!=null&&dataType!=""){dataType=dataType.split(":");if(dataType[0]=="DATE"){if(isDateValide(curTag.value)==false){alert("format de date incorrect pour donnée ["+curTag.name+"]");curTag.focus();return false;}}
else if(dataType[0]=="NUMERIC"){if(dataType[1]=="INTEGER"){if(isNaN(strToInt(curTag.value))){alert("Saisie incorrecte pour la donnée ["+curTag.name+"]");curTag.focus();return false;}}
if(dataType[1]=="FLOAT"){if(isNaN(strToFloat(curTag.value))){alert("Saisie incorrecte pour la donnée ["+curTag.name+"]");curTag.focus();return false;}}}}}}}
return true;}
function isDateValide(pDate)
{if(pDate!="")
{var dateSplit=pDate.split("/");if(dateSplit.length<3){return false;}
else{var jour=parseInt(dateSplit[0],10);var mois=parseInt(dateSplit[1],10);var annee=parseInt(dateSplit[2],10);if(annee<2000)
{annee=annee%100;}
var dte=new Date(annee,mois-1,jour,0,0,0);var newYear=dte.getYear();if(newYear<2000)
{newYear=newYear%100;if(annee>=2000){newYear=newYear+2000;}}
if(newYear!=annee||dte.getMonth()+1!=mois||dte.getDate()!=jour)
{return false;}
return true;}}
else
return false;}
function selectPrev()
{selectID(currentSel-1)}
function selectNext()
{selectID(currentSel+1)}
function selectAgain()
{_selectID(currentSel,true)}
function _selectID(id,forceRefresh)
{var prev;var next;if(id>parent.maxID)
{id=parent.maxID;}
if(id<1)
{id=1;}
idChanged=id!=currentSel;if(idChanged||forceRefresh)
{lastSel=currentSel;currentSel=id;loadParams();loadCalcPage(id,forceRefresh);}}