if(typeof arqForm_js=='undefined'){
	arqForm_js=true;

	var nErr=0;
	try{
		if(typeof bIE=='undefined')bIE=navigator.appName=='Microsoft Internet Explorer'?true:false;
		if(typeof bNS=='undefined')bNS=navigator.appName=='Netscape'?true:false;}
	catch(nErr){/*Response.write(nErr.number+' - '+nErr.name+' - '+nErr.message);Response.end();*/}

	function fnAllowOnly(oE,sE){
		var bRet=true,iKeyCode=bIE?oE.keyCode:oE.which;if(',0,8,13,'.indexOf(','+iKeyCode+',')!=-1)return bRet;
		var sT1='',sCh='';sE=sE.toLowerCase();
		sE=sE.replace('a..z','abcdefghijklmnopqrstuvwxyz');
		sE=sE.replace('á..ú','áàäãâéèëêíìïîóòöõôúùüûýÿñç');
		sE=sE.replace('0..9','0123456789');
		sE=sE.replace('$..a','"‘’“”.,-=!?@#$&()_+<>\/ªº¹²³£¢§°{}[]´`~^*%:; ');
		/*sE=sE.replace('$..a','.,-=!?@#$&()_+<>\/ªº¹²³£¢§°{}[]´`~^*%:; ');*/
		sE=sE.replace('|','');sCh=String.fromCharCode(iKeyCode);sCh=sCh.toLowerCase();sE=sE.toLowerCase();
		if(sE.indexOf(sCh)==-1)bRet=false;return bRet;}

	function fnCheckEmail(oObj,sMsg,lAltTxt){
		if(oObj.value==null)return false;var tMsg='E-mail inválido !';
		oObj.value=oObj.value.toLowerCase();
		if(oObj.value.search(/^\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*$/i)==-1){
			if(sMsg)alert(tMsg);if(lAltTxt)oObj.value='';
		return false;}return true;}

	function fnSelCont(oE){
		if(oE.type!='select-one'&&oE.type!='radio'&&oE.type!='check'){oE.select();return true;}}

	function fnCheckLenOver(vEle,nMax,bClr,bMsg,oEvent){
		var bRet=false,sStr='',nlMax=nMax,nlObjLen=typeof vEle=='object'?vEle.value.length:vEle.length;
		if(typeof oEvent!='undefined')if(oEvent.type=='keypress')--nlMax;
		if(nlObjLen>0){
			if(nlObjLen>nlMax){
				if(bClr){
					/*if(bNS)oEvent.returnValue=false;
					if(bIE)window.event.keyCode=0;*/
					oEvent.returnValue=false;}
				if(bMsg)sStr='O limite de '+nMax+' caracteres foi ultrapassado. O tamanho atual é de '+nlObjLen+' caracteres.';
				bRet=true;}}
		return[bRet,sStr];}

	//ALT=18;SHIFT=16;CTRL=17;INSERT=45;HOME=36;PGUP=33;DELETE=46;END=35;PGDN=34;UP=38;DOWN=40;LEFT=37;RIGHT=39;NUM LOCK=144;
	//CAPS LOCK=20;WINDOWS=91;ALT GR=17,18;RIGHT ALT=93;ESC=27;TAB=9;F1=112;F2=113;F3=114;F4=115;F5=116;F6=117;F7=118;F8=119;
	//F9=120;F10=121;F11=122;F12=123;PRINT;SCROLL=145;PAUSE=19;BACKSPACE=8;ENTER=13;
	function fnCharCode(nC,sL){
		var bRet=false,iKeyCode=bIE?nC.keyCode:nC.which;
		bRet=sL.indexOf(','+iKeyCode+',')!=-1?true:bRet;return bRet;}

	function fCheckVazio(vVariant){//Essa função retira os " " (espaço), &nbsp; (espaço), TAB e CRLF entre as palavras e verifica se o texto é vazio
		var vvaz=true;if(typeof vVariant=='undefined')return vvaz;
		if(typeof vVariant=='object'){
			if(vVariant.value!=''){//%0D e %0A=crlf; %A0 e %20=espaço; %09=TAB
				var vcri=eval('/(%20)/gi');if(vVariant.value.search(vcri)!=-1)return false;
				vcri=eval('/(%A0)/gi');if(vVariant.value.search(vcri)!=-1)return false;
				vcri=eval('/(%09)/gi');if(vVariant.value.search(vcri)!=-1)return false;
				vcri=eval('/(%0D%0A)/gi');if(vVariant.value.search(vcri)!=-1)return false;}}

		var vStr=typeof vVariant=='object'?vVariant.value:vVariant;
		vcri=eval('/('+unescape('%20')+')/gi');vStr=vStr.replace(vcri,'');
		vcri=eval('/('+unescape('%A0')+')/gi');vStr=vStr.replace(vcri,'');
		vcri=eval('/('+unescape('%09')+')/gi');vStr=vStr.replace(vcri,'');
		vcri=eval('/(%0D%0A)/gi');vStr=escape(vStr);vStr=vStr.replace(vcri,'');vStr=unescape(vStr);

		if (vStr!='')vvaz=false;vStr=null;return vvaz;}

	function fClrTxt(jvtxt){//Essa função retira todos os " " (espaço) e &nbsp; (espaço), TAB e CRLF das bordas do texto
		var jvtxttmp=jvtxt,jvexist=true;
		while(jvexist){
			jvexist=fTrimCRLF(jvtxttmp)[1];jvtxttmp=fTrimCRLF(jvtxttmp)[0];
			jvexist=fTrim(jvtxttmp)[1];jvtxttmp=fTrim(jvtxttmp)[0];}
		return jvtxttmp;}

	function fRTrim(jvtxt){
		var jvtxttmp=jvtxt,jvexist=false;if(jvtxttmp.length==0){return["",jvexist];}
		for(var i=(jvtxttmp.length-1);i>=0;i--){
			if(escape(jvtxttmp.substr(i,1))=="%A0"||escape(jvtxttmp.substr(i,1))=="%20"||escape(jvtxttmp.substr(i,1))=="%09"){//%A0 e %20 = espaço; %09 = tabulação
				if(!jvexist){jvexist=true;}jvtxttmp=jvtxttmp.substr(0,i);}
			else{break;}}
		return[jvtxttmp,jvexist];}

	function fLTrim(jvtxt){
		var jvtxttmp=jvtxt,jvexist=false;if(jvtxttmp.length==0){return["",jvexist];}
		for (var i=(jvtxttmp.length-1);i>=1;i--){
			if(escape(jvtxttmp.substr(0,1))=="%A0"||escape(jvtxttmp.substr(0,1))=="%20"||escape(jvtxttmp.substr(0,1))=="%09"){//%A0 e %20 = espaço; %09 = tabulação
				if(!jvexist){jvexist=true;}jvtxttmp=jvtxttmp.substr(1,i);}
			else{break;}}
		return[jvtxttmp,jvexist];}

	function fTrim(jvtxt){
		var jvtxttmp=jvtxt,jvexist=false;if(jvtxttmp.length==0){return["",jvexist];}
		jvexist=(fLTrim(jvtxttmp)[1]||fRTrim(jvtxttmp)[1]);jvtxttmp=fRTrim(fLTrim(jvtxttmp)[0])[0];
		return[jvtxttmp,jvexist];}

	function fRTrimCRLF(jvtxt){
		var jvtxttmp=jvtxt,jvexist=false;if(jvtxttmp.length==0){return["",jvexist];}
		for (var i=(jvtxttmp.length-2);i>=0;i--){
			if(escape(jvtxttmp.substr(i,2))=="%0D%0A"){//%0D e %0A = crlf
				if(!jvexist){jvexist=true;}jvtxttmp=jvtxttmp.substr(0,(i--));}
			else{break;}}
		return[jvtxttmp,jvexist];}

	function fLTrimCRLF(jvtxt){
		var jvtxttmp=jvtxt,jvexist=false;if(jvtxttmp.length==0){return["",jvexist];}
		for (var i=(jvtxttmp.length-1);i>=2;i--){
			if(escape(jvtxttmp.substr(0,2))=="%0D%0A"){//%0D e %0A = crlf 
				if(!jvexist){jvexist=true;}jvtxttmp=jvtxttmp.substr(2,--i);}
			else{break;}}
		return[jvtxttmp,jvexist];}

	function fTrimCRLF(jvtxt){
		var jvtxttmp=jvtxt,jvexist=false;if(jvtxttmp.length==0){return["",jvexist];}
		jvexist=(fLTrimCRLF(jvtxttmp)[1]||fRTrimCRLF(jvtxttmp)[1])
		jvtxttmp=fRTrimCRLF(fLTrimCRLF(jvtxttmp)[0])[0];return[jvtxttmp,jvexist];}

	function fnSplitTEXTAREA(oTAREA){
		var nByteLimit=102399,sT1=new String;sT1=oTAREA.value;
		if(sT1.length>nByteLimit){
			oTAREA.value=sT1.substr(0,nByteLimit);sT1=sT1.substr(nByteLimit);
			while(sT1.length>0){
				var oT1=document.createElement('TEXTAREA');
				oT1.name=oTAREA.name;oT1.value=sT1.substr(0,nByteLimit);
				oTAREA.form.appendChild(oT1);oT1=null;
				sT1=sT1.substr(nByteLimit);}}nByteLimit=null;sT1=null;}

	function fnFormToDB(sVal,sTP){
		var sT1=sVal;
		if(sT1!=''){
			switch(sTP){
				case 'txt':sT1="'"+sT1.replace(/^[\s]*|[\s]*$/gi,'')+"'";break;
				case 'num':sT1=sT1.replace(/\./gi,'');sT1="'"+sT1.replace(/,/gi,'.')+"'";break;
				case 'dat':sT1="'"+sT1.replace(/^(\d{2})[^\d](\d{2})[^\d](\d{2,4})$/,'$1-$2-$3')+"'";break;
				case 'dat_usa':sT1="'"+sT1.replace(/^(\d{2})[^\d](\d{2})[^\d](\d{2,4})$/,'$2-$1-$3')+"'";break;
				case 'dat_mdy':sT1="'"+sT1.replace(/^(\d{2})[^\d](\d{2})[^\d](\d{2,4})$/,'$2-$1-$3')+"'";break;
				case 'dat_ymd':sT1="'"+sT1.replace(/^(\d{2})[^\d](\d{2})[^\d](\d{2,4})$/,'$3-$2-$1')+"'";break;}}
		else{sT1="'null'";}
		return sT1;}

	function fnDBToForm(sVal){
		var sT1=sVal==null?'':sVal;return sT1;}
}