var IE4=false;var NS6=false;if(document.all){IE4=true;}else if(document.getElementById){NS6=true;}
function nOption(frame,objSel,texto,valor,selected){var oOption=frame.document.createElement("OPTION");objSel.options.add(oOption);oOption.text=texto;oOption.value=valor;oOption.selected=selected;}
function carregaSelect(nomeS,arrayDados){s=document.getElementById(nomeS);if(s){s.options.length=0;for(i=0;i<arrayDados.length;i++){selec=false;if(arrayDados[i].length==3){if(arrayDados[i][2]==1)selec=true;}
nOption(self,s,arrayDados[i][1],arrayDados[i][0],selec);}}}
function makeArray(){this[0]=makeArray.arguments.length;for(i=0;i<makeArray.arguments.length;i++)
this[i+1]=makeArray.arguments[i];}
function tstSoFloat(campo,event){if(event.ctrlKey){return false;}
if(event.shiftKey){return false;}
if(NS6){var tc=event.charCode;if(tc==0||tc==13||tc==46||tc==44||(tc>=48&&tc<=57)){return true;}}
else{var tc=event.keyCode;if(tc==0||tc==13||tc==46||tc==44||(tc>=48&&tc<=57)){return true;}}
return false}
function verificaEnter(event){if(NS6){var tc=event.keyCode;}
else{var tc=event.keyCode;}
if(tc==13)return true;else return false;}
function tstNum(campo,event){if(event.ctrlKey){return false;}
if(event.shiftKey){return false;}
if(NS6){var tc=event.charCode;if(tc==46&&campo.value.indexOf(".")!=-1)return false;if(tc==0||tc==46||(tc>=48&&tc<=57)){return true;}}
else{var tc=event.keyCode;if(tc==46&&campo.value.indexOf(".")!=-1)return false;if(tc==0||tc==13||tc==46||(tc>=48&&tc<=57)){return true;}}
return false}
function tstSoNumMinus(campo,event){if(event.ctrlKey){return false;}
if(event.shiftKey){return false;}
if(NS6){var tc=event.charCode;if(tc==45)
var ind=(campo.value).indexOf("-");if(tc==46&&campo.value.indexOf(".")!=-1)return false;if((tc==45)&&(campo.value.length!=0))return false;if((tc==45)&&(campo.value.indexOf("-")!=-1))return false;if(tc==0||tc==46||tc==45||(tc>=48&&tc<=57)){return true;}}
else{var tc=event.keyCode;if(tc==46&&campo.value.indexOf(".")!=-1)return false;if((tc==45)&&(campo.value.length!=0))return false;if((tc==45)&&(campo.value.indexOf("-")!=-1))return false;if(tc==0||tc==45||tc==13||tc==46||(tc>=48&&tc<=57)){return true;}}
return false}
function tstSoNum(campo,event){if(event.ctrlKey){return false;}
if(event.shiftKey){return false;}
if(NS6){var tc=event.charCode;if(tc==0||(tc>=48&&tc<=57)){return true;}}
else{var tc=event.keyCode;if(tc==0||tc==13||(tc>=48&&tc<=57)){return true;}}
return false}
function validaTamanho(campo,tamanho,event){if(campo.value.length>=tamanho){if(event.ctrlKey){return true;}
if(event.shiftKey){return true;}
if(NS6){if(event.keycode==8){return true;}}
else{var tc=event.keyCode;if(tc==8){return true;}}
return false;}
return true;}
function IsNumeric(strString,cPonto){strString=trim(strString);var blnResult=true;if(strString.length>0){var strValidChars="0123456789";if(cPonto)strValidChars=strValidChars+".";var strChar;if(strString.length==0)return false;for(i=0;i<strString.length&&blnResult==true;i++)
{strChar=strString.charAt(i);if(strValidChars.indexOf(strChar)==-1){blnResult=false;}}}
return blnResult;}
function erro(mess,campo){alert(mess);campo.focus();return false}
function setCookie(name,value,expires,path,domain,secure){var curCookie=name+"="+escape(value)+
((expires)?"; expires="+expires.toGMTString():"")+
((path)?"; path="+path:"")+
((domain)?"; domain="+domain:"")+
((secure)?"; secure":"");document.cookie=curCookie;}
function getCookie(name){var dc=document.cookie;var prefix=name+"=";var begin=dc.indexOf("; "+prefix);if(begin==-1){begin=dc.indexOf(prefix);if(begin!=0)return null;}else
begin+=2;var end=document.cookie.indexOf(";",begin);if(end==-1)
end=dc.length;return unescape(dc.substring(begin+prefix.length,end));}
function deleteCookie(name,path,domain){if(getCookie(name)){document.cookie=name+"="+
((path)?"; path="+path:"")+
((domain)?"; domain="+domain:"")+"; expires=Thu, 01-Jan-70 00:00:01 GMT";}}
function fixDate(date){var base=new Date(0);var skew=base.getTime();if(skew>0)
date.setTime(date.getTime()-skew);}
function email_validate(email){em_val=/^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;if(em_val.test(email))return true
else return false}
function trimRegExp(s){var m=s.match(/^\s*(\S+(\s+\S+)*)\s*$/);return(m==null)?"":m[1];}
function trim(inputString){if(typeof inputString!="string"){return inputString;}
var retValue=inputString;var ch=retValue.substring(0,1);while(ch==" "){retValue=retValue.substring(1,retValue.length);ch=retValue.substring(0,1);}
ch=retValue.substring(retValue.length-1,retValue.length);while(ch==" "){retValue=retValue.substring(0,retValue.length-1);ch=retValue.substring(retValue.length-1,retValue.length);}
while(retValue.indexOf("  ")!=-1){retValue=retValue.substring(0,retValue.indexOf("  "))+retValue.substring(retValue.indexOf("  ")+1,retValue.length);}
return retValue;}
function limpaFormStd(f){for(i=0;i<f.elements.length;i++){if(f.elements[i].type=="checkbox")f.elements[i].checked=false;if(f.elements[i].type=="text")f.elements[i].value="";if(f.elements[i].type=="select-one")f.elements[i].selectedIndex=0;if(f.elements[i].type=="radio")f.elements[i].checked=false;if(f.elements[i].type=="hidden"){}}}
var daysofmonthLY=new makeArray(31,29,31,30,31,30,31,31,30,31,30,31);var daysofmonth=new makeArray(31,28,31,30,31,30,31,31,30,31,30,31);function keyPressData(obj,ev)
{pos1=obj.value.indexOf("-");aux=obj.value.substring(pos1+1);pos2=aux.indexOf("-");key=null;if((ev.keyCode==key)||(ev.keyCode>=48)&&(ev.keyCode<=57))
{flag=0;TamAux=obj.value.length;if((pos1==-1)&&(pos2==-1)&&(flag==0))
{if((TamAux>2)&&(TamAux<4))
{aux=obj.value.substring(0,2)+"-"+obj.value.substring(2,4);flag=1;}
else if(TamAux>=4)
{aux=obj.value.substring(0,2)+"-"+obj.value.substring(2,4)+"-"+obj.value.substring(4,8);flag=1;}
obj.value=aux;ev.returnValue=false;}
else if((pos1>2)&&(flag==0))
{aux=obj.value.substring(0,2)+"-"+obj.value.substring(2,6);flag=1;obj.value=aux;ev.returnValue=false;}
else if((TamAux>4)&&(pos2==-1)&&(flag==0))
{aux=obj.value.substring(0,2)+"-"+obj.value.substring(3,5)+"-"+obj.value.substring(5,9);flag=1;obj.value=aux;ev.returnValue=false;}
if((TamAux==2)&&(pos1==-1)&&(flag==0))
{if(key!=45)
obj.value=obj.value+"-";ev.returnValue=true;flag=1;}
else if((TamAux==7)&&(pos2==-1)&&(flag==0))
{if(key!=45)
obj.value=obj.value+"-";ev.returnValue=true;flag=1;}
else
ev.returnValue=true;}
else
ev.returnValue=false;}
function vData(campo){data=trim(campo.value);if(data.length>0){if(data.length==10){datum=campo.value.split("-");dia=datum[0];mes=datum[1];ano=datum[2];if(datum.length>1){if(ano.length!=4)
return false;if((isNaN(ano))||(isNaN(mes))||(isNaN(dia))||(dia.length!=2))
return false;if(mes.length!=2)
return false;if((mes>12)||(mes<1))
return false;else{if(!ValidDate(dia-0,mes-0,ano))
return false;}}else return false;}else return false;}
return true;}
function ValidDate(day,month,year){if((bissexto(year)&&(day>daysofmonthLY[month]))||(!bissexto(year)&&(day>daysofmonth[month]))){return false;}
else{return true;}}
function bissexto(year){if((year/4)!=Math.floor(year/4))
return false;if((year/100)!=Math.floor(year/100))
return true;if((year/400)!=Math.floor(year/400))
return false;return true;}
function padLeft(str,pad,count){while(str.length<count)
str=pad+str;return str;}
function showDataActual(){var data="";var time=new Date();var dia=time.getDate();var mes=(time.getMonth()+1);var ano=time.getYear();data=dia+"-"+mes+"-"+ano
return data;}
function addslashes(str){str=str.replace(/\'/g,'\\\'');str=str.replace(/\"/g,'\\"');str=str.replace(/\\/g,'\\\\');str=str.replace(/\0/g,'\\0');return str;}
function stripslashes(str){str=str.replace(/\\'/g,'\'');str=str.replace(/\\"/g,'"');str=str.replace(/\\\\/g,'\\');str=str.replace(/\\0/g,'\0');return str;}
function newWindow(url,id){param="menubar=no,toolbar=no,location=no,status=no,scrollbars=no,resizable=yes";window.open(url,id,param);}
function newWindowSize(url,id){param="width=780,height=500,menubar=no,toolbar=no,location=no,status=no,scrollbars=yes,resizable=yes";window.open(url,id,param);}
function URLEncode(clearString){var output='';var x=0;clearString=clearString.toString();var regex=/(^[a-zA-Z0-9_.]*)/;while(x<clearString.length){var match=regex.exec(clearString.substr(x));if(match!=null&&match.length>1&&match[1]!=''){output+=match[1];x+=match[1].length;}else{if(clearString[x]==' ')
output+='+';else{var charCode=clearString.charCodeAt(x);var hexVal=charCode.toString(16);output+='%'+(hexVal.length<2?'0':'')+hexVal.toUpperCase();}
x++;}}
return output;}