<!--

////////////////////////////////////
// Diverses fonctions de controle //
////////////////////////////////////

function Blank(pField)
{
   valeur="";
   j=pField.length;
   for (i=0;i<=j;i++) if (pField.charAt(i)!=" ") valeur=valeur+pField.charAt(i);
   return valeur;
}

function Trim(pField)
{
   valeur="";
   i=1;
   for (j=0;j<pField.length;j++)
   {  if (i==1)
      {  if (pField.charAt(j)!=" ")
         {  valeur=valeur+pField.charAt(j);
            i=0;  }
      } else 
         {  if (pField.charAt(j)==" ")
            {  valeur=valeur+pField.charAt(j);
               i=1;
            } else valeur=valeur+pField.charAt(j);  }
   }        
   if (valeur.length>0 && valeur.charAt(valeur.length-1)==" ") valeur=valeur.substr(0,valeur.length-1);
   return valeur;
}

function DateOk(pDat)
{
  if (pDat.length!=10 || pDat.charAt(2)!="/" || pDat.charAt(5)!="/") return false;
  valeur=pDat.substr(0,2)+pDat.substr(3,2)+pDat.substr(6,4);
  if (!NumOk(valeur)) return false;
  if ((valeur.substr(0,2) < 1) || (valeur.substr(0,2) > 31) ||
      (valeur.substr(2,2) < 1) || (valeur.substr(2,2) > 12)) return false;
  return true;
}

function DateComp(pDeb,pFin)
{
  vDeb=pDeb.substr(6,4)+pDeb.substr(3,2)+pDeb.substr(0,2);
  vFin=pFin.substr(6,4)+pFin.substr(3,2)+pFin.substr(0,2);
  if (!NumOk(valeur)) return false;
  if ((valeur.substr(0,2) < 1) || (valeur.substr(0,2) > 31) ||
      (valeur.substr(2,2) < 1) || (valeur.substr(2,2) > 12)) return false;
  return(vDeb<=vFin);
}

function NumOk(pNum)
{
   for (i=0;i<=pNum.length;i++) if ("0123456789".indexOf(pNum.charAt(i)) < 0) return false;
   return true;
}

function Ctrl01(Lang)
{
  document.zfrm.znjo.value=Blank(document.zfrm.znjo.value);
  document.zfrm.znjd.value=Blank(document.zfrm.znjd.value);
  document.zfrm.znjf.value=Blank(document.zfrm.znjf.value);
  document.zfrm.zntx.value=Trim(document.zfrm.zntx.value);
  document.zfrm.zntd.value=Blank(document.zfrm.zntd.value);
  document.zfrm.zntf.value=Blank(document.zfrm.zntf.value);
  document.zfrm.zdes.value=Trim(document.zfrm.zdes.value);
  if (document.zfrm.zsec.selectedIndex==0 &&
      document.zfrm.zmin.selectedIndex==0 &&
      document.zfrm.znat.selectedIndex==0 &&
      document.zfrm.znjo.value.length==0 &&
      document.zfrm.znjd.value.length==0 &&
      document.zfrm.znjf.value.length==0 &&
      document.zfrm.zntx.value.length==0 &&
      document.zfrm.zntd.value.length==0 &&
      document.zfrm.zntf.value.length==0 &&
      document.zfrm.zdes.value.length==0)
  {
     if (Lang=="F") alert("Choisir au moins un critère");
        else alert("لم توجد أي علامة للبحث");
     document.zfrm.zsec.focus();
     return false;
  }
  if (document.zfrm.zsec.selectedIndex>0 &&
      document.zfrm.zmin.selectedIndex>0)
  {
     if (Lang=="F") alert("Utiliser le secteur ou le Ministère, mais pas les deux");
        else alert("استعملوا القطاع أو الوزارة، و لا الإثنين");
     document.zfrm.zsec.focus();
     return false;
  }
  if (document.zfrm.znjd.value.length>0)
  {
     if (!DateOk(document.zfrm.znjd.value))
     {
        if (Lang=="F") alert("Date journal sous forme JJ/MM/AAAA");
           else alert("JJ/MM/AAAA تاريخ الجريدة على الشكل");
        document.zfrm.znjd.select();
        document.zfrm.znjd.focus();
        return false;
     } 
  }
  if (document.zfrm.znjf.value.length>0)
  {
     if (!DateOk(document.zfrm.znjf.value))
     {
        if (Lang=="F") alert("Date journal sous forme JJ/MM/AAAA");
           else alert("JJ/MM/AAAA تاريخ الجريدة على الشكل");
        document.zfrm.znjf.select();
        document.zfrm.znjf.focus();
        return false;
     } 
  }
  if (document.zfrm.zntd.value.length>0)
  {
     if (!DateOk(document.zfrm.zntd.value))
     {
        if (Lang=="F") alert("Date texte sous forme JJ/MM/AAAA");
           else alert("JJ/MM/AAAA تاريخ النص على الشكل");
        document.zfrm.zntd.select();
        document.zfrm.zntd.focus();
        return false;
     }
  }
  if (document.zfrm.zntf.value.length>0)
  {
     if (!DateOk(document.zfrm.zntf.value))
     {
        if (Lang=="F") alert("Date texte sous forme JJ/MM/AAAA");
           else alert("JJ/MM/AAAA تاريخ النص على الشكل");
        document.zfrm.zntf.select();
        document.zfrm.zntf.focus();
        return false;
     }
  }
  if (document.zfrm.znjo.value.length>0)
  {
     if (!NumOk(document.zfrm.znjo.value))
     {
        if (Lang=="F") alert("Numéro journal érroné");
           else alert("رقم الجريدة غير صالح");
        document.zfrm.znjo.select();
        document.zfrm.znjo.focus();
        return false;
     }
  }
  if (document.zfrm.zntd.value.length>0 && 
      document.zfrm.zntf.value.length>0 &&
      !DateComp(document.zfrm.zntd.value,document.zfrm.zntf.value))
  {
     if (Lang=="F") alert("Dates textes incompatibles");
           else alert("تاريخ النص متعارض");
        document.zfrm.zntd.select();
        document.zfrm.zntd.focus();
        return false;
  }
  if (document.zfrm.znjd.value.length>0 && 
      document.zfrm.znjf.value.length>0 &&
      !DateComp(document.zfrm.znjd.value,document.zfrm.znjf.value))
  {
     if (Lang=="F") alert("Dates journal incompatibles");
           else alert("تاريخ الجريدة متعارض");
        document.zfrm.znjd.select();
        document.zfrm.znjd.focus();
        return false;
  }
  return true;
}

//-->

