//Inicio: Variaveis para funcoes de scrolling
var _prObjDivDad;
var _prObjDivSon;
var _prObjDivItl = 0;
var _prPosDivTop = 0;
var _prObjDivSet = false;
//Fim: Variaveis para funcoes de scrolling

//Inicio: Variaveis para captura da posição do mouse
var pr_cd_PosX = 0;
var pr_cd_PosY = 0;
//Fim: Variaveis para captura da posição do mouse

var _prUrlDefault = "Default.aspx";
var _prDivScrollerCount = 0;

//Inicio: Funções para captura da posição do mouse
document.onmousemove = pr_cd_fct_getMouseXY;
function pr_cd_fct_getMouseXY(e){ pr_cd_PosY = (event.clientY + document.body.scrollTop); pr_cd_PosX = (event.clientX + document.body.scrollLeft); }
//Fim: Funções para captura da posição do mouse

function dw(tx){ document.write(tx); }
function prRollOverImgOn(im,sr){ im.src = sr; }
function prRollOverImgOff(im,sr){ im.src = sr; }
function prCampoCheckMin(cp,nu,ms){
	if (cp.value.length < nu){ alert(ms); cp.focus(); return (false); }
	return (true);
}
function prCampoCheckMax(cp,nu,ms){
	if (cp.value.length > nu){ alert(ms); cp.focus(); return (false); }
	return (true);
}
function prIsNumeric(cp,ms){
	if (isNaN(cp.value)){ alert(ms); cp.focus(); return (false); }
	return (true);
}
function prCampoEqualNum(cp,vl,ms){
	if (parseInt(cp.value)==parseInt(vl)){ return (true); }
	else { alert(ms); cp.focus(); return (false); }
}
function prCampoGreaterNum(cp,vl,ms){
	if (parseInt(cp.value)>parseInt(vl)){ return (true); }
	else { alert(ms); cp.focus(); return (false); }
}
function prCampoGreaterOrEqualNum(cp,vl,ms){
	if (parseInt(cp.value)>=parseInt(vl)){ return (true); }
	else { alert(ms); cp.focus(); return (false); }
}
function prCampoLowerNum(cp,vl,ms){
	if (parseInt(cp.value)<parseInt(vl)){ return (true); }
	else { alert(ms); cp.focus(); return (false); }
}
function prCampoLowerOrEqualNum(cp,vl,ms){
	if (parseInt(cp.value)<=parseInt(vl)){ return (true); }
	else { alert(ms); cp.focus(); return (false); }
}
function prIsDate(pcampo) {
	if(typeof pcampo == "undefined"){ return (false); }
	if(typeof pcampo != "string"){ pcampo = pcampo.toString(); }
	if ((pcampo.length > 10)||(pcampo.length < 6)) { return (false); }
	var c = 0; var err = 0; var a = pcampo; var valorok = false;
	var dma = new Array();
	var pode = new Array("0","1","2","3","4","5","6","7","8","9","/");
	dma[0] = ""; dma[1] = ""; dma[2] = "";
	for (ix=0; ix < a.length; ix++){ valorok = false; for(iy=0;iy<11;iy++){ if(a.charAt(ix)==pode[iy]){ valorok = true; } } if(valorok){ if(a.charAt(ix)=="/"){ c++; } else { dma[c]+=a.charAt(ix); } } else { return (false); } }
	if (c!=2){ return (false); }
	dma[0] = parseInt(dma[0]);
	dma[1] = parseInt(dma[1]);
	if ((dma[0]<1) && (dma[0]>31)){ return (false); }
	if ((dma[1]<1) && (dma[1]>12)){ return (false); }
	if ((dma[2].length!=2)&&(dma[2].length!=4)){ return (false); }
	if (dma[2].length==2){ if(parseInt(dma[2])>49){ dma[2] = "19" + dma[2]; } else { dma[2] = "20" + dma[2]; } }
	dma[2] = parseInt(dma[2]);
	if (dma[1]==4 || dma[1]==6 || dma[1]==9 || dma[1]==11){ if (dma[0]==31){ return (false); } }
	if (dma[1]==2){ var g=parseInt(dma[2]/4); if (isNaN(g)){ return (false); } if (dma[0]>29){ return (false); } if (dma[0]==29 && ((dma[2]/4)!=g)){ return (false); } }
	return (true);
}
function prIsDateMsg(cp,ms) {
	if(!prIsDate(cp)){ alert(ms); return(false); }
	else { return (true); }
}

