///////////////////////////
// Finexprestel javascript
// Alan Machado 2003
///////////////////////////

/////////////////////////////////////////
// DHTML Enhanced methods
// Alan Machado 2000.
/////////////////////////////////////////

var is=new function (){ 
	this.VER=navigator.appVersion
	this.AGENT=navigator.userAgent
	this.DOM=document.getElementById?1:0
	this.IE4=(document.all && !this.DOM)?1:0;
	this.IE5=(this.VER.indexOf("MSIE 5")>-1 && this.DOM)?1:0; 
	this.IE6=(this.VER.indexOf("MSIE 6")>-1 && this.DOM)?1:0;
	this.IE=(this.IE4||this.IE5||this.IE6)
	
	this.MAC=this.AGENT.indexOf("Mac")>-1
	this.NS6=document.getElementById&&!document.all?1:0
	this.NS4=(document.layers && !this.DOM)?1:0;
	return this
}


function getElement(id){

	if (is.DOM)	return document.getElementById(id)
	else
	if (is.IE) 	return eval("document.all."+id)
	else
	if (is.NS)	return eval("document."+id)

}

function getTags(name){
	if (is.DOM)
		return document.getElementsByTagName(name)
	else
	if (is.IE)
		return document.all.tags(name)
	else
	if (is.NS4)
		return eval('document.layers')
}

function shiftTo(id, x, y){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.left = x + 'px'
		obj.style.top = y + 'px'
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.pixelLeft = x
		obj.style.pixelTop = y
		}
	else
	if (is.NS4)	{
		var obj = eval("document."+id)
		obj.moveTo(x,y)
		}

}

function setBGColor(id, color){

	if (is.DOM){
		var obj = document.getElementById(id)
		document.getElementById(id).style.backgroundColor = color
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.backgroundColor = color
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.bgColor = color
		}

}

function show(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.visibility = "visible"
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.visibility = "visible"
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.visibility = "visible"
		}
}

function hide(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.visibility = "hidden"
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.visibility = "hidden"
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.visibility = "hidden"
		}

}

function getLeft(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		return parseInt(obj.style.left)
		}
	else
	if (is.IE) {
		return obj.pixelLeft
		}
	else
	if (is.NS4) {
		return eval("document."+id+".left")
		}
}

function getTop(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		return parseInt(obj.style.top)
		}
	else
	if (is.IE) {
		return obj.pixelLeft
		}
	else
	if (is.NS4) {
		return eval("document."+id+".top")
		}
}

function getHeight(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		return obj.offsetHeight
		}
	else
	if (is.IE) {
		return eval("document.all."+id+".offsetHeight")
		}
	else
	if (is.NS4) {
		return eval("document."+id+".document.height")
		}

}
function setDimensions(id,w,h){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.offsetHeight = h;
		obj.offsetWidth = w;
		}
	else
	if (is.IE) {
		eval("document.all."+id+".offsetHeight="+h)
		eval("document.all."+id+".offsetWidth="+w)
		}
	else
	if (is.NS4) {
		eval("document."+id+".document.height="+h)
		eval("document."+id+".document.width="+w)
		}

}
function getWidth(id){
	if (is.DOM){
		var obj = document.getElementById(id)
		return obj.offsetWidth
		}
	else
	if (is.IE) {
		return eval("document.all."+id+".offsetWidth")
		}
	else
	if (is.NS4) {
		return eval("document."+id+".document.width")
		}
}

function setClip(id,ct,cr,cb,cl){
	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.clip = "rect(" + ct + "px " + cr + "px " + cb +"px " + cl + "px)"
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id+".style")	
		obj.clip = "rect(" + ct + "px " + cr + "px " + cb +"px " + cl + "px)"
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.clip.top = ct;
		obj.clip.right = cr;
		obj.clip.bottom = cb;
		obj.clip.left = cl;
		}
}

