function clearFields(theForm)  // Svuota i campi del form specificato
{
  var c = theForm.elements;
  for (i=0; i<c.length; i++)
  {
    if(c.item(i).type == "text" ||
       c.item(i).type == "textarea")
      c.item(i).value="";
  }
}

function trim(s)
{
  if(s.length==0)
    return "";
  
  for(firstValidChar=0; firstValidChar<s.length; firstValidChar++)
  {
    if(s.charAt(firstValidChar)!=" ")
      break;
  }
  for(lastValidChar=s.length-1; lastValidChar>firstValidChar; lastValidChar--)
  {
    if(s.charAt(lastValidChar)!=" ")
      break;
  }
//  alert(s);
  return s.substring(firstValidChar, lastValidChar+1);
}		

function toUpperCase(campo)
{
  campo.value= campo.value.toUpperCase();
}

// ------------------------------------------------------------------
// These functions use the same 'format' strings as the 
// java.text.SimpleDateFormat class, with minor exceptions.
// The format string consists of the following abbreviations:
// 
// Field        | Full Form          | Short Form
// -------------+--------------------+-----------------------
// Year         | yyyy (4 digits)    | yy (2 digits), y (2 or 4 digits)
// Month        | MMM (name or abbr.)| MM (2 digits), M (1 or 2 digits)
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Hour (1-12)  | hh (2 digits)      | h (1 or 2 digits)
// Hour (0-23)  | HH (2 digits)      | H (1 or 2 digits)
// Hour (0-11)  | KK (2 digits)      | K (1 or 2 digits)
// Hour (1-24)  | kk (2 digits)      | k (1 or 2 digits)
// Minute       | mm (2 digits)      | m (1 or 2 digits)
// Second       | ss (2 digits)      | s (1 or 2 digits)
// AM/PM        | a                  |
//
// NOTE THE DIFFERENCE BETWEEN MM and mm! Month=MM, not mm!
// Examples:
//  "MMM d, y" matches: January 01, 2000
//                      Dec 1, 1900
//                      Nov 20, 00
//  "M/d/yy"   matches: 01/20/00
//                      9/2/00
//  "MMM dd, yyyy hh:mm:ssa" matches: "January 01, 2000 12:30:45AM"
// ------------------------------------------------------------------

var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
function LZ(x) {return(x<0||x>9?"":"0")+x}

// ------------------------------------------------------------------
// isDate ( date_string, format_string )
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------
function isDate(val,format)
{
	var date=getDateFromFormat(val,format);
	if (date==0) { return false; }
	return true;
}

// -------------------------------------------------------------------
// compareDates(date1,date1format,date2,date2format)
//   Compare two date strings to see which is greater.
//   Returns:
//   1 if date1 is greater than date2
//   0 if date2 is greater than date1 of if they are the same
//  -1 if either of the dates is in an invalid format
// -------------------------------------------------------------------
function compareDates(date1,dateformat1,date2,dateformat2)
{
	var d1=getDateFromFormat(date1,dateformat1);
	var d2=getDateFromFormat(date2,dateformat2);
	if (d1==0 || d2==0) {
		return -1;
		}
	else if (d1 > d2) {
		return 1;
		}
	return 0;
}

// ------------------------------------------------------------------
// formatDate (date_object, format)
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in getDateFromFormat()
// ------------------------------------------------------------------
function formatDate(date,format)
{
	format=format+"";
	var result="";
	var i_format=0;
	var c="";
	var token="";
	var y=date.getYear()+"";
	var M=date.getMonth()+1;
	var d=date.getDate();
	var H=date.getHours();
	var m=date.getMinutes();
	var s=date.getSeconds();
	var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;
	// Convert real date parts into formatted versions
	var value=new Object();
	if (y.length < 4) {y=""+(y-0+1900);}
	value["y"]=""+y;
	value["yyyy"]=y;
	value["yy"]=y.substring(2,4);
	value["M"]=M;
	value["MM"]=LZ(M);
	value["MMM"]=MONTH_NAMES[M-1];
	value["d"]=d;
	value["dd"]=LZ(d);
	value["H"]=H;
	value["HH"]=LZ(H);
	if (H==0){value["h"]=12;}
	else if (H>12){value["h"]=H-12;}
	else {value["h"]=H;}
	value["hh"]=LZ(value["h"]);
	if (H>11){value["K"]=H-12;} else {value["K"]=H;}
	value["k"]=H+1;
	value["KK"]=LZ(value["K"]);
	value["kk"]=LZ(value["k"]);
	if (H > 11) { value["a"]="PM"; }
	else { value["a"]="AM"; }
	value["m"]=m;
	value["mm"]=LZ(m);
	value["s"]=s;
	value["ss"]=LZ(s);
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (value[token] != null) { result=result + value[token]; }
		else { result=result + token; }
		}
	return result;
	}
	
// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
function _isInteger(val) {
	var digits="1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i))==-1) { return false; }
		}
	return true;
	}
function _getInt(str,i,minlength,maxlength) {
	for (var x=maxlength; x>=minlength; x--) {
		var token=str.substring(i,i+x);
		if (token.length < minlength) { return null; }
		if (_isInteger(token)) { return token; }
		}
	return null;
}
	
// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the 
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(val,format)
{
	val=val+"";
	format=format+"";
	var i_val=0;
	var i_format=0;
	var c="";
	var token="";
	var token2="";
	var x,y;
	var now=new Date();
	var year=now.getYear();
	var month=now.getMonth()+1;
	var date=now.getDate();
	var hh=now.getHours();
	var mm=now.getMinutes();
	var ss=now.getSeconds();
	var ampm="";
	
	while (i_format < format.length) {
		// Get next token from format string
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			year=_getInt(val,i_val,x,y);
			if (year==null) { return 0; }
			i_val += year.length;
			if (year.length==2) {
				if (year > 70) { year=1900+(year-0); }
				else { year=2000+(year-0); }
				}
			}
		else if (token=="MMM"){
			month=0;
			for (var i=0; i<MONTH_NAMES.length; i++) {
				var month_name=MONTH_NAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()) {
					month=i+1;
					if (month>12) { month -= 12; }
					i_val += month_name.length;
					break;
					}
				}
			if ((month < 1)||(month>12)){return 0;}
			}
		else if (token=="MM"||token=="M") {
			month=_getInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=_getInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else if (token=="hh"||token=="h") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>12)){return 0;}
			i_val+=hh.length;}
		else if (token=="HH"||token=="H") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>23)){return 0;}
			i_val+=hh.length;}
		else if (token=="KK"||token=="K") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>11)){return 0;}
			i_val+=hh.length;}
		else if (token=="kk"||token=="k") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>24)){return 0;}
			i_val+=hh.length;hh--;}
		else if (token=="mm"||token=="m") {
			mm=_getInt(val,i_val,token.length,2);
			if(mm==null||(mm<0)||(mm>59)){return 0;}
			i_val+=mm.length;}
		else if (token=="ss"||token=="s") {
			ss=_getInt(val,i_val,token.length,2);
			if(ss==null||(ss<0)||(ss>59)){return 0;}
			i_val+=ss.length;}
		else if (token=="a") {
			if (val.substring(i_val,i_val+2).toLowerCase()=="am") {ampm="AM";}
			else if (val.substring(i_val,i_val+2).toLowerCase()=="pm") {ampm="PM";}
			else {return 0;}
			i_val+=2;}
		else {
			if (val.substring(i_val,i_val+token.length)!=token) {return 0;}
			else {i_val+=token.length;}
			}
		}
	// If there are any trailing characters left in the value, it doesn't match
	if (i_val != val.length) { return 0; }
	// Is date valid for month?
	if (month==2) {
		// Check for leap year
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year
			if (date > 29){ return false; }
			}
		else { if (date > 28) { return false; } }
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return false; }
		}
	// Correct hours value
	if (hh<12 && ampm=="PM") { hh+=12; }
	else if (hh>11 && ampm=="AM") { hh-=12; }
	var newdate=new Date(year,month-1,date,hh,mm,ss);
	return newdate.getTime();
}

function chkObb(campo)  //campo obbligatorio
{
  var ret = true;
  if (campo.value.length == 0)
  {
    alert ("Campo obbligatorio omesso!!");
    ret = false;
    campo.focus();
  }
  return ret;
}

function charCount(s,c) //string, char
{
  var ret=0;
  for (i=0; i<s.length; i++)
  {
    if (s.charAt(i)==c)
      ret++;
  }
  return ret;
}

