<!--
 function setMessage(caller) {      
    pointer = caller;       
    clearMessage();
    if(pointer.Message) {
    window.status = pointer.Message;
    }
 }
 
 function clearMessage() {      
    window.status = "";
 }
 
 function validate(caller) {        
    pointer = caller;    
    if (pointer.Required == true && !pointer.value) {
        alert(pointer.Label + ": Required field");  
        return(0);
        }
    else if (pointer.SavedValue != pointer.value) { 
        switch(pointer.DataType) {
            case "STRING" :
            // check the Caps statement
                if(pointer.Caps == "WORD") {
                    var pattern = /(\w)(\w*)/;
                    var a = pointer.value.split(/\s+/g);
                    for (i = 0 ; i < a.length ; i ++ ) {
                        var parts = a[i].match(pattern);
                        var firstLetter = parts[1].toUpperCase();
                        var restOfWord = parts[2].toLowerCase();
                        a[i] = firstLetter + restOfWord;
                    }
                    pointer.value = a.join(' ');                    
                }
                if(pointer.Caps == "ALL") {
                    var a = pointer.value;                  
                    pointer.value = a.toUpperCase();
                }               
                return(1);
                break;
            case "NUMERIC" :
                // test for numeric entry
                if (isNaN(pointer.value)) {
                    alert(pointer.Label + ": Numeric field");
                    // set to minimum if required
                    if (pointer.Minimum) {
                        pointer.value = pointer.Minimum + "";
                        }
                    // otherwise zero/zed
                    else {
                        pointer.value = 0;
                    }                   
                    return(0);
                }
                // minimum value
                if (pointer.Minimum == 0 && (pointer.value < 0)) {
                    pointer.value = pointer.Minimum + "";
                    alert("Minimum value for <" + pointer.Label + " > is " + pointer.Minimum);
                    //pointer.select();
                    return(0);
                }
                // minimum value
                if (pointer.Minimum && (pointer.value < pointer.Minimum)) {
                    pointer.value = pointer.Minimum + "";
                    alert("Minimum value for <" + pointer.Label + " > is " + pointer.Minimum);
                    //pointer.select();
                    return(0);
                }
                // maximum value
                if (pointer.Maximum && (pointer.value > pointer.Maximum)) {
                    pointer.value = pointer.Maximum + "";
                    alert("Maximum value for <" + pointer.Label + "> is " + pointer.Maximum);
                    //pointer.select();
                    return(0);
                }               
                // set precision to decimal places
                if (pointer.Places) {
                    var i;
                    var val;
                    val = pointer.value + '';
                    var decPos = val.indexOf('.');
                    if (decPos == -1) {             
                        val += '.';
                        for (i=0; i < pointer.Places; i++) {                        
                            val += '0';
                        }
                    }
                    else    {       
                        var actualDec = (val.length - 1) - decPos;
                        var diff = pointer.Places - actualDec;
                        if(diff > 0) {
                            for (i=0; i < diff; i++) {  
                                val += '0';
                            }
                        }
                        if(diff < 0) {
                            val = val.substr(0,(decPos + pointer.Places + 1));
                        }                   
                    }
                pointer.value = val;
                }       
                return(1);
                break;
            case "DATE" :
                    if (pointer.value == "") {
                        pointer.value = "";
                        return(1);
                       }
                    var dVal;
                    var iD,iM,iY;
                    dVal = pointer.value + '';                              
                    //     0123456789
                    // 1 - dd mm yyyy
                    // 2 - mm dd yyyy
                    // 3 - yyyy mm dd                      
                    if (isNaN(pointer.value)) {
                        pointer.value = "";
                        alert(pointer.Label + ": Numeric field");
                        //pointer.select();
                        return(0)
                       }
                switch(datestyle){
                    case 1:
                        iY = dVal.substr(4,4);
                        iM = dVal.substr(2,2);
                        iD = dVal.substr(0,2);
                //alert(iY + "-" + iM +  "/" + iD + "." + datestyle);
                        break;
                    case 2:
                        iY = dVal.substr(6,4);
                        iM = dVal.substr(0,2);
                        iD = dVal.substr(3,2);
                        break;
                    case 3:
                        iY = dVal.substr(0,4);
                        iM = dVal.substr(5,2);
                        iD = dVal.substr(8,2);                      
                        break;
                }
                if(checkdate(iD,iM,iY, pointer.Label) == false) {
                  pointer.value = "";
                  pointer.select();
                  return(0)
                }

                if(pointer.value) {
                    //strDate = iM + "-" + iD + "-" + iY;
                    strDate = iD + "/" + iM + "/" + iY;
                    var myDate = new Date();
                    myDate.setFullYear(iY, (iM-1), iD);
                    //var d = new Date(iD, iM, iY);
                    if(!myDate.getFullYear() || !(myDate.getMonth()+1) || !myDate.getDate() ) {
                        alert(pointer.Label + strDate +  " : Invalid date");
                        pointer.select();                   
                        return(0)
                    }
                }
                clearMessage();
                return(1)
                break;
            case "TIME" :
                if(pointer.value) {
                var t = pointer.value;
                var h = Number(t.substr(0,2));
                var m = Number(t.substr(2,2));
                var d = new Date("July 21, 1983 " + (padout(h)) + ":" + (padout(m)) + ":00");
                if(isNaN(d)) {
                    pointer.value = "";
                    pointer.select();
                    alert(pointer.Label + " Invalid Time");
                    return(0)
                    }
                else {                  
                }
                }                
                return(1)
                break;
        }
    }
 }

