function getHTTPObject() // PUT IN SOME COMMON LIB
   {
		var xmlhttp;  // The variable that makes Ajax possible!
		try
		{
			xmlhttp = new XMLHttpRequest(); // Opera 8.0+, Firefox, Safari
		}
		catch (e)
		{
			try// Internet Explorer Browsers
			{
				xmlhttp = new ActiveXObject('Msxml2.XMLHTTP');
			}
			catch (e)
			{
				try
				{
					xmlhttp = new ActiveXObject('Microsoft.XMLHTTP');
				}
				catch (e)
				{					
					alert('Object Not Created!'); // Something went wrong
					return false;
				}
			}
		}
		return xmlhttp;
	}
    function showCalendar(flag)
	{
		function handleHttpResponse()
		{    
			if (http.readyState == 4) 
			{ 
				if(http.status==200)
				{ 
					var results=http.responseText; 
					var CArray = new Array();
					CArray = results.split('|||');

					document.getElementById('divCal').innerHTML=results;

				}
			}
		}

		var date_cycle = document.cform.date.value;
		var cycle = document.cform.cycle.value;
		var luteal = document.cform.luteal.value;
        document.cform.dateCurrDisp.value=document.cform.date.value;

        if(flag == 'f')
		   var url =mic_url+'fertility_calendar.php?showmode=cal&date_cycle='+date_cycle+'&cycle='+cycle+'&luteal='+luteal; // The server-side script 
		else if(flag == 'o')
		   var url =mic_url+'ovulation_Calculator.php?showmode=cal&date_cycle='+date_cycle+'&cycle='+cycle+'&luteal='+luteal; // The server-side script 
		else if(flag == 'd')
		   var url =mic_url+'duedate_Calculator.php?showmode=cal&date_cycle='+date_cycle+'&cycle='+cycle+'&luteal='+luteal; // The server-side script 

//alert(url);			
		var http = getHTTPObject(); // We create the HTTP Object 
		http.open('GET', url, true); 
		http.onreadystatechange = handleHttpResponse;
		http.send(null);    
	}

  function FertilityCalendar()
   {  
	   var strDate = document.getElementById('startFDate').value;
	   if(strDate == "")
	   {
		   alert("Please calculate your ovulation details first.");
		   return false;
	   }
	    function handleHttpResponse()
		{    
			if (http.readyState == 4) 
			{ 
				if(http.status==200)
				{ 
					var results=http.responseText; 
					document.getElementById('divCal').innerHTML=results;

				}
			}
		}
		 var url =mic_url+'fertility_calendar.php?showmode=cal&date_cycle='+strDate; 
		 var http = getHTTPObject(); // We create the HTTP Object 
		 http.open('GET', url, true); 
		 http.onreadystatechange = handleHttpResponse;
		 http.send(null);  
	   
   }
    function showEventDiary()
	{
		location.href = "../event/list.php";
	}
   function showCalendarOther(flag)
	{
		function handleHttpResponse()
		{    
			if (http.readyState == 4) 
			{ 
				if(http.status==200)
				{ 
					var results=http.responseText; 
					var CArray = new Array();
					CArray = results.split('|||');
                    document.cform.dateCurrDisp.value=CArray[1];
					document.getElementById('divCal').innerHTML=CArray[0];

				}
			}
		}
		if(document.cform.dateCurrDisp.value == '')
         document.cform.dateCurrDisp.value=document.cform.date.value;

		var date_cycle = document.cform.dateCurrDisp.value;
		var cycle = document.cform.cycle.value;
		var luteal = document.cform.luteal.value;


		var url =mic_url+'fertility_calendar.php?showmode=cal&date_cycle='+date_cycle+'&cycle='+cycle+'&luteal='+luteal+'&flag='+flag; // The server-side script 
		var http = getHTTPObject(); // We create the HTTP Object 
		http.open('GET', url, true); 
		http.onreadystatechange = handleHttpResponse;
		http.send(null);    
	}
    function showpCalendar(flag)
	{
		function handleHttpResponse()
		{    
			if (http.readyState == 4) 
			{ 
				if(http.status==200)
				{ 
					var results=http.responseText; 
					document.getElementById('divCal').innerHTML=results;
//alert(results);
				}
			}
		}

		var date_cycle = document.cform.date.value;
        document.cform.dateCurrDisp.value=document.cform.date.value;

	   var url =mic_url+'pregnancy_calender.php?showmode=cal&date_cycle='+date_cycle; // The server-side script 

//alert(url);			
		var http = getHTTPObject(); // We create the HTTP Object 
		http.open('GET', url, true); 
		http.onreadystatechange = handleHttpResponse;
		http.send(null);    
	}
    function showImmuDueDates(theForm,DtOfBirthDD)
	{
		function handleHttpResponse()
		{    
			if (http.readyState == 4) 
			{ 
				if(http.status==200)
				{ 
					var results=http.responseText; 
//alert(results);
					var CArray = new Array();
					CArray = results.split('|');
					for(var i=0,j=2;i < CArray.length;i++,j++)
					{
                    theForm.elements[j].value = CArray[i];
					}
                    //theForm.elements[3].value = CArray[1];

				}
			}
		}

		var url =mic_url+'/babyimmunization_calendar.php?showmode=cal&date_birth='+DtOfBirthDD; // The server-side script 
		var http = getHTTPObject(); // We create the HTTP Object 
		http.open('GET', url, true); 
		http.onreadystatechange = handleHttpResponse;
		http.send(null);    
	}

	function showImmuCal(theForm){
		if (theForm.DtOfBirthDD.value == "")
		{
			alert("Please enter the Birth Date.");
			theForm.DtOfBirthDD.focus();
			return false;
		}
        showImmuDueDates(theForm,theForm.DtOfBirthDD.value);
	}