function chkSubStringSequence(s,sep,d)  // string, delimiter, datatype
{
  var ret = true;
  var emptyAllowed = false;
  var arr = s.split(sep);
  for (var i=0; (ret)&&(i<arr.length); i++)
  {
    switch (d)
    {
      case "int" :
        if(!TTisInt(arr[i],emptyAllowed))
          ret = false;
        break;
      case "string" :
        if(arr[i].length == 0)
          ret = false;
        break;
      case "decimal" :
        if(!TTisDecimal(arr[i],emptyAllowed))
          ret = false;
        break;
      case "date" :
        if(!TTisDate(arr[i],emptyAllowed))
          ret = false;
        break;
    }
  }
  return ret;
}

function formatSequence(s,sep,d)  // string, delimiter, datatype
{
  var result = "";
  var emptyAllowed = false;
  var arr = s.split(sep);
  for (var i=0; i<arr.length; i++)
  {
    switch (d)
    {
      case "int" :
        if(TTisInt(arr[i],emptyAllowed))
          arr[i] = TTformatInt(arr[i]);
        break;
      case "string" :
        break;
      case "decimal" :
        if(TTisDecimal(arr[i],emptyAllowed))
          arr[i] = TTformatDecimal(arr[i]);
        break;
      case "date" :
        if(TTisDate(arr[i],emptyAllowed))
          arr[i] = TTformatDate(arr[i]);
        break;
    }
    if(i==0)
    {
      result = arr[i];
    }
    else
    {
      result += sep+arr[i];
    }
  }
  return result;
}

function chkSubstring(s,datatype) // s=substring, datatype
{
  var ret = true;
  var emptyAllowed = false;
  switch (datatype)
  {
    case "int" :
      ret = TTisInt(s,emptyAllowed);
      break;
    case "string" :
      break;
    case "decimal" :
      ret = TTisDecimal(s,emptyAllowed);
      break;
    case "date" :
      ret = TTisDate(s,emptyAllowed);
      break;
  }
  return ret;
}

function formatFieldSubstring(field,s) // s=substring
{
  var emptyAllowed = false;
  switch (field.lang)
  {
    case "int" :
      if(TTisInt(s,emptyAllowed))
        s = TTformatInt(s);
      break;
    case "string" :
      break;
    case "decimal" :
      if(TTisDecimal(s,emptyAllowed))
        s = TTformatDecimal(s);
      break;
    case "date" :
      if(TTisDate(s,emptyAllowed))
        s = TTformatDate(s);
      break;
  }
  return s;
}

function TTformatInt(s) // s=string
{
  if (s.length > 0)
  {
    s = trim(s);
    s = parseInt(s);
  }
  return s;
}

function TTisInt(s,emptyAllowed)  // s=string
{
  var ret = true;
  s = trim(s);
  if (s.length > 0)
  {
    var intValue = TTformatInt(s);
    if (isNaN(intValue))
    {
      ret = false;
    }
  }
  else
  {
    if (!emptyAllowed)
    {
      ret = false;
    }
  }
  return ret;
}

function TTformatDecimal(s) // s=string
{
  if (s.length > 0)
  {
    s = trim(s);
    s = parseFloat(s);
  }
  return s;
}

function TTisDecimal(s,emptyAllowed)  // s=string
{
  var ret = true;
  s = trim(s);
  if (s.length > 0)
  {
    var floatValue = TTformatDecimal(s);
    if (isNaN(floatValue))
    {
      ret = false;
    }
  }
  else
  {
    if (!emptyAllowed)
    {
      ret = false;
    }
  }
  return ret;
}

function TTformatDate(s)  // s=string
{
  if (s.length > 0)
  {
    s = trim(s);
    var sep = '-'; //separatore
    s = s.replace(/[\/\.\ \-\\]/gi, sep);
    if (isDate(s,'d'+sep+'M'+sep+'y'))
    {
      var pos1   = s.indexOf(sep);
      var pos2   = s.indexOf(sep,pos1+1);
      var giorno = s.substring(0,pos1);
      var mese   = s.substring(pos1+1,pos2);
      var anno   = s.substring(pos2+1,s.length);
      if (giorno.length == 1)
        {giorno = '0'+giorno;}
      if (mese.length == 1)
        {mese = '0'+mese;}
      if (anno.length == 2)
        {anno = '20'+anno;}
      s = giorno+sep+mese+sep+anno;
    }
  }
  return s;
}

function TTisDate(s,emptyAllowed)  // s=string
{
  var ret = true;
  s = trim(s);
  if (s.length > 0)
  {
    var sep = '-'; //separatore
    s = s.replace(/[\/\.\ \-\\]/gi, sep);
    ret = isDate(s,'d'+sep+'M'+sep+'y');
  }
  else
  {
    if (!emptyAllowed)
    {
      ret = false;
    }
  }
  return ret;
}

