<!-- BEGIN OF CLIENT SIDE SCRIPTING -->
<!--
//Global Variables
var isNav4 = false, isNav6=false, isIE=false;
var _VISIBLE = "visible";
var _HIDDEN  = "hidden";
var range    = "";
var styleObj = "";

//Browser Detection Code
if (navigator.appName == "Netscape"){
	if ((parseInt(navigator.appVersion) >= 5) || (navigator.userAgent.indexOf('Opera')>-1)) {
		isNav6 = true;
		isNav4 = false;
		isIE   = false;
		range = "getElementById('";
		styleObj = "').style";
	}//if
	else{
		if (parseInt(navigator.appVersion) >= 4){
			isNav4 = true;	
			isNav6 = false;
			isIE   = false;
		}//if
	}//else
}//if
else {
	if (document.all) {
		isIE     = true;
		isNav4   = false;
		isNav6   = false;
		range    = "all.";
		styleObj = ".style";
	}//if
}//else


//TEST CODE
//alert ("IsNav4: " + isNav4 );
//alert ("IsNav6: " + isNav6 );
//alert ("IsIE: "   + isIE   );
//TEST CODE

//*********************************************************
// Author : Luis Correia, Memagedia 2002
//
// Name: getObj
//
// Purpose: Convert object name string or reference into a
//          valid object reference
// Inputs:  pobj: an object reference or string name
//          
// Returns: -
//          
//*********************************************************
function getObj(pobj){
	var lobj;
	if (typeof pobj == "string"){
		lobj = eval("document." + range + pobj + styleObj);
	}//if
	else{
		lobj = pobj;
	}//else
	return lobj;
}//getObj

//*********************************************************
// Author : Luis Correia, Memagedia 2002
//
// Name: getImage
//
// Purpose: 
//          
// Inputs:  pstrDiv
//          pstrImage
//          
// Returns: -
//          
//*********************************************************
function getImage(pstrDiv, pstrImage){
	if (isNav4){   		             
		lobj=eval("document.layers['" + pstrDiv + "'].document." + pstrImage);
		return lobj;
	}//if
	
	//Netscape Navigator 6.x
	if(isNav6) {		
		lobj=eval("document.images['" + pstrImage + "']");
		return lobj;
	}//if
	
	//Internet Explorer
	if(isIE) {						
		lobj=eval("document.images['" + pstrImage + "']");
		return lobj;
	}//if	
}//getImage


//*********************************************************
// Author : Luis Correia, Memagedia 2002
//
// Name: setImage
//
// Purpose: 
//          
// Inputs:  pstrDiv
//          pstrImage
//          
// Returns: -
//          
//*********************************************************
function setImage(pstrDiv, pstrImage, pstrSrc){
	if (isNav4){   		             
		lobj=eval("document.layers['" + pstrDiv + "'].document." + pstrImage);
		lobj.src = pstrSrc
	}//if
	
	//Netscape Navigator 6.x
	if(isNav6) {		
		lobj=eval("document.images['" + pstrImage + "']");
		lobj.src = pstrSrc
	}//if
	
	//Internet Explorer
	if(isIE) {						
		lobj=eval("document.images['" + pstrImage + "']");
		lobj.src = pstrSrc
	}//if	
}//setImage



