//######### HTTP_POST FOR EXEC ON SERVER #####################################
// A.N.M.A.T.  -  INFORMATICA
// Ing. Igor Dedough September 12 2002
// #include < ... >
//############################################################################
function fnPOST(page)
{
 //alert(page);
 var dx=new ActiveXObject("Microsoft.XMLHTTP");
 dx.open('POST',page,false);
 dx.setRequestheader('Content-type','text-html');
 dx.send();
 if (dx.responseText.split("window.top.document.location='")[1])
 {
 	window.top.document.location = dx.responseText.split("window.top.document.location='")[1].split("'")[0];
 }
 else
 {
	 //alert("FROM INFORMIX: " + dx.responseText);
	 //debug_sql(dx.responseText);
	 return ConvToASCII(String(dx.responseText));
 }
}

function fnPOST3(pagina,xmlToSend)
{
//alert(pagina);
//alert(xmlToSend.xml);
 var dx=new ActiveXObject("Microsoft.XMLHTTP");
 dx.open('POST',pagina,false);
 dx.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
 dx.send(xmlToSend);
 if (dx.responseText.split("window.top.document.location='")[1])
 {
 	window.top.document.location = dx.responseText.split("window.top.document.location='")[1].split("'")[0];
 }
 else
 {
 	 /*
 	 alert ("la primera! ->" + dx.responseText);
 	 alert ("la segunda! ->" + String(dx.responseText));
 	 alert ("la tercera! ->" + ConvToASCII(String(dx.responseText)));
 	 */
 	 //alert(dx.responseText);
 	 //ErrorWindow(dx.responseText.split("||||||||||")[1]);
	 //alert("FROM INFORMIX: " + dx.responseText);
	 //debug_sql(dx.responseText);
	 //alert ("fnPOST3 ->" + ConvToASCII(String(dx.responseText)));
	 //return ConvToASCII(String(dx.responseText.split("||||||||||")[0]));
	 //alert("devuelvo ->" + ConvToASCII(String(dx.responseText)));
	 return ConvToASCII(String(dx.responseText));
 }
}
function fnPOST2(page)
{
 var dx=new ActiveXObject("Microsoft.XMLHTTP");
 var pagina = page.split("?")[0];
 var argumentos = page.split("?")[1];
 argumentos = replace(argumentos,' ','%20');
 argumentos = replace(argumentos, "Ñ", "#209")
 argumentos = replace(argumentos, "ñ", "#209")
 //alert("argumentos ->" + argumentos);
 dx.open('POST',pagina,false);
 dx.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
 dx.send(argumentos);
 if (dx.responseText.split("window.top.document.location='")[1])
 {
 	window.top.document.location = dx.responseText.split("window.top.document.location='")[1].split("'")[0];
 }
 else
 {
	 //alert("FROM INFORMIX: " + dx.responseText);
	 //debug_sql(dx.responseText);
	 return ConvToASCII(String(dx.responseText));
 }
}
function funcPOST(page,str_to_post)
{
	var dx=new ActiveXObject("Microsoft.XMLHTTP");
	dx.open('POST',page,false);
	dx.setRequestheader('Content-type','text-html');
	dx.send(String(str_to_post));
	/*
	dx.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
 	dx.send(xmlToSend);
 	*/
	return ConvToASCII(String(dx.responseText));
}
function replace(txt,smb1,smb2)
{
   var ret = '';
   var arrtxt;
   arrtxt = txt.split(smb1);
   smb1 = String(smb1);
   smb2 = String(smb2);
   txt = String(txt);
   for(i=0;i<txt.length;i++)
   {
     if(txt.charAt(i) == smb1){
       ret += smb2;
      }else{
       ret += txt.charAt(i);
     }    
   }
   return ret;
}
//---------------- REMOVE "error" ATTRIBUTE IF EQUAL = 0 ---------------------------
function parseERROR(xmlDc)
{
  //alert("parseERROR -> " + xmlDc.xml);
  //try{
	if(xmlDc.attributes.getNamedItem("error").value == 0)
	{
		xmlDc.removeAttribute("error");
		return 0;
	}
	else
	{
		var strERROR = 'Description: ' + xmlDc.firstChild.attributes.getNamedItem("Description").value + '\n'
					+ 'Help Context: ' + xmlDc.firstChild.attributes.getNamedItem("HelpContext").value + '\n'
					+ 'Help File: ' + xmlDc.firstChild.attributes.getNamedItem("HelpFile").value + '\n'
					+ 'Number: ' + xmlDc.firstChild.attributes.getNamedItem("Number").value + '\n'
					+ 'Source: ' + xmlDc.firstChild.attributes.getNamedItem("Source").value;
		alert("ERROR DE CARGA EN SERVIDOR!\n    ............................................................ \n" + strERROR + "\n    ............................................................");
		returnValue = false;
		return 1;
	}
  /*}catch(e){
    return 0;
  }*/
}
//--------------------------------------------------------------
function ErrorWindow(x)
{
	//alert(x);
	var w = showModalDialog("../../../common/includes/error_window.htm",x,"font-size:10px;dialogWidth: 600px;dialogHeight:350px;status: 0;edge: Raised;unadorned: yes;help: 0;scroll: 0"); 
}
//------------------------------------------------------------