function setFrame(id,URL) {
	if (is.DOM || is.IE){
   		var IFrameDoc = getFrameDoc(id)
   		if (IFrameDoc == false) return false
   		IFrameDoc.location.replace(URL);
   		return false;
		}
	else	
	if (is.NS4){
		var obj = eval(getLayerRef(getTopParent().document,"IF"+id))
		obj.src = frm
		}
	
}

function setFrame_Ref(ref,id,URL) {
	if (is.DOM || is.IE){
   		var IFrameDoc = getFrameDoc_Ref(ref,id)
   		if (IFrameDoc == false) return false
   		IFrameDoc.location.replace(URL);
   		return false;
		}
	else	
	if (is.NS4){
		var obj = eval(getLayerRef(getTopParent().document,"IF"+id))
		obj.src = frm
		}
	
}
function getFrameUrl_Ref(ref,id){

	if (is.DOM || is.IE) {
		return getFrameDoc_Ref(ref,id).location.href
		}
	else
	if (is.NS4){
		return eval(getLayerRef(getTopParent().document,"IF"+id)+'.src')
		}
}

function getFrameDoc_Ref(ref,id){

  if (ref.document.frames) 
      	var obj = ref.document.frames["IF"+id];
  else
	var obj = ref.document.getElementById("IF"+id)
  
  if (obj.contentDocument)
    	return obj.contentDocument;  // For NS6
  else 
  if (obj.contentWindow) 
	return obj.contentWindow.document; // For IE5.5 and IE6
  else 
  if (obj.document) 
	return obj.document; // IE5
  
  return false

}


function getFrameUrl(id){

	if (is.DOM || is.IE) {
		return getFrameDoc(id).location.href
		}
	else
	if (is.NS4){
		return eval(getLayerRef(getTopParent().document,"IF"+id)+'.src')
		}
}

////////////////////////////////
// IE Specific
///////////////////////////////
function getFrameDoc(id){

  if (parent.document.frames) 
      	var obj = parent.document.frames["IF"+id];
  else
	var obj = parent.document.getElementById("IF"+id)
  
  if (obj.contentDocument)
    	return obj.contentDocument;  // For NS6
  else 
  if (obj.contentWindow) 
	return obj.contentWindow.document; // For IE5.5 and IE6
  else 
  if (obj.document) 
	return obj.document; // IE5
  
  return false

}

////////////////////////////////
// NS Specific
///////////////////////////////
function getLayerRef(doc,id){
var ref
	for(var i=0;i<doc.layers.length;i++){
		
		if (doc.layers[i].id == id)
			return 'document.'+id
		else
		{
			ret = getLayerRef(doc.layers[i].document,id)
			if (ret != '')
				return 'document.'+doc.layers[i].id+'.'+ret
		}
	}
	return ''
	
}

function getTopParent(){
	var p = parent
	for(;p!=p.parent;p=p.parent);
	return p;
}

/////////////////////////////////
// START GENERAL FUNCTIONS
/////////////////////////////////

function writeAbbreviatedString(completestring, maxlength) {
  if (completestring.length > maxlength)
    document.write(completestring.substring(0, maxlength-2)+"...");
  else 
    document.write(completestring);
}


function setSelect(select, value) {

  for (var i = 0; i < select.options.length; i++) 
    if (select.options[i].value == value) 
      select.selectedIndex = i;
}

function writePrefixValue(sym, number) {
  sym = sym + "";
  if (number == "0") 
    document.write(sym+number);    
  else {
    number = (parseFloat(number) + 0.005) + "";
    var dp = number.indexOf(".");
    if (dp >= 0) {
      if (dp+3 <= number.length) 
        number = number.substring(0,dp+3);
      
      if (number.substring(0,1) != '-') 
         document.write("+"+sym+number);
      else 
         document.write("-"+sym+number.substring(1,number.length)); 
    }
  }

}  

function submitToPopup(form,action) {
  if (action != "") 
    form.action = action;
 
  var targetname = form.target;
  if (! targetname) {    
    targetname = "defpopup";
    form.target="defpopup";
  }
  var targetwin = window.open("",targetname,"width=<!-- Common.popupwidth not found -->,height=<!-- Common.popupheight not found -->")
  form.submit();
}