function prNumeroFormata(num,lgh){
	var nu = num.toString();
	var nl = nu.length;
	if(nl<lgh){ for(o=nl;o<lgh;o++){ nu = "0" + nu; } }
	return (nu);
}
function prCampoDataAdd(cdd,cdm,cda,css,sdt){
	var _rs = "";
	var _dia; var _mes; var _ano;
	var _mt = new Array("","Jan","Fev","Mar","Abr","Mai","Jun","Jul","Ago","Set","Out","Nov","Dec");
	var _d = new Date();
	_dia = parseInt(_d.getDate());
	_mes = (parseInt(_d.getMonth()) + 1);
	_ano = parseInt(_d.getYear());
	if(sdt.length>=8){ var adt = sdt.split("/"); _dia = parseFloat(adt[0]); _mes = parseFloat(adt[1]); _ano = parseFloat(adt[2]); }
	_rs += "<select name=\""+cdd+"\" class=\""+css+"\">\n";
	for(_x=1;_x<=31;_x++){ 
		_rs += "  <option value=\""+_x+"\"";
		if(parseInt(_x)==_dia){ _rs += " selected"; }
		_rs += ">"+prNumeroFormata(_x,2)+"</option>\n";
	}
	_rs += "</select> / \n";
	_rs += "<select name=\""+cdm+"\" class=\""+css+"\">\n";
	for(_x=1;_x<=12;_x++){ 
		_rs += "  <option value=\""+_x+"\"";
		if(parseInt(_x)==_mes){ _rs += " selected"; }
		_rs += ">"+_mt[_x]+"</option>\n";
	}
	_rs += "</select> / \n";
	_rs += "<select name=\""+cda+"\" class=\""+css+"\">\n";
	for(_x=1980;_x<=(parseInt(_d.getYear())+5);_x++){ 
		_rs += "  <option value=\""+_x+"\"";
		if(parseInt(_x)==_ano){ _rs += " selected"; }
		_rs += ">"+_x+"</option>\n";
	}
	_rs += "</select>\n";
	return (_rs);
}

function prCampoMesAnoAdd(cdm,cda,css,sdt){
	var _rs = "";
	var _mes; var _ano;
	var _mt = new Array("","Jan","Fev","Mar","Abr","Mai","Jun","Jul","Ago","Set","Out","Nov","Dec");
	var _d = new Date();
	_mes = (parseInt(_d.getMonth()) + 1);
	_ano = parseInt(_d.getYear());
	if(sdt.length>=8){ var adt = sdt.split("/"); _mes = parseFloat(adt[1]); _ano = parseFloat(adt[2]); }
	_rs += "<select name=\""+cdm+"\" class=\""+css+"\">\n";
	for(_x=1;_x<=12;_x++){ 
		_rs += "  <option value=\""+_x+"\"";
		if(parseInt(_x)==_mes){ _rs += " selected"; }
		_rs += ">"+_mt[_x]+"</option>\n";
	}
	_rs += "</select> / \n";
	_rs += "<select name=\""+cda+"\" class=\""+css+"\">\n";
	for(_x=1980;_x<=(parseInt(_d.getYear())+5);_x++){ 
		_rs += "  <option value=\""+_x+"\"";
		if(parseInt(_x)==_ano){ _rs += " selected"; }
		_rs += ">"+_x+"</option>\n";
	}
	_rs += "</select>\n";
	return (_rs);
}