function formatField(field)
{
  var emptyAllowed = true;
  var lang2 = field.lang;
  if (field.lang > " ")
  {
    if (field.lang.charAt(field.lang.length-1) ==  "R")     //se il valore di "lang" mi finisce con "R" es.: intR stringR (R=Required)
    {
      lang2 = field.lang.substring(0,field.lang.length-1);    //tolgo la "R" finale al nome del campo per il case sotto
    }
  }

  switch (lang2)
  {
    case "int" :
      field.value = trim(field.value);
      if(TTisInt(field.value,emptyAllowed))
        field.value = TTformatInt(field.value);
      break;
    case "string" :
      break;
    case "decimal" :
      field.value = trim(field.value);
      if(TTisDecimal(field.value,emptyAllowed))
        field.value = TTformatDecimal(field.value);
      break;
    case "date" :
      field.value = trim(field.value);
      if(TTisDate(field.value,emptyAllowed))
        field.value = TTformatDate(field.value);
      break;
  }
}

// Gli operatori possono essere i seguenti:
// =     --> IS NULL (sempre da solo)
// != <> --> IS NOT NULL (sempre da solo)
// !     --> negazione (solo nel primo carattere seguito o dal valore
//                      o da un intervallo o da una sequenza)
// :     --> intervallo (solo uno tra due valori)
// |     --> sequenza (una o + occorrenze, ognuno tra due valori)
// >     --> maggiore (solo uno nel primo carattere)
// <     --> minore (solo uno nel primo carattere)
// >= => --> maggiore-uguale (solo uno nel primo carattere)
// <= =< --> minore-uguale (solo uno nel primo carattere)
function formatFilterField(field)
{
  switch (field.lang)
  {
    case "int" :
      field.value = trim(field.value);
      break;
    case "string" :
      break;
    case "decimal" :
      field.value = trim(field.value);
      break;
    case "date" :
      field.value = trim(field.value);
      break;
  }
  var s = field.value;
  var n_uguale      = charCount(s,"=");
  var n_esclamativo = charCount(s,"!");
  var n_due_punti   = charCount(s,":");
  var n_pipe        = charCount(s,"|");
  var n_maggiore    = charCount(s,">");
  var n_minore      = charCount(s,"<");

  if ((n_uguale==0)&&(n_esclamativo==0)&&(n_due_punti==0)
     &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==0))
  {
    formatField(field);
    return;
  }

  if ( (s=='=')||(s=="!=")||(s=="<>") )
    return;

  // caso !<valore>
  if ((s.charAt(0)=='!')&&(n_uguale==0)&&(n_esclamativo==1)
      &&(n_due_punti==0)&&(n_pipe==0)&&(n_maggiore==0)
      &&(n_minore==0)&&(s.length>1))
  {
    if(chkSubstring(s.substring(1,s.length),field.lang))  //substring, datatype
    {
      field.value = '!'+formatFieldSubstring(field,s.substring(1,s.length));
    }
  }

  // caso <valore>:<valore>
  if ((n_uguale==0)&&(n_due_punti==1)&&(n_esclamativo==0)
      &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==0)&&(s.length>2))
  {
    field.value = formatSequence(field.value,':',field.lang);
  }

  // caso !<valore>:<valore>
  if ((n_uguale==0)&&(n_due_punti==1)&&(n_esclamativo==1)
      &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==0)
      &&(s.charAt(0)=='!')&&(s.length>3))
  {
    field.value = '!'+formatSequence(s.substring(1,s.length),':',field.lang);
  }

  // caso <valore>|<valore>
  if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==0)
      &&(n_pipe>0)&&(n_maggiore==0)&&(n_minore==0)&&(s.length>2))
  {
    field.value = formatSequence(field.value,'|',field.lang);
  }

  // caso !<valore>|<valore>
  if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==1)
      &&(n_pipe>0)&&(n_maggiore==0)&&(n_minore==0)
      &&(s.charAt(0)=='!')&&(s.length>3))
  {
    field.value = '!'+formatSequence(s.substring(1,s.length),'|',field.lang);
  }

  // caso > <valore>
  if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==0)
      &&(n_pipe==0)&&(n_maggiore==1)&&(n_minore==0)
      &&(s.charAt(0)=='>')&&(s.length>1) )
  {
    field.value = '>'+formatFieldSubstring(field,s.substring(1,s.length));
  }

  // caso < <valore>
  if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==0)
      &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==1)
      &&(s.charAt(0)=='<')&&(s.length>1) )
  {
    field.value = '<'+formatFieldSubstring(field,s.substring(1,s.length));
  }

  // caso >= <valore>
  if ((n_uguale==1)&&(n_due_punti==0)&&(n_esclamativo==0)
      &&(n_pipe==0)&&(n_maggiore==1)&&(n_minore==0)
      &&((s.substring(0,2)==">=")||(s.substring(0,2)=="=>")) 
      &&(s.length>2) )
  {
    field.value = ">="+formatFieldSubstring(field,s.substring(2,s.length));
  }

  // caso <= <valore>
  if ((n_uguale==1)&&(n_due_punti==0)&&(n_esclamativo==0)
      &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==1)
      &&((s.substring(0,2)=="<=")||(s.substring(0,2)=="=<")) 
      &&(s.length>2) )
  {
    field.value = "<="+formatFieldSubstring(field,s.substring(2,s.length));
  }
}

