// Javascript support functions for iE ScreenSurfer
// Copyright iE 1999, 2000.  This copyright is Y2K compliant :)
var AlphaOnlyList="ABCDEFGHIJKLMNOPQRSTUVWXYZ,.- ";
var NumOnlyList="0123456789+,.-/ ";
var SignedNumOnlyList="0123456789";
var FieldExitRequired="no"; // set based on registry
var FieldExitMode="auto";
var FieldFFW;
var errorName;
var nav4= (window.Event) ? true : false;

function SS_FE(event,ffw)
{
 var maxLength,field,fName;
 
 if (nav4)
 {
   var sepAt;
   field=event.target;
   fName=field.name;
   sepAt=fName.indexOf('_', 0);
   if (sepAt==-1)
    return true;
   sepAt=fName.indexOf('_', sepAt+1);
   if (sepAt==-1)
    return true;
   maxLength=Math.floor(fName.substr(sepAt+1));
 }
 else
 {
   field=event.srcElement;
   fName=field.name;
   maxLength=field.maxLength;
 }
 if ((fName!=errorName) && (field.value == orgVal))
 {
  if ((ffw & 0x08) && (field.value.length==0))
  {
   return doError(field,"This is a mandatory enter field--please enter data in order to continue...");
  }
  return true;
 }
 return SS_FE2(field,ffw,maxLength);
}
function SS_FE2(field,ffw,maxLength)
{  
 var i,fieldLength,AdjustValue,TypeValue,MandatoryFill=false,rAdjust=false,rAdjustChar="",numOnly=false;
 AdjustValue=(ffw & 0x07);
 if (AdjustValue==0x05)
 {
  rAdjust=true;
  rAdjustChar="0";
 } 
 else if (AdjustValue==0x06)
 {
  rAdjust=true;
  rAdjustChar=" ";
 }
 else if (AdjustValue==0x07)
  MandatoryFill=true;

 if (ffw & 0x0020)
   field.value.toUpperCase();
 
 TypeValue=(ffw & 0x0700);
 fieldLength=field.value.length;
 if (TypeValue==0x0300)
 {
  for (i=0; i<fieldLength; i++)
  {
   if (NumOnlyList.indexOf(field.value.charAt(i))==-1)
   {
    return doError(field,"This field only accepts the characters \""+NumOnlyList+"\": please correct");
   }
  }
 }
 else if (TypeValue==0x0700)
 {
  for (i=0; i<fieldLength; i++)
  {
   if (SignedNumOnlyList.indexOf(field.value.charAt(i))==-1)
   {
    return doError(field,"This field only accepts the characters \""+SignedNumOnlyList+"\": please correct");
   }
  }
 } 
 if (rAdjust)
 {
  var newVal="", fillChars;
  fillChars=maxLength-field.value.length;
  if (fillChars)
  {
   while (fillChars--)
    newVal=newVal+rAdjustChar;
   field.value=newVal+field.value;
  }
 }
 if (MandatoryFill)
 {
  if (maxLength > field.value.length)
  {
    return doError(field,"This field needs "+maxLength+" characters to be valid--only "+field.value.length+" characters are currently entered...");
  }
 } 
 if (ffw & 0x0080)
  SurferSubmit("[enter]");
 //alert("Field "+field.name+", ffw="+ffw+", rAdjust="+rAdjust+", AdjustChar='"+rAdjustChar+"', MandatoryFill="+MandatoryFill);
 if (typeof(SS_FEWORK)!="undefined")
  if (typeof(SS_FEWORK.innerHTML)!="undefined")
   SS_FEWORK.innerHTML='';
 errorName="";  
 return true;
}  

function doError(field,msg)
{
 errorName=field.name;
 if (typeof(SS_FEWORK) != "undefined")
 {
  if (typeof(SS_FEWORK.innerHTML)!="undefined")
  {
    if (typeof(field.offsetLeft)!="undefined")
    {
     var msgLeft,msgTop,parent;
     msgLeft=field.offsetLeft;
     msgTop=field.offsetTop+field.offsetHeight;
     parent=field.offsetParent;
     while (parent && typeof(parent)!="undefined")
     {
      if (typeof(parent.offsetLeft)!="undefined")
      {
       msgLeft+=parent.offsetLeft;
       msgTop+=parent.offsetTop;
      } 
      parent=parent.offsetParent;
     }
     //alert(msgTop+","+msgLeft);
     SS_FEWORK.innerHTML="";
     SS_FEWORK.innerHTML='<span align="" style="position: absolute; z-index: 1; left: '+msgLeft+'; top: '+msgTop+'; background-color: White;"><font color="red" size="-3">'+msg+'</font></span>';
    }
    else
      alert(msg);
  }
  else
    alert(msg);
 }
 else 
  alert(msg);
field.focus();
return true;
}