function checkdate(dd,mm,yy,labelname) {
   var mn  = Number(mm);
   var dy  = Number(dd);
   var yr  = Number(yy);
   var fname  = labelname;
   //alert(dy + "-" + mn + "-" + yr);
   if (dy < 1 || dy > 31)
   {
      alert("Invalid day in " + fname);
	return false;
   }	
   if (mn < 1 || mn > 12)
    {
      alert("Invalid Month in " + fname);
      return false;
    }	
   if (dy > 30)
    {
      if (mn == 4 || mn == 6 || mn == 9 || mn == 11)
      {
         alert("Invalid day in " + fname);
   	   return false;
      }	
    }	
   if (mn==2)
    {
    }
    else
	{
	return true;
      }
   // Check for leap year
   if ( ( (yr%4==0)&&(yr%100 != 0) ) || (yr%400==0) )
  	  { // leap year
	  if (dy > 29)
	     {
           alert("Invalid day for February in " + fname);
           return false;
           }
	  else {
	         if (dy > 28)
  		   {
               alert("Invalid day for February in " + fname);
           	   return false;
               }
	       }
   }	
   return true;
}



function getOffset( obj, layername, toppos, leftpos ) {
 var obj2 = obj;
 var curtop = 0;
 var curleft = 0;
 if (document.getElementById || document.all) {
  do  {
   curleft += obj.offsetLeft-obj.scrollLeft;
   curtop += obj.offsetTop-obj.scrollTop;
   obj = obj.offsetParent;
   obj2 = obj2.parentNode;
   while (obj2!=obj) {
    curleft -= obj2.scrollLeft;
    curtop -= obj2.scrollTop;
    obj2 = obj2.parentNode;
   }
  } while (obj.offsetParent)
 } else if (document.layers) {
  curtop += obj.y;
  curleft += obj.x;
 }
//alert(toppos+'='+leftpos);
 //alert(curtop+'='+curleft+'-'+layername);
    var ff = document.getElementById(layername);
    ff.style.visibility = "visible";
	if (toppos != 0)
	   {
         ff.style.top  = Number(curtop)+Number(toppos)+'px';
	   }
	   else
	   {
         ff.style.top  = curtop+20;
	   }
	if (leftpos != 0)
	   {
         ff.style.left = Number(curleft)+Number(leftpos)+'px';
	   }
	   else
	   {
         ff.style.left = curleft-300;
	   }

}
// -->