function chkFieldInt(f)  // f=field
{
  var ret = TTisInt(f.value,true);
  if (ret == false)
  {
    alert("Campo non intero!!!");
    f.select();
  }
  return ret;
}

function chkFieldStr(f)  // f=field
{
  var ret = true;
  var s = f.value;
  var n_uguale      = charCount(s,"=");
  var n_esclamativo = charCount(s,"!");
  var n_due_punti   = charCount(s,":");
  var n_pipe        = charCount(s,"|");
  var n_maggiore    = charCount(s,">");
  var n_minore      = charCount(s,"<");

  if ((n_uguale!=0)||(n_esclamativo!=0)||(n_due_punti!=0)
      ||(n_pipe!=0)||(n_maggiore!=0)||(n_minore!=0))
  {
    ret = false;
    alert("Non sono ammessi i seguenti caratteri:\n > < = ! : |");
    f.select();
  }
  return ret;
}

function chkFieldDecimal(f)  // f=field
{
  var ret = TTisDecimal(f.value,true);
  if (ret == false)
  {
    alert("Campo non decimale!!!");
    f.select();
  }
  return ret;
}

function chkFieldDate(f)  // f=field
{
  var ret = TTisDate(f.value,true);
  if (ret == false)
  {
    alert('Data non corretta');
    f.select();
  }
  return ret;
}

function chkSingleField(field)
{
  var ret = true;
  var lang2 = field.lang;
  if (field.lang > " ")
  {
    if (field.lang.charAt(field.lang.length-1) ==  "R")     //se il valore di "lang" mi finisce con "R" es.: intR stringR (R=Required)
    {
      ret = chkObb(field);
      lang2 = field.lang.substring(0,field.lang.length-1);    //tolgo la "R" finale al nome del campo per il case sotto
    }

    if ((ret == true)&&(field.type=="text"))    //se il campo era obbligatorio e presente
    {
      switch (lang2)
      {
        case "int" :
          ret = chkFieldInt(field);
          break;
        case "string" :
          ret = chkFieldStr(field);
          break;
        case "decimal" :
          ret = chkFieldDecimal(field);
          break;
        case "date" :
          ret = chkFieldDate(field);
          break;
      }
    }
  }

  return ret;
}

function chkInputValues(form)
{
  var ret = true;
  for (var i=0; (ret)&&(i<form.elements.length); i++)
  {
    formatField(form.elements[i]);          //se mi viene premuto enter sul campo (es. data) nn mi esegue l'onblur dove c'è il formatField (e mi dà errore visto che il campo non è formattato correttamente)
    ret = chkSingleField(form.elements[i]);
  }
  return ret;
}