//*********************************************************
// Author :
//
// Name: CheckCheckBox
//
// Purpose: 
//          
// Inputs:  
//          
// Returns: -
//          
//*********************************************************
function CheckCheckBox(pdiv, pfrm, pcheckbox, ppos){

	//Netscape Navigator 4.x		
	if (isNav4){                
		lobj=eval("document.layers['" + pdiv + "'].document." + pfrm + "." + pcheckbox + "[" + ppos + "]");
		lobj.checked=true;
		return;
	}//if
	
	//Netscape Navigator 6.x
	if(isNav6) {			
		//lobj=eval("document.getElementById('" + pdiv + "').document." + pfrm + "." + pcheckbox + "[" + ppos + "]");
		//lobj.checked=true;
		lobj=eval("document." + pfrm + "." + pcheckbox + "[" + ppos + "]");
		lobj.checked=true;
		return;
	}//if
	
	//Internet Explorer
	if(isIE) {						
		lobj=eval("document." + pfrm + "." + pcheckbox + "[" + ppos + "]");
		lobj.checked=true;
		return;
	}//if	
	return;
}// CheckCheckBox

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: writeInnerText
//
// Purpose: Writes to the innerText property for NN or IE
//          valid object reference
// Inputs: pstr : The Inner Text text
//         pstrDiv : The layer/div name
// Returns: -
//          
//*********************************************************
function writeInnerText(pstr,pstrDiv) {
	var lstrInnerText;
	lstrInnerText = pstr
		
	//Netscape Navigator 4.x		
	if (isNav4){                
		document.layers[pstrDiv].document.open();
		document.layers[pstrDiv].document.write(lstrInnerText);
		document.layers[pstrDiv].document.close();
		return;
	}//if
	
	//Netscape Navigator 6.x
	if(isNav6) {			
		document.getElementById(pstrDiv).innerHTML = lstrInnerText;					
		return;
	}//if
	
	//Internet Explorer
	if(isIE) {						
		document.all[pstrDiv].innerText = lstrInnerText;
		return;
	}//if	
}//writeInnerText

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: writeInnerHtml
//
// Purpose: Writes to the InnerHtml property for NN or IE
//          valid object reference
// Inputs: pstr : The Inner HTML text
//         pstrDiv : The layer/div name
// Returns: -
//          
//*********************************************************
function writeInnerHtml(pstr,pstrDiv) {
	var lstrInnerHTML;
	lstrInnerHTML = pstr
		
	//Netscape Navigator 4.x		
	if (isNav4){                
		document.layers[pstrDiv].document.open();
		document.layers[pstrDiv].document.write(lstrInnerHTML);
		document.layers[pstrDiv].document.close();
		return;
	}//if
	
	//Netscape Navigator 6.x
	if(isNav6) {			
		document.getElementById(pstrDiv).innerHTML = lstrInnerHTML;					
		return;
	}//if
	
	//Internet Explorer
	if(isIE) {						
		document.all[pstrDiv].innerHTML = lstrInnerHTML;
		return;
	}//if	
}//writeInnerHtml

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: shiftTo
//
// Purpose: Moves a laryer to the specified position, only
//          if the layer is visible.
//
// Inputs:  pobj : an object reference or string name
//          px   : x axis horizontal coordinate 
//		    py   : y axis vertical coordinate
// Returns: -
//          
//*********************************************************
function shiftTo(pobj, px , py){
	var lobj = getObj(pobj);
	
	//Only move layers that are visible.
	//if (lobj.visibility == "hidden") {
	//	return;
	//}//if
	
	if (isNav4) {
		lobj.moveTo(px,py);
		return;
	}//if
	
	if (isNav6) {
		lobj.left = px;
		lobj.top  = py;
		return;
	}//if
	
	if (isIE) {
		lobj.pixelLeft = px;
		lobj.pixelTop = py;
		return;
	}//if
}//shiftTo

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: shiftBy
//
// Purpose: Moves a laryer to a relative position, only
//          if the layer is visible.
//
// Inputs: pobj : an object reference or string name
//         px   : pdeltax axis horizontal coordinate 
//		   py   : pdeltay axis vertical coordinate
// Returns: -
//          
//*********************************************************
function shiftBy(pobj, pdeltax , pdeltay){
	var lobj = getObj(pobj);
	
	//Only move layers that are visible.
	//if (lobj.visibility == "hidden") {
	//	return;
	//}//if
	
	if (isNav4) {
		lobj.moveBy(pdeltax,pdeltay);
		return;
	}//if
	
	if (isNav6) {		
		var tempLeft = lobj.left.toString();
		var tempTop  = lobj.top.toString();
		//Remove px from 'Top' and 'Left' properties
		tempLeft     = parseInt(tempLeft.slice(0,tempLeft.length-2));
		tempTop      = parseInt(tempTop.slice(0,tempTop.length-2));
		//Add displacement
		lobj.left    = tempLeft + pdeltax;
		lobj.top     = tempTop  + pdeltay;				
		return;
	}//if
	
	if (isIE) {
		lobj.pixelLeft += pdeltax;
		lobj.pixelTop  += pdeltay;
		return;
	}//if
}//shiftBy

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: setZIndex
//
// Purpose: Set's the zINdex property of a frame
//   
// Inputs: pobj: an object reference or string name
//         pz   : zIndex value
// Returns: -
//          
//*********************************************************
function setZIndex(pobj, pz){
	var lobj = getObj(pobj);
	lobj.zIndex = pz;
}//setZIndex

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: isVisible
//
// Purpose: Checks if the layer is visible.
//   
// Inputs: pobj: an object reference or string name
//         pz   : zIndex value
//
// Returns: true if layer is visible
//          false if layer is hidden
//*********************************************************
function isVisible(pobj){
	var lobj = getObj(pobj);
	if (lobj.visibility == "visible") {
		return true;
	}//if	
	else{
		return false;
	}//else
}//isVisible

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: show
//
// Purpose: Sets a layer visible
//   
// Inputs:  pobj: an object reference or string name
// Returns: -
//          
//*********************************************************
function show(pobj){
	var lobj = getObj(pobj);
	lobj.visibility = _VISIBLE;
}//show

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: showIn
//
// Purpose: Sets a layer visible in a specified position
//   
// Inputs:  pobj: an object reference or string name
//         px   : x axis horizontal coordinate 
//		   py   : y axis vertical coordinate
//
// Returns: -
//          
//*********************************************************
function showIn(pobj,px,py){
	var lobj = getObj(pobj);
	shiftTo(lobj,px,py);
	lobj.visibility = _VISIBLE;
}//show

//*********************************************************
// Author : Luis Correia, Memagedia 2002
// Name: hide
//
// Purpose: Sets a layer hidden
//   
// Inputs:  pobj: an object reference or string name
// Returns: -
//          
//*********************************************************
function hide(pobj){
	var lobj = getObj(pobj);
	lobj.visibility = _HIDDEN;
}//hide.


//*********************************************************
// Author : 
// Name: ObterFrmDiv
//
// Purpose: 
//   
// Inputs: 
//
// Returns:
//          
//*********************************************************
function ObterFrmDiv(pdiv, pfrm){
	if (isNav4){                
		lobj=eval("document.layers['" + pdiv + "'].document." + pfrm);
		return lobj;
	}//if
	
	//Netscape Navigator 6.x
	if(isNav6) {			
		lobj=eval("document." + pfrm);
		return lobj;
		
	}//if
	
	//Internet Explorer
	if(isIE) {						
		lobj=eval("document." + pfrm);
		return lobj;
	}//if	
}

function ObterDiv(pdiv){
	if (isNav4){                
		lobj=eval("document.layers['" + pdiv + "'].document");
		return lobj;
	}//if
	
	//Netscape Navigator 6.x 
	if(isNav6) {			
		lobj=eval("document.getElementById('" + pdiv + "').style");
		return lobj;
	}//if
	
	//Internet Explorer
	if(isIE) {						
		lobj=eval("document.all." + pdiv + ".style"); 
		return lobj;
	}//if	
}

//-->
<!-- END OF CLIENT SIDE SCRIPTING -->



