/* © 2006 TecnoQuest */

var tqTools = {
	gId : function(str){ return document.getElementById(str); },
	tInter : null,
	tBox : null,
	tFinOp : null,
	tIniOp : null,
	tCorr : null,
	
	Init : function(){
		//if(tqTools.gId('cOpBt')){
			tqTools.gId('cPrt').onclick = tqTools.Print;
			tqTools.gId('cFma').onclick = tqTools.FontMas;
			tqTools.gId('cFme').onclick = tqTools.FontMen;
			tqTools.SetFont();
		//}
	},
	
	//Print------------------------------------------------------------------------------
	Print : function(){
		window.print();
	},
	
	//Font-------------------------------------------------------------------------------
	SetFont : function(){ 
		if(!tqTools.GetCookie('fSize')){
			tqTools.gId('cMR').style.fontSize = '1em';
		}
		else{
			var fSize = tqTools.GetCookie('fSize');
			tqTools.gId('cMR').style.fontSize = fSize + 'em';
			
			if(parseFloat(fSize) > 1){ tqTools.gId('cFme').className = 'aFme'; }
			else{ tqTools.gId('cFme').className = 'aFmeS'; }
			
			if(parseFloat(fSize) >= 1.3){ tqTools.gId('cFma').className = 'aFmaS'; }
			else{ tqTools.gId('cFma').className = 'aFma'; }
		}
	},
		
	FontMas : function(){
		this.blur();
		var fSize = parseFloat(tqTools.gId('cMR').style.fontSize);
		if(fSize >= 1.3) return;
		else{
			tqTools.gId('cMR').style.fontSize = fSize + 0.1 + 'em';
			fSize = parseFloat(tqTools.gId('cMR').style.fontSize);
			if(fSize > 1){
				tqTools.gId('cFme').className = 'aFme';
			}
			if(fSize >= 1.3){
				tqTools.gId('cMR').style.fontSize = '1.3em';
				tqTools.gId('cFma').className = 'aFmaS';
			}
			tqTools.SetCookie('fSize', fSize, null, '/', null, null);
		}
	},
	
	FontMen : function(){
		this.blur();
		var fSize = parseFloat(tqTools.gId('cMR').style.fontSize);
		if(fSize <= 1) return;
		else{
			tqTools.gId('cMR').style.fontSize = fSize - 0.1 + 'em';
			fSize = parseFloat(tqTools.gId('cMR').style.fontSize);
			if(fSize < 1.3){
				tqTools.gId('cFma').className = 'aFma';
			}
			if(fSize <= 1){
				tqTools.gId('cMR').style.fontSize = '1em';
				tqTools.gId('cFme').className = 'aFmeS';
			} 
			tqTools.SetCookie('fSize', fSize, null, '/', null, null);
		}
	},
	
	//Cookies----------------------------------------------------------------------------
	SetCookie : function(cNam, cVal, cExp, cPath, cDom, cSec){
		var cCookie = cNam + '=' + encodeURIComponent(cVal);
		if(cExp) cCookie += '; expires=' + cExp.toGMTString();
		if(cPath) cCookie += '; path=' + cPath;
		if(cDom) cCookie += '; domain=' + cDom;
		if(cSec) cCookie += '; secure=' + cSec;
		document.cookie = cCookie; 
	},
	
	GetCookie : function(cNam){
		var sRE = '(?:; )?' + cNam + '=([^;]*);?';
		var oRE = new RegExp(sRE);
		if(oRE.test(document.cookie)) return decodeURIComponent(RegExp['$1']);
		else return null;
	},
	
	//Servicios desplegables------------------------------------------------------------
	ShowService : function(lk,bl){
		lk.blur();
		tqTools.tBox = tqTools.gId(bl);
		lk.className = 'sLkS';
		lk.title = '';
		lk.onclick = function(){ tqTools.HideService(lk,bl); }
		tqTools.tFinOp = tqTools.gId(bl).scrollHeight + 10; // + padding
		tqTools.tIniOp = 0;
		tqTools.tInter = setInterval('tqTools.OpenService()', 1);
	},
	
	HideService : function(lk,bl){
		lk.blur();
		tqTools.tBox = tqTools.gId(bl);
		lk.className = 'sLk';
		lk.title = 'Ampliar información';
		lk.onclick = function(){ tqTools.ShowService(lk,bl); }
		tqTools.tFinOp = 0; 
		tqTools.tIniOp = tqTools.tBox.scrollHeight;
		tqTools.tInter = setInterval('tqTools.CloseService()', 1);
	},
	
	OpenService : function(){
		var tope = Math.round(((tqTools.tFinOp - tqTools.tIniOp)/3)*2);
		if(tqTools.tIniOp <= tqTools.tFinOp  && tope > 0){
			tqTools.tBox.style.height = (tqTools.tIniOp + tope) + 'px';
			tqTools.tIniOp = parseInt(tqTools.tBox.style.height);
		}else{
			clearInterval(tqTools.tInter);
			tqTools.tBox.style.padding = '0 5px 1px 5px'
		}
	},
	
	CloseService : function(){
		var tope = Math.round(((tqTools.tIniOp - tqTools.tFinOp)/3)*2);
		if(tqTools.tIniOp >= tqTools.tFinOp && tope > 0){
			tqTools.tBox.style.height = (tqTools.tIniOp - tope) + 'px';
			tqTools.tIniOp = parseInt(tqTools.tBox.style.height);
		}else{
			clearInterval(tqTools.tInter);
			tqTools.tBox.style.padding = '0 5px'
		}
	}

};