function prRandomize(lbound, ubound){
	return (Math.floor(Math.random() * (ubound - lbound)) + lbound);
}

function Replace(strQuery,strFind,strMatch) 
{
	var out = strFind;
	var add = strMatch;
	var temp = "" + strQuery;
	while (temp.indexOf(out)>-1) {
		pos= temp.indexOf(out);
		temp = "" + (temp.substring(0, pos) + add + temp.substring((pos + out.length), temp.length));
	}
	return (temp);
}

function ArrumaValor(valor,tipo){
  var vc = valor.toString();
  var nu; var pv; var xv = 0;
  var xi = 0; var p = -1; var dc = "";
  var me = ""; var dcf = ""; var pt = ".";
  var vr = ","; var rt = "00"; var fl = false;
  var dcp = vc; var tam = vc.length;
  if (typeof tipo!= "string") { return ("faltando o tipo da moeda"); }
  tipo = tipo.toUpperCase();
  if ((tipo!="R")&&(tipo!="U")) { return ("tipo da moeda inválido"); }
  if (tipo=="U") { pt = ","; vr = "."; }
  nu = new Array("0","1","2","3","4","5","6","7","8","9");
  for (i = 0; i < tam; i++){ elem = dcp.charAt(i); if ((elem == pt)||(elem == vr)){ xv++; } }
  for (i = 0; i < tam; i++){
    elem = dcp.charAt(i);
	if(elem == "-"){ me = "-"; } else { for (x = 0; x < 11; x++){ if (elem == nu[x]){ dc += elem; } } }
    if ((elem == pt)||(elem == vr)){ xi++; if (xi == xv) { dc += vr; }	}
  }
  tam = dc.length;
  pv = dc.indexOf(vr);
  if (tam==0){ return ("0"+vr+"00"); }
  if (pv != -1){ rt = dc.substring(tam,pv+1); dcp = dc.substring(0,pv); if (rt.length == 1){ rt += "0"; } }
  tam = dcp.length;
  for (i = 0; i < tam; i++){ elem = dcp.charAt(i); if ((elem != "0")||(fl)){ if(elem != "-"){ dcf += elem; fl = true; } } }
  if (!fl) { dcf = "0"; }
  dc = ""; tam = dcf.length;
  for (i = tam-1; i >= 0; i--){ if (p < 2) { dc = dcf.charAt(i) + dc; p++; } else { dc = dcf.charAt(i) + pt + dc; p = 0;} }
  return (me + dc + vr + rt);
}

function TipShow(ts_titulo,ts_msg){
	var ts_ms = "<table cellSpacing=\"0\" cellPadding=\"2\" border=\"0\">";
	ts_ms += "<tr><td nowrap style=\"FONT-SIZE:8pt;FONT-FAMILY:Verdana,Arial;\"><u><b>"+ts_titulo+"</b></u>:<br>"+Replace(ts_msg,"\n","<br>")+"</td></tr>";
	ts_ms += "</table>";
	document.all.ToolTip.innerHTML  = ts_ms;
	document.all.ToolTip.style.top  = pr_cd_PosY + 15;
	document.all.ToolTip.style.left = pr_cd_PosX + 15;
	document.all.ToolTip.style.visibility = "visible";
}
function TipHide(){ document.all.ToolTip.style.visibility = "hidden"; }

function TipTag(tt_print){
	var tt_tag = "<div id=\"ToolTip\" style=\"BORDER-RIGHT:gray 1px solid; BORDER-TOP:gray 1px solid; Z-INDEX:999; LEFT:0px; VISIBILITY:hidden; BORDER-LEFT:gray 1px solid; COLOR:black; BORDER-BOTTOM:gray 1px solid; POSITION:absolute; TOP:0px; BACKGROUND-COLOR:lightyellow\"></div>";
	if((typeof(tt_print)=="boolean")&&(tt_print)){ dw(tt_tag); }
	else { return(tt_tag); }
}