// Gli operatori possono essere i seguenti:
// =     --> IS NULL (sempre da solo)
// != <> --> IS NOT NULL (sempre da solo)
// !     --> negazione (solo nel primo carattere seguito o dal valore
//                      o da un intervallo o da una sequenza)
// :     --> intervallo (solo uno tra due valori)
// |     --> sequenza (una o + occorrenze, ognuno tra due valori)
// >     --> maggiore (solo uno nel primo carattere)
// <     --> minore (solo uno nel primo carattere)
// >= => --> maggiore-uguale (solo uno nel primo carattere)
// <= =< --> minore-uguale (solo uno nel primo carattere)
function chkFilterValues(form)
{
  var ret = true;
  for (var i=0; (ret)&&(i<form.elements.length); i++)
  {
    var field = form.elements[i];
    var valid = false;

    var s = field.value;
    var n_uguale      = charCount(s,"=");
    var n_esclamativo = charCount(s,"!");
    var n_due_punti   = charCount(s,":");
    var n_pipe        = charCount(s,"|");
    var n_maggiore    = charCount(s,">");
    var n_minore      = charCount(s,"<");

    if ((n_uguale==0)&&(n_esclamativo==0)&&(n_due_punti==0)
        &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==0))
    {
      ret = chkSingleField(form.elements[i]);
    }
    else
    {
  
      if ( (s=='=')||(s=="!=")||(s=="<>") )
        valid = true;
  
      // caso !<valore>
      if ((s.charAt(0)=='!')&&(n_uguale==0)&&(n_esclamativo==1)
          &&(n_due_punti==0)&&(n_pipe==0)&&(n_maggiore==0)
          &&(n_minore==0)&&(s.length>1))
      {
        if(chkSubstring(s.substring(1,s.length),field.lang))  //substring, datatype
        {
          valid = true;
        }
      }
  
      // caso <valore>:<valore>
      if ((n_uguale==0)&&(n_due_punti==1)&&(n_esclamativo==0)
          &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==0)&&(s.length>2) )
      {
        if(chkSubStringSequence(s,':',field.lang))  //substring, delimiter, datataype
        {
          valid = true;
        }
      }
    
      // caso !<valore>:<valore>
      if ((n_uguale==0)&&(n_due_punti==1)&&(n_esclamativo==1)
          &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==0)
          &&(s.charAt(0)=='!')&&(s.length>3))
      {
        if(chkSubStringSequence(s.substring(1,s.length),':',field.lang))  //substring, delimiter, datataype
        {
          valid = true;
        }
      }
    
      // caso <valore>|<valore>
      if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==0)
          &&(n_pipe>0)&&(n_maggiore==0)&&(n_minore==0)&&(s.length>2) )
      {
        if(chkSubStringSequence(s,'|',field.lang))  //substring, delimiter, datataype
        {
          valid = true;
        }
      }
    
      // caso !<valore>|<valore>
      if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==1)
          &&(n_pipe>0)&&(n_maggiore==0)&&(n_minore==0)
          &&(s.charAt(0)=='!')&&(s.length>3) )
      {
        if(chkSubStringSequence(s.substring(1,s.length),'|',field.lang))  //substring, delimiter, datataype
        {
          valid = true;
        }
      }
    
      // caso > <valore>
      if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==0)
          &&(n_pipe==0)&&(n_maggiore==1)&&(n_minore==0)
          &&(s.charAt(0)=='>')&&(s.length>1) )
      {
        if(chkSubstring(s.substring(1,s.length),field.lang))  //substring, datatype
        {
          valid = true;
        }
      }
    
      // caso < <valore>
      if ((n_uguale==0)&&(n_due_punti==0)&&(n_esclamativo==0)
          &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==1)
          &&(s.charAt(0)=='<')&&(s.length>1) )
      {
        if(chkSubstring(s.substring(1,s.length),field.lang))  //substring, datatype
        {
          valid = true;
        }
      }
    
      // caso >= <valore>
      if ((n_uguale==1)&&(n_due_punti==0)&&(n_esclamativo==0)
          &&(n_pipe==0)&&(n_maggiore==1)&&(n_minore==0)
          &&((s.substring(0,2)==">=")||(s.substring(0,2)=="=>")) 
          &&(s.length>2) )
      {
        if(chkSubstring(s.substring(2,s.length),field.lang))  //substring, datatype
        {
          valid = true;
        }
      }
    
      // caso <= <valore>
      if ((n_uguale==1)&&(n_due_punti==0)&&(n_esclamativo==0)
          &&(n_pipe==0)&&(n_maggiore==0)&&(n_minore==1)
          &&((s.substring(0,2)=="<=")||(s.substring(0,2)=="=<")) 
          &&(s.length>2) )
      {
        if(chkSubstring(s.substring(2,s.length),field.lang))  //substring, datatype
        {
          valid = true;
        }
      }
      if (!valid)
      {
        ret = false;
        alert("tls_sintassi_scorretta!!!");
        field.select();
      }
    }
  }
  return ret;
}