var arrHTTPObjects = new Array();
var objRetorno = new Array();

function sMontaPOST(){
	var itmarray = '' ;
	var urlencoded = '';
	for (var i = 0; i < document.forms[0].elements.length; i++){
		if (document.forms[0].elements[i].name != ''){
			//alert(document.forms[0].elements[i].type);
			if (document.forms[0].elements[i].type == 'select-multiple') {
				
				for (var i2=0;i2<document.forms[0].elements[i].options.length;i2++){
					
					if (document.forms[0].elements[i].options[i2].selected){
							urlencoded += document.forms[0].elements[i].name + '='+ escape(document.forms[0].elements[i].options[i2].value);	


							if ((i2+1) < document.forms[0].elements[i].options.length){
							urlencoded += '&';
						}						
					}

				}

			}else if ((document.forms[0].elements[i].type == 'radio') || (document.forms[0].elements[i].type == 'checkbox'))  {
				
					
					if (document.forms[0].elements[i].checked){
							urlencoded += document.forms[0].elements[i].name + '='+ escape(document.forms[0].elements[i].value);	
							urlencoded += '&';
				
					}
		

			}else{

				urlencoded += document.forms[0].elements[i].name + '='+ escape(document.forms[0].elements[i].value);

			}


				if ((i+1) < document.forms[0].elements.length){
					urlencoded += '&';
				}
			}
	}
	//alert(urlencoded);
	return urlencoded;
};


function sCheckReadyState(pObjHTTPIndex,pRetorno){
	
	var arrayImagens = new Array();
	if (arrHTTPObjects[pObjHTTPIndex].readyState == 4) {
		
		var strResponse = arrHTTPObjects[pObjHTTPIndex].responseText.replace(/<script/gi, '<a class="jsclassCapital" style="visibility: hidden" ');
		strResponse = strResponse.replace(/script>/gi, 'a');
		
		if (pRetorno == 'SRC') {
		    
        			objRetorno[pObjHTTPIndex].innerHTML =  strResponse;
        			arrHTTPObjects[pObjHTTPIndex] = null;
        			
        			
        			//window.document.body.style.cursor = 'default';
        			
        			scripts = objRetorno[pObjHTTPIndex].getElementsByTagName('A');
        			var strJs = ''
        			for (var i = 0; i < scripts.length; i++) {
        				if (scripts[i].className == 'jsclassCapital')
        					strJs += scripts[i].innerHTML;
        			}
        			
        			imagens = objRetorno[pObjHTTPIndex].getElementsByTagName('IMG');
        			
        			for (var i = 0; i < imagens.length; i++) {
        			
        				if (imagens[i].src != ''){
        					arrayImagens[arrayImagens.length++] = imagens[i];
        					objImgIndex = arrayImagens.length - 1;
        					arrayImagens[objImgIndex].src = imagens[i].src;					
        					arrayImagens[objImgIndex] = null
        				}	
        					
        			}
        
        			objRetorno[pObjHTTPIndex] = null;
        			mensagemHTTP(false);
        			eval(strJs);
	    
	    }else if (pRetorno == 'VLR'){
	        
			arrHTTPObjects[pObjHTTPIndex] = null;
			eval(objRetorno[pObjHTTPIndex] + ' = \'' + strResponse + '\'');
			alert('--->' + objRetorno[pObjHTTPIndex] + ' = \'' + strResponse + '\'');	
			objRetorno[pObjHTTPIndex] = null;
			mensagemHTTP(false);				
				        
	        
		}else{
		
			arrHTTPObjects[pObjHTTPIndex] = null;
			objRetorno[pObjHTTPIndex] = null;	
			mensagemHTTP(false);				
			alert(strResponse);

		
		}
		

	}
	else {
		window.setTimeout(function(){sCheckReadyState(pObjHTTPIndex,pRetorno);}, 50);
	}	
}


function sEnvia(pId, pUrl, pTipo, pRetorno) {
  
	var objHTTPIndex;
	
	if (pRetorno == 'SRC'){
	    fTipoExecucao = true;
	    mensagemHTTP(true);
	}else{
	    fTipoExecucao = false;
	}	

	//window.document.body.style.cursor = 'wait';
	
	if (document.all) {
		var objHTTP = new ActiveXObject('MSXML2.XMLHTTP');
	}
	else {
		var objHTTP = new XMLHttpRequest();
	}
	
	arrHTTPObjects[arrHTTPObjects.length++] = objHTTP;
	objRetorno[objRetorno.length++] = pId;
	objHTTPIndex = arrHTTPObjects.length - 1;
	
  //alert(pTipo);
  
	if (pTipo == 'POST') {
    objHTTP.open('POST', pUrl, fTipoExecucao);
    objHTTP.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded;');
    objHTTP.send(sMontaPOST());		
	}else {
		objHTTP.open('GET', pUrl, fTipoExecucao);
		objHTTP.setRequestHeader('Content-Type','text/html; charset=iso-8859-1');
		objHTTP.send(null);
	}
	
		
	window.setTimeout(function(){sCheckReadyState(objHTTPIndex,pRetorno);}, 200);
	
}