<!--

//clear default form value 
function clearText(thefield){
if (thefield.defaultValue==thefield.value)
thefield.value = ""
} 

function addLoadEvent(func) {
  var oldonload = window.onload;
  if (typeof window.onload != 'function') {
    window.onload = func;
  } else {
    window.onload = function() {
      oldonload();
      func();
    }
  }
}

addLoadEvent(function() { ASZebraStripes("zebra"); }); 



/*  ASZebraStripes is a function for zebra striping table rows with 'even' and 'odd' columns.
    
    The only required argument is the css class of the tables you want to stripe. You can
    optionally pass 2 more parameters representing even and odd class names for your tr tags.
    Initally inspired by the A List Apart article (http://www.alistapart.com/articles/zebratables/).
    Also, thanks to Dustin Diaz's getElementByClass (http://www.dustindiaz.com/getelementsbyclass).

    The function essentially just gets every table in the page, picks out the ones that match
    our css class and loops through their rows appending even or odd classes as it goes.

    Copyright (c) 2006 Jason Perry (http://www.ambethia.com)
    Released under the MIT License (http://www.opensource.org/licenses/mit-license.php)
*/
function ASZebraStripes(cssClass) {
  var evenClass = arguments[1] ? arguments[1] : 'even';
  var oddClass  = arguments[2] ? arguments[2] : 'odd';
  var zebras = new Array();
  var tables = document.getElementsByTagName('table');
  for (i = 0, j = 0; i < tables.length; i++) {
    if (new RegExp("\\b"+cssClass+"\\b").test(tables[i].className)) {
      zebras[j] = tables[i]; j++;
    }
  }
  for (i = 0; i < zebras.length; i++) {
    var tbodies = zebras[i].getElementsByTagName('tbody');
    var parity = false;
    for (j = 0; j < tbodies.length; j++) {
      var trs = tbodies[j].getElementsByTagName('tr');
      for (k = 0; k < trs.length; k++) {
        newClass = parity ? evenClass : oddClass;
        trs[k].className += trs[k].className ? ' '+newClass : newClass;
        parity = !parity;
      }
    }
  }
}

//The following 3 functions toggle data tables appearance on page
function toggleAll(itemname,state)
{
   tmp = document.getElementsByTagName('div');
	for (i=0;i<tmp.length;i++)
	{
 		if (tmp[i].className == itemname) tmp[i].style.display = state;
	}
}

function toggle(idname) 
{
document.getElementById(idname).style.display = (document.getElementById(idname).style.display == 'none') ? 'block' : 'none';
}

function toggleOne(idname)
{
	toggleAll('toggle','block')
	toggleAll('toggle','none')
	document.getElementById(idname).style.display = (document.getElementById(idname).style.display == 'none') ? 'block' : 'none';
}

function ShowDetail(idname)
{
	idname = idname + "_id"
	toggleAll('toggle','block')
	toggleAll('toggle','none')
	document.getElementById(idname).style.display = (document.getElementById(idname).style.display == 'none') ? 'block' : 'none';
}

function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

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_jumpMenuGo(selName,targ,restore){ //v3.0
  var selObj = MM_findObj(selName); if (selObj) MM_jumpMenu(targ,selObj,restore);
}

//This function reloads the window if Nav4 resized
function MM_reloadPage(init) { 
  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);

//This function directs the user to a new page
function GotoUrl(url){
  parent.location=url;
}

//Performs form action on select onChange event
function DoSubmission(myfrm) {
document.forms[myfrm].submit();
}

//Dynamic Dependent List box Code for *** VBScript *** Server Model
//generic functions
function setDynaList(arrDL){
 var oList1 = document.forms[arrDL[2]].elements[arrDL[1]];
 var oList2 = document.forms[arrDL[4]].elements[arrDL[3]];
 var arrList = arrDL[5];
 
 clearDynaList(oList2);
 
 if (oList1.selectedIndex == -1){
  oList1.selectedIndex = 0;
 }
 populateDynaList(oList2, oList1[oList1.selectedIndex].value, arrList);
 return true;
}
 
function clearDynaList(oList){
 for (var i = oList.options.length; i >= 0; i--){
  oList.options[i] = null;
 }
 
 oList.selectedIndex = -1;
}
 
function populateDynaList(oList, nIndex, aArray){
 for (var i = 0; i < aArray.length; i= i + 3){
  if (aArray[i] == nIndex){
   oList.options[oList.options.length] = new Option(aArray[i + 1], aArray[i + 2]);
  }
 }
 if (oList.options.length == 0){
  oList.options[oList.options.length] = new Option("[none available]",0);
 }
 
 oList.selectedIndex = 0;
}

function MM_callJS(jsStr) { //v2.0
  return eval(jsStr)
}

function Trim(TRIM_VALUE){
	if(TRIM_VALUE.length < 1){
		return"";
	}
	TRIM_VALUE = RTrim(TRIM_VALUE);
	TRIM_VALUE = LTrim(TRIM_VALUE);
	if(TRIM_VALUE==""){
		return "";
	}
	else{
		return TRIM_VALUE;
	}
} //End Function

function RTrim(VALUE){
	var w_space = String.fromCharCode(32);
	var v_length = VALUE.length;
	var strTemp = "";
	if(v_length < 0){
		return"";
	}
	var iTemp = v_length -1;

	while(iTemp > -1){
	if(VALUE.charAt(iTemp) == w_space){
	}
	else{
		strTemp = VALUE.substring(0,iTemp +1);
		break;
	}
	iTemp = iTemp-1;

	} //End While
	return strTemp;
} //End Function

function LTrim(VALUE){
	var w_space = String.fromCharCode(32);
	if(v_length < 1){
		return"";
	}
	var v_length = VALUE.length;
	var strTemp = "";
	
	var iTemp = 0;
	
	while(iTemp < v_length){
		if(VALUE.charAt(iTemp) == w_space){
	}
	else{
		strTemp = VALUE.substring(iTemp,v_length);
		break;
	}
	iTemp = iTemp + 1;
	} //End While
	return strTemp;
} //End Function

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_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_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];}
}

//-->