function submitToPopupII(form,action) {
  if (action != "") 
    form.action = action;
  
  if (! form.target)    
    form.target="defpopup";

  if (! form.height.value) 
	form.height.value = 300

  if (! form.width.value) 
	form.width.value = 300
 
  var targetwin = window.open("",form.target,"width="+form.width.value+",height="+form.height.value+',screenX=100,screenY=100,left=100,top=100')
  form.submit();
}

function ValidEmail(obj){
  if (obj.value.replace(/([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)/ig,"") != ""){
   obj.focus();
   alert("Invalid email")
   return false
  }
  return true
}

function HTMLColorMovement(v){
  if (typeof v == 'undefined')	
     document.write("<FONT color=blue>-</FONT>")
  else
     document.write("<FONT color="+((v==0)?"green":(v>0)?"blue":"red")+">"+v+"</FONT>")
}

function NewSplice(arr,idx){
	if(idx != arr.length - 1)
	{
		for(var i=idx;i<arr.length-1;i++)
			arr[i]=arr[i+1]
	}
	arr.length-- 
	return arr
}

function YY_MMM_DD(sdt)
{
var monthNames = new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
	if (parseInt(sdt.substring(2,3)) != 1) {
		return sdt.substring(4,6)+"-"+monthNames[parseInt(sdt.substring(3,4))-1]+"-"+sdt.substring(0,2)
	} else {
		return sdt.substring(4,6)+"-"+monthNames[parseInt(sdt.substring(2,4))-1]+"-"+sdt.substring(0,2)
	}
}

function formatFloat(flt,dp,minlead,thousandsep,prefix,suffix,coloured)  {
  var exp = Math.pow(10,dp);
  var iflt = parseInt((flt * exp) + 0.5);
  var sign = "";
  if (iflt < 0) {
    sign = "-";
    iflt = -iflt;
  }
  if (!minlead) {
    minlead = 1;
  }
  if (!dp) {
    dp=0
  }
  var minlength = minlead + dp;
  var strflt= new String(iflt);
  var padwidth = minlength - strflt.length;
  while (padwidth-- > 0) {
    strflt= "0"+strflt;    
  }
  if (dp > 0) {
    strflt = strflt.substring(0,strflt.length - dp)+"."+strflt.substring(strflt.length - dp,strflt.length)
  }
  if (thousandsep) {

    var startpos = strflt.length - dp - 1;
    if (dp == 0) {
      startpos = strflt.length
    }
    do {
      startpos-=3;
      if (startpos > 0) {
        strflt = strflt.substring(0,startpos)+thousandsep+strflt.substring(startpos,strflt.length);
      }
    }
    while (startpos > 0);
  }
  if (prefix) {
    strflt = prefix + strflt;
  }
  if (suffix) {
    strflt += suffix;
  }
  strflt = sign+strflt
  if (coloured){
    var color;
    if (parseInt(iflt) == 0){
      color = '#000000';
    }
    else if (sign=="-") {
      color = '#AA0022';      
    }
    else {
      color = '#0000CC';      
    }
    strflt = '<span style="color: '+color+ '">'+strflt+'</span>';
  }
  return strflt;
}


/////////////////////////////////
// ANIMATE FUNCTIONS
/////////////////////////////////

function SetHorizontalBarScale(id,idpos){
	var HS = eval('WIN'+id+'1')
	var ID = eval('WIN'+idpos)
	HS.Move(ID.left+ID.width/2,HS.top)
}
function MoveHorizontalBarScale(id,pos){
	var HS = eval('WIN'+id+'1')
	HS.Move(pos,HS.top)
}

function SetVerticalBarScale(id,idpos){
	var VS = eval('WIN'+id+'1')
	var ID = eval('WIN'+idpos)
	VS.Move(VS.left,ID.top+ID.height/2)
}

function MoveVerticalBarScale(id,pos){
	var VS = eval('WIN'+id+'1')
	VS.Move(VS.left,pos)
}

function SetButton(id,index,showid){

	if (eval('typeof BTN'+id) != 'undefined') {
		var Btn = eval('BTN'+id)
		if(typeof Btn[0] != 'undefined')
			 Btn[0].Hide()
		Btn[0] = eval('WIN'+id+''+index+'1')
		Btn[0].Show()
		if (showid != ''){
			if(typeof Btn[1] != 'undefined')
				Btn[1].Hide()
				Btn[1] = eval('WIN'+showid)
				Btn[1].Show()
		}
			
	}
}

function ButtonsAllOff(id){
	var Btn = eval('BTN'+id)
	if(typeof Btn[0] != 'undefined') Btn[0].Hide()
}
function ShowFrame(id){
	eval('WIN'+id+''+'.Show()')
}
function HideFrame(id){
	eval('WIN'+id+''+'.Hide()')
}
;
function objQuery(strQry){

	this.QueryString = objQueryGet;

	var start = strQry.indexOf("?")
	this._URL = strQry.substring(0,start)

	if (start < 1) return

	strQry = strQry.substr(start+1)

	var a = strQry.split('&')
	if(a.length > 0){
		for(var i=0;i<a.length;i++)
			a[i] = a[i].split('=')
		for(var i=0;i<a.length;i++)
			this[a[i][0]] = unescape(a[i][1])
	}
	return true
}

function objQueryGet(){

	var sep = ''
	var strQuery = ''
	for(var p in this){
		if (p.charAt(0) == '_' || typeof this[p] == 'function') continue
		strQuery += sep + p + '=' + escape(this[p]) 
		sep = '&'
	}
	return strQuery
}
;

/////////////////////////////////////////
//WIN DHTML object.
//Alan Machado Oct 2001
//Finanical Express Prestel
/////////////////////////////////////////

function DHTMLWin(id,x,y,minimised,showing){
	
// Code around loading issue in NS6+ && IE5+, Insure element is loaded 
	
	this.init = false
	this.src = ""

	this.Init = WinInit;
	this.Move = WinMove;
	this.Minimise = WinMinimise;
	this.Maximise = WinMaximise;
	this.HScroll = WinHScroll;
	this.Show = WinShow;
	this.Hide = WinHide;

	if(id != null)
	{
  	  this.frameRef  = ''
	  this.frameId   = ''
	  this.idsml	 = id
	  this.id        = "WIN"+id	
	  this.startLeft = x
	  this.startTop  = y
	  this.minimised = minimised
	  this.showing   = showing
	}

//	if(is.DOM && getElement(id) == null) return
	if(is.NS4) return

	this.Init()


	

}

function WinInit(){

	if(this.init) return

	if(is.NS4){	
		RefId = getLayerRef(getTopParent().document,this.id).substr(0)
		idx = RefId.lastIndexOf(".IF") 
		var saveidx = idx+1
		if(idx!=-1){
			for(idx++;RefId[idx]!='.' && idx<RefId.length;idx++);
			this.frameId   = RefId.substr(saveidx,idx-saveidx)
			this.frameRef  = RefId.substr(0,idx)+'.'
		}
	}

	this.bodyId = ''

	var tags = getTags("DIV")
	for(var i = 0; i < tags.length ; i++)
		if (tags[i].id == "BDY"+this.idsml){
			this.bodyId  = "BDY"+this.idsml
			break;
		}

	this.height = getHeight(this.id)

	if (this.bodyId != "")
		this.height = this.height + getHeight(this.bodyId) 

	if (this.bodyId != "") 
	  this.width = getWidth(this.bodyId)
	else
	  this.width = getWidth(this.id)

	this.ScrollClipWidth = this.width
	this.ScrollMaxWidth = this.width
	
	this.titleHeight = 18

	this.expandSize = (this.height-this.titleHeight)-5

	this.Move(this.startLeft,this.startTop)

	if (this.showing) this.Show();

	this.init = true
		
}

function WinMove(x,y){

	this.left = x
	this.top = y
	this.right = x + this.width
	this.bottom = y + this.height
	shiftTo(this.id,x,y)
	if(this.bodyId!="") shiftTo(this.bodyId,x,y+this.titleHeight)
}

function WinShow(){

	if(this.src!=""){
		setFrame(this.id.substr(3),this.src)
		this.src=""
	}

	show(this.id)
	if (this.minimised==0 && this.bodyId!="") show(this.bodyId)
	this.showing = 1
}

function WinHide(){
	hide(this.id)
	if(this.bodyId!="") hide(this.bodyId)
	this.showing = 0 
}

function WinMinimise(){

	if (!this.minimised) {
		id = WIN_FindNearestWindow(this,this.top+this.titleHeight+5)
		if (id != "") this.expandSize = eval(id+'.top')-(this.top+this.titleHeight)-5
		hide(this.bodyId)
		DHTML_WIN_MoveAll(this,this.expandSize*-1)
		this.minimised = 1
	}
}

function WinMaximise(){
	if (this.minimised) {
		DHTML_WIN_MoveAll(this,this.expandSize)
		show(this.bodyId)
		this.minimised = 0
	}
}

function WinHScroll(xoff){

	if(this.left-xoff>this.startLeft ) {
		if(this.left != this.startLeft)
			this.Move(this.startLeft,this.top)
		return 3
	}

	if(this.left-xoff+this.ScrollMaxWidth<this.startLeft+this.ScrollClipWidth){
		return 4
	}

	this.Move(this.left-xoff,this.top)
	setClip(((this.bodyId=='')?this.id:this.bodyId),0,this.startLeft-this.left+this.ScrollClipWidth,this.height,this.startLeft-this.left)

// Determine if a following move will prevent scrolling

	if(this.left-xoff>this.startLeft ) return 1
	if(this.left-xoff+this.ScrollMaxWidth<this.startLeft+this.ScrollClipWidth) return 2

	return 0
}

/////////////////////

function WIN_Minimise(sWin){
	eval(sWin+'.Minimise()')
	//setTimeout("DHTML_WIN(\"if (showing && minimised !=0 && bodyId != '') {hide(bodyId);show(bodyId);}\",'')",1000)
}

function WIN_Maximise(sWin){
	eval(sWin+'.Maximise()')
	//setTimeout("DHTML_WIN(\"if (showing && minimised !=0 && bodyId != '') {hide(bodyId);show(bodyId);}\",'')",1000)
}
function WIN_FindNearestWindow(Win,y){
var SaveId,yLowest
	SaveId = ""
	yLowest = 999999
	var tags = (is.DOM || is.IE || is.NS4) ? getTags("DIV") : eval('document.'+Win.frameId+'document.layers')
	for(var i = 0; i < tags.length ; i++){
		if (tags[i].id.substr(0,3) != "WIN") continue;
		with(eval(Win.frameId+tags[i].id)){
			if (right < Win.left || left > Win.right || top < y ) continue;
			if (top < yLowest){
				yLowest = top
	  			SaveId = Win.frameId+id
			}
	
		}
	}
	return SaveId
}

function DHTML_WIN_MoveAll(Win,yInc){
	var tags = (is.DOM || is.IE || is.NS4) ? getTags("DIV") : eval('document.'+Win.frameId+'document.layers')
	for(var i = 0; i < tags.length ; i++){
		if (tags[i].id.substr(0,3) != "WIN") continue;
		with(eval(Win.frameId+tags[i].id)){
			if (right < Win.left || left > Win.right || top < Win.top+Win.titleHeight+5 ) continue;
			Move(left,top+yInc)
		}
	}
}
	
function DHTMLInit(){

	DHTML_WIN('eval(tags[i].id+\'.Init()\');','')
	DHTML_WIN('if (minimised){minimised=false; Minimise(); }','')
}

function DHTML_WIN(jscode,frameId){

	var tags = getTags("DIV")
	for(var i = 0; i < tags.length ; i++){
		if (tags[i].id.substr(0,3) != "WIN") continue;
	   	with(eval(tags[i].id)){ 

//if(jscode.indexOf('mini')!=0)
//	alert('b:'+id+':'+frameRef)

eval(jscode) }
	}
}
;