function win_open(cmd, tit, dx, dy)
{
   options = "toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizeable=0,width=" + dx + ",height=" + dy;
   win = window.open(cmd , tit, options);
   win.focus();
}

function win_open2(cmd, tit, key, dir, type)
{
   window.open(cmd + "?key=" + key + "&dir=" + dir + "&type=" + type, tit, "toolbar=0,location=0,directories=0,status=1,menubar=0,scrollbars=0,resizeable=0,width=800,height=200");
}

function win_query(cmd, tit, field, query)
{
   window.open(cmd + "?field=" + field + "&query=" + query, tit, "toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizeable=0,width=800,height=200");
}

function pos_opt(name1, name2, len)
{
   var index = 0;
   for (i = 0; i < len; i++)
   {
      if (name1.options[i].value == name2)
         index = i;
      name1.selectedIndex = index;
   }
}

function fill_radio(length, name, val)
{
   var punt = -1;
   for (i = 0; i < length; i++)
   {
      if (name[i].value == val)
         punt = i;
   }
   if(punt != -1)
      name[punt].checked = true;
   else
      for (i = 0; i < length; i++)
         name[i].checked = false;
}

function pos(ob)
{
   document.forms[0].scroll.value = ob.value;
   document.forms[0].seek.value = document.forms[1].dseek.value;
   document.forms[0].submit();
}

function selectall(p)
{
   var i = 0;
   var f = document.forms[0];
   while(f.elements[i])
   {  
      if(p == 2)
      {
         if(f.elements[i].checked)
	    f.elements[i].checked = false;
         else
	    f.elements[i].checked = true;
      }  
      else
      {
         if(p == 1)
            f.elements[i].checked = true;  
         else
            f.elements[i].checked = false;  
      } 
      i ++;
   }  
}

function isblank(s)
{
   var c, i;
   for (i = 0, c = s.charAt(i); i < s.length; i++)
      if ((c != ' ') && (c != '\n') && (c != '\t')) return 0;
   return 1;
}

function chk_time(h, m, s)
{
   h.value = hn = parseInt(isblank(h.value) ? "0" : h.value, 10);
   m.value = mn = parseInt(isblank(m.value) ? "0" : m.value, 10);
   s.value = sn = parseInt(isblank(s.value) ? "0" : s.value, 10);
   if ((hn < 0) || (hn > 23))
   {
      alert('wrong hour');
      h.value = '';
      h.focus();
   }
   if ((mn < 0) || (mn > 59))
   {
      alert('wrong minutes');
      m.value = '';
      m.focus();
   }
   if ((sn < 0) || (sn > 59))
   {
      alert('wrong seconds');
      s.value = '';
      s.focus();
   }
   return 0;
}

function chk_date(d, m, y)
{
   var n;
   var dd = new Array(00,31,28,31,30,31,30,31,31,30,31,30,31);
   d.value = dn = parseInt(isblank(d.value) ? "1" : d.value, 10);
   m.value = mn = parseInt(isblank(m.value) ? "1" : m.value, 10);
   y.value = yn = parseInt(isblank(y.value) ? "1900" : y.value, 10);
   if ((yn >= 1900) && (yn <= 2037))
   {
      if ((mn >= 1) && (mn <= 12))
      {
         n = parseInt(dd[mn], 10);
         if ((mn == 2) && ((yn % 4) == 0)) n++;
         if ((mn == 2) && (!(yn % 100) || !(yn % 400))) n--;
         if ((dn >= 1) && (dn <= n)) return 0;
         else
	 {
	    alert('wrong day');
            d.value = '';
	    d.focus();
	 }
      }
      else
      {
         alert('wrong month');
         m.value = '';
	 m.focus();
      }
   }
   else
   {
      alert('wrong year');
      y.value = '';
      y.focus();
   }
}

function set_date(d, m, y)
{
   var dt = new Date();

   d.value = dt.getDate();
   m.value = dt.getMonth();
   y.value = dt.getYear();
}

function chkn(m)
{
   if((m.value == '') || isNaN(m.value))
   {    
      alert("Errore il campo  numerico");
      m.value = 0;
      m.focus();
   }
}

function bol(ck)
{
   if(ck.checked == 0)
      ck.checked = 1;
   else
      ck.checked = 0;      
   return true;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
  var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
  if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}