// Inicio: Funcoes de scrolling
function prDivScrollMove(dcn){
	var DoIt = false;
	var divSonHeigth = parseInt(_prObjDivSon.offsetHeight);
	var divDadHeigth = parseInt(_prObjDivDad.style.height);
	if(dcn=="desce"){ if( ((divSonHeigth-divDadHeigth)+(_prPosDivTop-10)) >= (-10) ){ _prPosDivTop -= 10; DoIt = true; } }
	else { if((_prPosDivTop+10)<=(10)){ _prPosDivTop += 10; DoIt = true; } }
	if(DoIt){ _prObjDivSon.style.top = _prPosDivTop; _prObjDivItl = setTimeout("prDivScrollMove('"+dcn+"')",20); } 
	else { if(_prObjDivItl!=0){ clearTimeout(_prObjDivItl); _prObjDivItl = 0; } }
}
function prDivScroll(dvd,dvs,dct){
	_prObjDivDad = eval("document.all."+dvd);
	_prObjDivSon = eval("document.all."+dvs);
	if(!_prObjDivSet){ _prObjDivSon.style.top = 0; _prPosDivTop = 0; _prObjDivSet = true; }
	prDivScrollMove(dct);
}
function prDivScrollClear(){ if(_prObjDivItl!=0){ clearTimeout(_prObjDivItl); _prObjDivItl = 0; } }
// Fim: Funcoes de scrolling

