//**************************************************//
//**  											  **//	
//**  RUN Functions - Novartis Farmaceuticas, S.L **// 
//**			Version 1.0, 2007				  **//	
//**  		PLEASE DO NOT MODIFY THIS FILE		  **//	
//**  											  **//	
//**************************************************//

//** URL Base for all RUN functions
var URL_BASE = "http://www.gestionsalud.net/RUN/";


//** Open window for each RUN function
function RUNAction(name_action, param1)
{

	switch(name_action)
	{
		case "new_account":

			if(param1=='' || param1==undefined)
			{
				alert("Error en la URL de acceso 001");
				return false;
			}
			var url_action = URL_BASE + "run_register.aspx?url_id=" + param1;
		
			window.open(url_action, "RUN_Form", "toolbar=no,width=650,height=700,menubar=no,scrollbars=yes,resizable=yes,alwaysRaised=yes");
			break;
			
		case "change_account":
			if(param1=='' || param1==undefined)
			{
				alert("Error en la URL de acceso 002");
				return false;
			}
			var url_action = URL_BASE + "run_update_account.aspx?webuserid=" + param1;		
			window.open(url_action, "RUN_Form", "toolbar=no,width=650,height=700,menubar=no,scrollbars=yes,resizable=yes,alwaysRaised=yes");
			break;
				
		case "delete_account":			
			var url_action = URL_BASE + "run_delete_account.aspx";		
			window.open(url_action, "RUN_Form", "toolbar=no,width=650,height=420,menubar=no,scrollbars=yes,resizable=yes,alwaysRaised=yes");
			break;		
		
		case "change_password":			
			var url_action = URL_BASE + "run_change_pass.aspx";		
			window.open(url_action, "RUN_Form", "toolbar=no,width=650,height=500,menubar=no,scrollbars=yes,resizable=yes,alwaysRaised=yes");
			break;	
			
		case "get_password":			
			var url_action = URL_BASE + "run_forget_pass.aspx";		
			window.open(url_action, "RUN_Form", "toolbar=no,width=650,height=400,menubar=no,scrollbars=yes,resizable=yes,alwaysRaised=yes");
			break;	
			
		case "cancel_infomail":			
			var url_action = URL_BASE + "run_not_infomail.aspx";		
			window.open(url_action, "RUN_Form", "toolbar=no,width=650,height=420,menubar=no,scrollbars=yes,resizable=yes,alwaysRaised=yes");
			break;	
	}
}






/** XHConn - Simple XMLHTTP Interface - bfults@gmail.com - 2005-04-08        **
 ** Code licensed under Creative Commons Attribution-ShareAlike License      **
 ** http://creativecommons.org/licenses/by-sa/2.0/                           **/
function XHConn()
{
  var xmlhttp, bComplete = false;
  try { xmlhttp = new ActiveXObject("Msxml2.XMLHTTP"); }
  catch (e) { try { xmlhttp = new ActiveXObject("Microsoft.XMLHTTP"); }
  catch (e) { try { xmlhttp = new XMLHttpRequest(); }
  catch (e) { xmlhttp = false; }}}
  if (!xmlhttp) return null;
  this.connect = function(sURL, sMethod, sVars, fnDone)
  {
    if (!xmlhttp) return false;
    bComplete = false;
    sMethod = sMethod.toUpperCase();	
    try {
      if (sMethod == "GET")
      {      
        xmlhttp.open(sMethod, sURL+"?"+sVars, true);
        sVars = "";        
      }
      else
      {
        xmlhttp.open(sMethod, sURL, true);
        xmlhttp.setRequestHeader("Method", "POST "+sURL+" HTTP/1.1");
        xmlhttp.setRequestHeader("Content-Type",
          "application/x-www-form-urlencoded");
      }
      
      xmlhttp.onreadystatechange = function(){      		
        if (xmlhttp.readyState == 4 && !bComplete)
        {
          bComplete = true;          
          fnDone(xmlhttp);          
        }};
      xmlhttp.send(sVars);
    }    
    catch(z) { return false; }    
    return true;
  };
  return this;
}