function prGradeAdd(wid,hgt,img,imw,lnk,txt,scr,bgp){
	var tb = ""; var cp = ""; var sc = false; var backgroud = "img/px/px_cinza_claro2.gif";
	if((typeof(scr)=="boolean")&&(scr==true)){ sc = true; }
	if(typeof(bgp)=="string"){ backgroud = bgp; }
	if(sc){ cp = "colspan=\"2\""; }
	tb += "<table background=\""+backgroud+"\" width=\""+wid+"\" height=\""+hgt+"\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
	tb += "  <tr>";
	tb += "    <td height=\"21\" width=\"2\" bgcolor=\"#FFFFFF\">";
	tb += "      <table width=\"2\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
	tb += "        <tr><td><img src=\"img/px/px.gif\" width=\"2\" height=\"9\"><br><img src=\"img/gr/cr/top_left.gif\" width=\"2\" height=\"2\"></td></tr>";
	tb += "        <tr><td><img src=\"img/gr/bg/lateral.gif\" width=\"2\" height=\"10\"></td></tr>";
	tb += "      </table>";
	tb += "    </td>";
	tb += "    <td "+cp+" bgcolor=\"#FFFFFF\" height=\"21\">";
	tb += "      <table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
	tb += "        <tr>";
	tb += "          <td background=\"img/gr/bg/top_down.gif\"><img src=\"img/px/px.gif\" width=\"1\" height=\"21\"></td>";
	tb += "          <td width=\"8\"><img src=\"img/gr/cr/tr_top_DownToUp.gif\" width=\"8\" height=\"21\"></td>";
	tb += "          <td background=\"img/gr/bg/top_up.gif\" width=\""+(imw+10)+"\"><img src=\"img/px/px.gif\" width=\"5\" height=\"1\">";
	if(lnk.length>0){ tb += "<a href=\""+_prUrlDefault+lnk+"\">"; }
	tb += "<img src=\""+img+"\" width=\""+imw+"\" height=\"21\" border=\"0\">";
	if(lnk.length>0){ tb += "</a>"; }
	tb += "<img src=\"img/px/px.gif\" width=\"5\" height=\"1\"></td>";
	tb += "        </tr>";
	tb += "      </table>";
	tb += "    </td>";
	tb += "    <td background=\"img/gr/bg/lateral.gif\" valign=\"top\" width=\"2\"><img src=\"img/gr/cr/top_right.gif\" width=\"2\" height=\"2\"></td>";
	tb += "  </tr>";
	tb += "  <tr>";
	tb += "    <td background=\"img/gr/bg/lateral.gif\"><img src=\"img/px/px.gif\" width=\"1\" height=\"1\"></td>";
	tb += "    <td valign=\"top\">";
	tb += "      <table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
	tb += "        <tr>";
	tb += "          <td class=\"pr-grade\">";
	if(sc){
		/*tb += "            <div id=\"prDivScroller"+_prDivScrollerCount+"\" style=\"position:relative; z-index:0; width:"+(wid-19)+"px; height:"+(hgt-23)+"px; overflow: hidden; clip: rect(0px "+(wid-19)+"px "+(hgt-23)+"px 0px); visibility: visible;\"> ";
		tb += "              <div id=\"prDivScrollContent"+_prDivScrollerCount+"\" style=\"position:relative; width:"+(wid-18)+"px;  z-index:0; overflow:hidden; visibility:visible;\">" + txt + "</div>";
		tb += "            </div>";*/
		
		tb += "            <div id=\"prDivScroller"+_prDivScrollerCount+"\" style=\"position:relative; z-index:0; width:"+(wid-19)+"px; height:"+(hgt-23)+"px; overflow: auto; scrollbar-face-color: #999999; clip: rect(0px "+(wid-19)+"px "+(hgt-23)+"px 0px); visibility: visible;\"> ";
		tb += "              <div id=\"prDivScrollContent"+_prDivScrollerCount+"\" style=\"position:relative; width:"+(wid-18)+"px;  z-index:0; overflow:auto; visibility:visible;\">" + txt + "</div>";
		tb += "            </div>";
		
	} else { 
		tb += txt; 
	}
	tb += "          </td>";
	tb += "        </tr>";
	tb += "      </table>";
	tb += "    </td>";
	if(sc){
		/*tb += "    <td align=\"center\" valign=\"top\" width=\"17\">";
		tb += "      <table width=\"11\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">";
		tb += "        <tr><td height=\"2\"><img src=\"img/px/px.gif\" width=\"1\" height=\"2\"></td></tr>";
		tb += "        <tr><td height=\"10\"><a href=\"javascript:;\" onMouseDown=\"prDivScroll('prDivScroller"+_prDivScrollerCount+"','prDivScrollContent"+_prDivScrollerCount+"','sobe');\" onMouseUp=\"prDivScrollClear();\"><img src=\"img/bt/ArrowUp.gif\" width=\"11\" height=\"10\" border=\"0\" alt=\"Click para rolar texto para cima\"></a></td></tr>";
		tb += "        <tr><td height=\"*\"></td></tr>";
		tb += "        <tr><td height=\"10\"><a href=\"javascript:;\" onMouseDown=\"prDivScroll('prDivScroller"+_prDivScrollerCount+"','prDivScrollContent"+_prDivScrollerCount+"','desce');\" onMouseUp=\"prDivScrollClear();\"><img src=\"img/bt/ArrowDown.gif\" width=\"11\" height=\"10\" border=\"0\" alt=\"Click para rolar texto para baixo\"></a></td></tr>";
		tb += "        <tr><td height=\"2\"><img src=\"img/px/px.gif\" width=\"1\" height=\"2\"></td></tr>";
		tb += "      </table>";
		tb += "    </td>";
		_prDivScrollerCount ++;*/
	}
	tb += "    <td background=\"img/gr/bg/lateral.gif\"><img src=\"img/px/px.gif\" width=\"1\" height=\"1\"></td>";
	tb += "  </tr>";
	tb += "  <tr>";
	tb += "    <td height=\"2\"><img src=\"img/gr/cr/down_left.gif\" width=\"2\" height=\"2\"></td>";
	tb += "    <td "+cp+" background=\"img/gr/bg/baixo.gif\" height=\"2\"><img src=\"img/px/px.gif\" width=\"1\" height=\"2\"></td>";
	tb += "    <td height=\"2\"><img src=\"img/gr/cr/down_right.gif\" width=\"2\" height=\"2\"></td>";
	tb += "  </tr>";
	tb += "</table>";
	dw(tb);
}