/*******************************************
ajax uygulamalari icin genel bir sablon
form adini ve gerekli bilgileri gonderiyor
ilgili formda yapilan islem geri donduruluyor
*******************************************/
var xmlHttp
var isim=''
var tetkikler =new Array("901460","901500","901490","901750","906290","903400","900340","903990","902110","901520","530100","705140","900570","900900","903380","901760",
			"901580","902290","900560","907970","901940","904120","902210","907070","907430","907460","907590","901390",
			"901420","901220","901020","901040","901620","901600","900690","900691","900210","900200","900580","900890","903240")
function baslikHazirla(){
	var str = ''
	ajaxIslem('ANEMON_800a.php',str)
}
function readCookie(name) {
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}
function ajaxIslem(formAdi,str){
	isim=formAdi;
	xmlHttp=GetXmlHttpObject()
	
	if (xmlHttp==null) {
 		alert ("Browser uygulamayı desteklemiyor")
 	return
	}
    
	url=formAdi+"?q="+str
    xmlHttp.onreadystatechange=stateChanged
    xmlHttp.open("GET",url,true)
    xmlHttp.send(null)
}

function stateChanged(){
	var browser=navigator.appName;
	if (xmlHttp.readyState == 4 && (xmlHttp.status==200 || window.location.href.indexOf("http")==-1)) {
			if(isim=='ANEMON_000a.php'){
	   			document.getElementById("txtHint").innerHTML=xmlHttp.responseText
	   			}
	   		
	   		if(isim=='ANEMON_001a.php'){
				//document.getElementById("CEVAP_XML").innerHTML=xmlHttp.responseText;
				window.location='ANEMON_001.php?CEVAP_XML='+xmlHttp.responseText
				}
	   		if(isim=='ANEMON_100a.php'||isim=='ANEMON_101a.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='ANEMON_100b.php'){
				var str=xmlHttp.responseText
				var gelen = str.split('*')
				document.getElementById("ADRES_1").value=gelen[0];
				alert(gelen[1])
				}
	   		if(isim=='ANEMON_100c.php'){
				var str=xmlHttp.responseText
				var gelen = str.split('*')
				document.getElementById("DR_TCKIMLIKNO_SB").value=gelen[0]
				document.getElementById("DR_AD_SB").value=gelen[1]                                                        
				document.getElementById("ISLEM_ZAMANI_SB").value=gelen[2]
				document.getElementById("DR_IL_ADI_SB").value=gelen[3]
                document.getElementById("DR_ILCE_ADI_SB").value=gelen[4]
				alert('SB Diskinden Dönen Sonuç Bilgisi\r\n'+gelen[5])
				}
			if(isim=='ANEMON_100d.php'){
				document.getElementById("txtHint").innerHTML=xmlHttp.responseText;
				}
			if(isim=='ANEMON_111d.php'){
				document.getElementById("txtHint").innerHTML=xmlHttp.responseText;
				}
	   		if(isim=='ANEMON_101c.php'){
	   			var str=xmlHttp.responseText
				var gelen = str.split('*')
				if(gelen[8]==1){
					document.getElementById("TCKIMLIKNO2").value=gelen[0]
					document.getElementById("ADI2").value=gelen[1]                                                        
					document.getElementById("SOYADI2").value=gelen[2]
					document.getElementById("BABA_ADI2").value=gelen[3]
	                document.getElementById("ANNE_ADI2").value=gelen[4]
	                document.getElementById("DOGUM_TARIHI2").value=gelen[5]
	                document.getElementById("CINSIYETI2").value=gelen[6]
	                document.getElementById("DOGUM_YERI2").value=gelen[7]
	               alert('BİLGİ : Aranan Kişi Bilgileri Getirildi.\r\nKaydı Yapıldı / Güncellendi')
				}else {
					document.getElementById("ADI2").value=''                                                       
					document.getElementById("SOYADI2").value=''
					document.getElementById("BABA_ADI2").value=''
	                document.getElementById("ANNE_ADI2").value=''
	                document.getElementById("DOGUM_TARIHI2").value=''	                
	                document.getElementById("CINSIYETI2").value=''
	                document.getElementById("DOGUM_YERI2").value=''
					alert('BİLGİ : Aranan Kayıtlarda / Merniste BULUNAMADI !...\r\nMernis webServisleri Çalışmıyor olabilir')
				}
 				}
	   		if(isim=='ANEMON_111k.php'){
	   			var str=xmlHttp.responseText
				var gelen = str.split('*')
				if(gelen[8]==1){
					document.getElementById("TCKIMLIKNO").value=gelen[0]
					document.getElementById("ADI").value=gelen[1]                                                        
					document.getElementById("SOYADI").value=gelen[2]
					document.getElementById("BABA_ADI").value=gelen[3]
	                document.getElementById("DOGUM_TARIHI").value=gelen[5]
	                document.getElementById("CINSIYET").value=gelen[6]
	               alert('BİLGİ : Aranan Kişi Bilgileri Getirildi.\r\nKaydı Yapıldı / Güncellendi')
				}else {
					document.getElementById("ADI").value=''                                                       
					document.getElementById("SOYADI").value=''
					document.getElementById("BABA_ADI").value=''
	                document.getElementById("DOGUM_TARIHI").value=''	
	                document.getElementById("CINSIYET").value='0'
					alert('BİLGİ : Aranan Kayıtlarda / Merniste BULUNAMADI !...\r\nMernis webServisleri Çalışmıyor olabilir')
				}
 				}
	   		if(isim=='ANEMON_111l.php'){
	   			var str=xmlHttp.responseText
				var gelen = str.split('*')
				if(gelen[8]==1){
					document.getElementById("BV_TCKIMLIKNO").value=gelen[0]
					document.getElementById("BV_ADI").value=gelen[1]                                                        
					document.getElementById("BV_SOYADI").value=gelen[2]
	                document.getElementById("BV_DOGUM_TARIHI").value=gelen[5]
	               alert('BİLGİ : Aranan Kişi Bilgileri Getirildi.\r\nKaydı Yapıldı / Güncellendi')
				}else {
					document.getElementById("BV_ADI").value=''                                                       
					document.getElementById("BV_SOYADI").value=''
	                document.getElementById("BV_DOGUM_TARIHI").value=''	                
					alert('BİLGİ : Aranan Kayıtlarda / Merniste BULUNAMADI !...\r\nMernis webServisleri Çalışmıyor olabilir')
				}
 				}
	   		if(isim=='ANEMON_800a.php'){
				var str=xmlHttp.responseText
				var gelen = str.split('*')
				//document.ANEMON_800.submit();
				document.getElementById("txtHint").innerHTML=gelen[1]
				//alert(gelen[0])
				}
			
			if(isim=='ANEMON_800c.php'){
			    document.getElementById("txtICD").innerHTML=xmlHttp.responseText;
			    }
			if(isim=='ANEMON_111c.php'){
			    document.getElementById("txtICD").innerHTML=xmlHttp.responseText;
			    }
			if(isim=='ANEMON_111b.php'){
				var str = xmlHttp.responseText;
				var gelen = str.split('*')
				document.getElementById('BV_ADI').value = gelen[0]
				document.getElementById('BV_SOYADI').value = gelen[1]
				document.getElementById('BV_DOGUM_TARIHI').value = gelen[2]
				
			    }
			
			if(isim=='ANEMON_800d.php'){
				document.getElementById("txtHint").innerHTML=xmlHttp.responseText;
				}	
	
	   		if(isim=='ANEMON_800u.php'){
	   			var str=xmlHttp.responseText
	   				window.location='./ANEMON_000.php'
                    alert(str)
   				}

	   		if(isim=='ANEMON_701c.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		
	   		if(isim=='ANEMON_702a.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='ANEMON_250a.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='ANEMON_300M.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='ANEMON_200a.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='ANEMON_111a.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='ANEMON_015M.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='anket_db.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
	   		if(isim=='su_db.php'){
				var str=xmlHttp.responseText
				alert(str)
				}
			if(isim=='ANEMON_800_arsivXML.php'){
				var txt =xmlHttp.responseText
						try
							{
							var txt =xmlHttp.responseText
							xmlDoc=loadXMLString(txt);
							
							var tbl = document.getElementById('kaydedilecekBulgular');
							while(tbl.rows.length>1)tbl.deleteRow(1);
							
							var tbl = document.getElementById('kaydedilecekTanilar');
							while(tbl.rows.length>1) tbl.deleteRow(1);
				
							
							var tbl = document.getElementById('kaydedilecekRecete');
							while(tbl.rows.length>1) tbl.deleteRow(1);
								
							document.getElementById("ANEMON_802").reset()

				//protokol bilgileri isleniyor
				
							x=xmlDoc.documentElement.childNodes[0].childNodes;
							
							for (i=0;i<x.length;i++)
								{
									var Id = x[i].nodeName
									if(x[i].childNodes[0]==undefined){
									 var IdDeger ='' 
								}else{
									 var IdDeger = x[i].childNodes[0].nodeValue
									}
									document.getElementById(Id).value=IdDeger
								}
								
				//bulgular kaydediliyor
					
					x=xmlDoc.documentElement.childNodes[1].childNodes;
					for(i=0;i<x.length;i++){
						asivdenBulguKaydet(x[i].childNodes[0].childNodes[0].nodeValue,x[i].childNodes[1].childNodes[0].nodeValue,x[i].childNodes[2].childNodes[0].nodeValue)
						}
									
				//tetkik istekleri sonuclar donuyor
								
							x=xmlDoc.documentElement.childNodes[2].childNodes;
								for (i=0;i<x.length;i++)
									{
										var Id = x[i].childNodes[0].nodeValue
										
										if(document.getElementById(Id) != undefined) document.getElementById(Id).checked=true
									}
							
				//tanilar aliniyor				
								
							x=xmlDoc.documentElement.childNodes[3].childNodes;
									for(i=0;i<x.length;i++)
										arsivdenIcdKaydet(x[i].childNodes[0].childNodes[0].nodeValue,x[i].childNodes[1].childNodes[0].nodeValue)
				
				//recete aliniyor
							x=xmlDoc.documentElement.childNodes[4].childNodes
				
							for(i=0;i<x.length;i++){ 
                               
				arsivdenIlacKaydet(x[i].childNodes[0].childNodes[0].nodeValue,x[i].childNodes[1].childNodes[0].nodeValue,x[i].childNodes[2].childNodes[0].nodeValue,x[i].childNodes[3].childNodes[0].nodeValue,x[i].childNodes[4].childNodes[0].nodeValue,x[i].childNodes[5].childNodes[0].nodeValue)
							}
				//rapor bilgileri aliniyor
				//tekrapor bilgisi geliyor
							
							x=xmlDoc.documentElement.childNodes[5].childNodes
							if(x.length>0){
								document.getElementById(x[0].childNodes[0].nodeValue).selected = true
								document.getElementById('r_BASLAMA_TARIHI').value = x[1].childNodes[0].nodeValue
								document.getElementById('r_BITIS_TARIHI').value = x[2].childNodes[0].nodeValue
								document.getElementById('r_RAPOR_METNI').value = x[3].childNodes[0].nodeValue
							}
							
				//sevk bilgileri varsa isleniyor
				
							x=xmlDoc.documentElement.childNodes[6].childNodes
							
								if(x.length>0)
								{
									document.getElementById('sevkYapildi').checked=true
									z.selectOption(z.getIndexByValue(x[0].childNodes[0].nodeValue))
								}
								else
								{
									document.getElementById('sevkYapildi').checked=false
								}
							
							alert('Okuma Başarıldı ! . . .\n\rArşiv Bilgileri Hazır. ');
							}
							catch(e) {alert(e.message)}
					
									}
							}
	}

function GetXmlHttpObject(){
	var xmlHttp=null;
	try
	 {
	 // Firefox, Opera 8.0+, Safari
	 xmlHttp=new XMLHttpRequest();
	 }
	catch (e)
	 {
	 //Internet Explorer
	 try
	  {
	  xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
	  }
	 catch (e)
	  {
	  xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
	  }
	 }
	return xmlHttp;
}
/*
*	id si parametre olarak verilen tabloya 
*	gonderilen sayisal deger, aciklama ve silme dugmesi ekler
*	sayisal deger gorulmaz
*/
function tabloyaBilgiEkle(tabloId,sayisalDeger,sozelDeger){
    var yeni_satir = 1;
    var tablo = document.getElementById(tabloId);
    var sonrakiSatir = tablo.tBodies[0].rows.length;
    num = sonrakiSatir;
   for(i = 0; i < num; i ++ )

   if(tablo.rows[i].cells[0].innerHTML == sayisalDeger)
   {
      alert('Bu Bilgi SecilmiÅŸ  => ' + tablo.rows[i].cells[1].innerHTML);
      yeni_satir = 0 ;
   }

   if(yeni_satir > 0)
	   {
	      var row = tablo.tBodies[0].insertRow(num);
	
	      var cell0 = row.insertCell(0);   
	      var textNode = document.createTextNode(sayisalDeger);
	      cell0.setAttribute('style', 'display:none');      
	      cell0.appendChild(textNode);

	      var cell1 = row.insertCell(1);                                              
	      var textNode = document.createTextNode(sozelDeger);
	      cell1.appendChild(textNode);
	      
	      var cell2 = row.insertCell(2);
  			var btnEl = document.createElement('input');
		      btnEl.setAttribute('type', 'button');
		      btnEl.setAttribute('value', 'Sil');
		      btnEl.setAttribute('class', 'edit');
		      btnEl.onclick = function ()
		      {
		         deleteCurrentRow(this)
		      }
		      cell2.appendChild(btnEl);
	   }

}

function deleteCurrentRow(obj)
{
   var delRow = obj.parentNode.parentNode;
   var tablo = delRow.parentNode.parentNode;
   var rIndex = delRow.sectionRowIndex;
   var rowArray = new Array(delRow);
   deleteRows(rowArray);
}

function deleteRows(rowObjArray)
{
   for (var i = 0; i < rowObjArray.length; i ++ )
   {
      var rIndex = rowObjArray[i].sectionRowIndex;
      rowObjArray[i].parentNode.deleteRow(rIndex);
   }
}

function bulguKaydet(num, gelen, bulguKodu, bulguAdi, nesneTipi, degerListesi)
{
   var yeni_satir = 1 ;
   var tablo = document.getElementById(gelen);
   var sonrakiSatir = tablo.tBodies[0].rows.length;
   num = sonrakiSatir;

   for(i = 0; i < num; i ++ )
   if(tablo.rows[i].cells[0].innerHTML == bulguKodu)
   {
      alert(tablo.rows[i].cells[0].innerHTML+' bulgusu deÄŸerlendirilmiÅŸ !..');
      yeni_satir = 0 ;
   }
   if(yeni_satir > 0)
   {
      var row = tablo.tBodies[0].insertRow(num);

      var cell0 = row.insertCell(0);                                              
      var textNode = document.createTextNode(bulguKodu);
      cell0.setAttribute("style", "display:none");
      cell0.appendChild(textNode);

      var cell1 = row.insertCell(1);
      var textNode = document.createTextNode(bulguAdi);
      cell1.appendChild(textNode);
    if(nesneTipi=='resim'){
          var cell2 = row.insertCell(2);
          cell2.setAttribute("align", "center");    
          cell2.innerHTML = '<img src="./img/'+degerListesi+'" width="16" height="16" />';
    }
    if(nesneTipi=='input'){
              var cell2 = row.insertCell(2);
              var btnEl = document.createElement('input');
              var textNode = document.createTextNode(degerListesi);
               btnEl.setAttribute('type', 'input');
               btnEl.setAttribute('id', bulguKodu);
               btnEl.setAttribute('name', bulguKodu);
               btnEl.setAttribute('value', '');
               btnEl.setAttribute('class', 'edit');
               btnEl.setAttribute('size', '10');
            cell2.appendChild(btnEl);  
            cell2.appendChild(textNode);
    }

    if(nesneTipi=='select'){
          var liste = degerListesi.split(',');
          var cell2 = row.insertCell(2);
          var oSelect = document.createElement("select");
          oSelect.setAttribute("class", "edit" );
          oSelect.setAttribute("id", bulguKodu );
          oSelect.setAttribute("name", bulguKodu );
          for(i = 0; i < liste.length; i ++ )
          {
             var oOption = document.createElement("OPTION");
             var t = document.createTextNode(liste[i]);
             oOption.setAttribute("value", i);
             oOption.appendChild(t);
             oSelect.appendChild(oOption);
          }

          cell2.appendChild(oSelect);
            }
              var cell3 = row.insertCell(3);
              var btnEl = document.createElement('input');
              btnEl.setAttribute('type', 'button');
              btnEl.setAttribute('value', 'Sil');
              btnEl.setAttribute('class', 'edit');
              btnEl.onclick = function ()
              {
                 deleteCurrentRow(this)
              }
              cell3.appendChild(btnEl);
           }
}

function asivdenBulguKaydet(bulguKodu, bulguAdi, bulguDegeri)
{
   var yeni_satir = 1 ;
   var tablo = document.getElementById('kaydedilecekBulgular');
   var sonrakiSatir = tablo.tBodies[0].rows.length;
   num = sonrakiSatir;

      var row = tablo.tBodies[0].insertRow(num);

      var cell0 = row.insertCell(0);                                              
      var textNode = document.createTextNode(bulguKodu);
      cell0.setAttribute("style", "display:none");
      cell0.appendChild(textNode);

      var cell1 = row.insertCell(1);
      var textNode = document.createTextNode(bulguAdi);
      cell1.appendChild(textNode);
      
      var cell2 = row.insertCell(2);
      var textNode = document.createTextNode(bulguDegeri);
      cell2.appendChild(textNode);

   
      var cell3 = row.insertCell(3);
      var btnEl = document.createElement('input');
      btnEl.setAttribute('type', 'button');
      btnEl.setAttribute('value', 'Sil');
      btnEl.setAttribute('class', 'edit');
      btnEl.onclick = function ()
      {
         deleteCurrentRow(this)
      }
      cell3.appendChild(btnEl);
}

/********************************
secilen teshisi nesnesine atmayı yapar
********************************/
        function icdKaydet(){
		    var birinciNesne = document.getElementById("SecilecekIcd");
		    var selectedItem = birinciNesne.selectedIndex;
		    var icdAd = birinciNesne.options[selectedItem].text;
		    var icdKod = birinciNesne.options[selectedItem].value;            
		    var yeni_satir = 1 ;
		    var tablo = document.getElementById('kaydedilecekTanilar');
		    var sonrakiSatir = tablo.tBodies[0].rows.length;
		    num = sonrakiSatir;
		
		   for(i = 0; i < num; i ++ )
		   
		   if(tablo.rows[i].cells[0].innerHTML == icdKod)
		   {
		      alert('Bu Tani Var  => ' + tablo.rows[i].cells[1].innerHTML);
		      yeni_satir = 0 ;
		   }
			   if(yeni_satir > 0)
			   {
			      var row = tablo.tBodies[0].insertRow(num);
			
			      var cell0 = row.insertCell(0);                                              
			      var textNode = document.createTextNode(icdKod);
			      cell0.appendChild(textNode);
	
			      var cell1 = row.insertCell(1);                                              
			      var textNode = document.createTextNode(icdAd);
			      cell1.appendChild(textNode);
			      
			      var cell2 = row.insertCell(2);
	      			var btnEl = document.createElement('input');
				      btnEl.setAttribute('type', 'button');
				      btnEl.setAttribute('value', 'Sil');
				      btnEl.setAttribute('class', 'edit');
				      btnEl.onclick = function ()
				      {
				         deleteCurrentRow(this)
				      }
				      cell2.appendChild(btnEl);
			   }
        }

    function arsivdenIcdKaydet(GELEN_icdKod,GELEN_icdAd){
		var icdKod = GELEN_icdKod;
		var icdAd = GELEN_icdAd;           
		var yeni_satir = 1 ;
		var tablo = document.getElementById('kaydedilecekTanilar');
		var sonrakiSatir = tablo.tBodies[0].rows.length;
		num = sonrakiSatir;
		
		var row = tablo.tBodies[0].insertRow(num);
		
		var cell0 = row.insertCell(0);                                              
		var textNode = document.createTextNode(icdKod);
		cell0.appendChild(textNode);
		
		var cell1 = row.insertCell(1);                                              
		var textNode = document.createTextNode(icdAd);
		cell1.appendChild(textNode);
		
		var cell2 = row.insertCell(2);
		var btnEl = document.createElement('input');
			btnEl.setAttribute('type', 'button');
			btnEl.setAttribute('value', 'Sil');
			btnEl.setAttribute('class', 'edit');
			btnEl.onclick = function (){deleteCurrentRow(this)}
		cell2.appendChild(btnEl);
    }
		
function ilacKaydet(){
    var birinciNesne = document.getElementById("SecilecekIlaclar");
    var selectedItem = birinciNesne.selectedIndex;
    var selectedText = birinciNesne.options[selectedItem].text;
    var loincKod = birinciNesne.options[selectedItem].value;            
    var yeni_satir = 1 ;
    var tablo = document.getElementById('kaydedilecekRecete');
    var sonrakiSatir = tablo.tBodies[0].rows.length;
    num = sonrakiSatir;
/*
MedikalKullanimSekliKod
MedikalDozBirimKod
MedikalDozBirimAd
DozDeger
*/
  var ilacUygulamaValue = new Array(88, 422, 93, 421, 94, 89, 92, 425, 96, 424, 95, 98, 99,423, 90, 91, 97,426);
  var ilacUygulamaText  = new Array('Ağızdan (Oral)', 'Ağız içi', 'Burun içi (İntranazal)', 'Cilt üzerine (Epidermal)',
    'Dış Kulak Yolu', 'Dil Altı (Sublingual)', 'Göz üzerine', 'İnhalasyon', 'İntra Dermal', 'İntra Müsküler', 'İntra Vajinal',
    'İntra Venöz', 'Kalp içi', 'Kolon', 'Rektal', 'Solunum Yolu', 'Subkutan', 'Trans Dermal');

  var ilacDozValue = new Array(428,429,430,431,432,433,434,435,436,437,438,0);
  var ilacDozText = new Array('1X1', '2X1', '3X1', '4X1', '1X2', '2X2', '3X2', 'Haftada 1', '2 Haftada 1', '3 Haftada 1', 'Günde Yarim','');

  var ilacMiktarValue = new Array(1,2,3,4,5,6,7,8,9,10,0);
  var ilacMiktarText = new Array('1 kutu','2 kutu','3 kutu','4 kutu','5 kutu','6 kutu','7 kutu','8 kutu','9 kutu','10 kutu','');

   for(i = 0; i < num; i ++ )
       if(tablo.rows[i].cells[0].innerHTML == loincKod)
       {
          alert('Bu İlaç Reçetede Var  => ' + tablo.rows[i].cells[0].innerHTML);
          yeni_satir = 0 ;
       }

   if(yeni_satir > 0)
   {
      var row = tablo.tBodies[0].insertRow(num);
      var cell0 = row.insertCell(0);                                              
      var textNode = document.createTextNode(loincKod);
      cell0.setAttribute("style", "display:none");
      cell0.appendChild(textNode);

      var cell1 = row.insertCell(1);
      var textNode = document.createTextNode(selectedText);
      cell1.appendChild(textNode);
          var cell2 = row.insertCell(2);
          var oSelect = document.createElement("select");
          oSelect.setAttribute("class", "edit" );
          oSelect.setAttribute("id", 'ilacUygulamaSekli_'+loincKod);
          for(i = 0; i < ilacUygulamaValue.length; i ++ )
          {
             var oOption = document.createElement("OPTION");
             var t = document.createTextNode(ilacUygulamaText[i]);
             oOption.setAttribute("value", ilacUygulamaValue[i]);
             oOption.appendChild(t);
             oSelect.appendChild(oOption);
          }

          cell2.appendChild(oSelect);
          
          var cell3 = row.insertCell(3);
          var oSelect = document.createElement("select");
          oSelect.setAttribute("class", "edit" ); 
          oSelect.setAttribute("id", 'ilacDozu_'+loincKod);
          for(i = 0; i < ilacDozValue.length; i ++ )
          {
             var oOption = document.createElement("OPTION");
             var t = document.createTextNode(ilacDozText[i]);
             oOption.setAttribute("value", ilacDozValue[i]);
             oOption.appendChild(t);
             oSelect.appendChild(oOption);
          }

          cell3.appendChild(oSelect);         
          
          //ELLE GÝRÝLEN REÇETE
          var cell4 = row.insertCell(4);
          var giris = document.createElement('input');
          giris.setAttribute('type', 'input');
          giris.setAttribute("id", 'giris_'+loincKod);
          giris.setAttribute('class', 'edit');
          
          cell4.appendChild(giris);
          
          var cell5 = row.insertCell(5);
          var oSelect = document.createElement("select");
          oSelect.setAttribute("class", "edit" ); 
          oSelect.setAttribute("id", 'ilacMiktari_'+loincKod);
          for(i = 0; i < ilacMiktarValue.length; i ++ )
          {
             var oOption = document.createElement("OPTION");
             var t = document.createTextNode(ilacMiktarText[i]);
             oOption.setAttribute("value", ilacMiktarValue[i]);
             oOption.appendChild(t);
             oSelect.appendChild(oOption);
          }

          cell5.appendChild(oSelect);         

          
          
      var cell6 = row.insertCell(6);
      var btnEl = document.createElement('input');
      btnEl.setAttribute('type', 'button');
      btnEl.setAttribute('value', 'Sil');
      btnEl.setAttribute('class', 'edit');
      btnEl.onclick = function ()
      {
         deleteCurrentRow(this)
      }
      cell6.appendChild(btnEl);
      
     
   }
}     

function arsivdenIlacKaydet(ilacKodu, ilacAdi, kullanimSekli, birimDoz, dozDeger,dozAdi){
	
	var loincKod = ilacKodu;
	var selectedText = ilacAdi;
    var tablo = document.getElementById('kaydedilecekRecete')
    var num = tablo.tBodies[0].rows.length
    var yeni_satir = 1

	var ilacUygulamaValue = new Array(88, 422, 93, 421, 94, 89, 92, 425, 96, 424, 95, 98, 99,423, 90, 91, 97,426);
	var ilacUygulamaText  = new Array('Ağızdan (Oral)', 'Ağız içi', 'Burun içi (İntranazal)', 'Cilt üzerine (Epidermal)',
	'Dış Kulak Yolu', 'Dil Altı (Sublingual)', 'Göz üzerine', 'İnhalasyon', 'İntra Dermal', 'İntra Müsküler', 'İntra Vajinal',
	'İntra Venöz', 'Kalp içi', 'Kolon', 'Rektal', 'Solunum Yolu', 'Subkutan', 'Trans Dermal');
	
	var ilacDozValue = new Array(428,429,430,431,432,433,434,435,436,437,438,0);
	var ilacDozText = new Array('1X1', '2X1', '3X1', '4X1', '1X2', '2X2', '3X2', 'Haftada 1', '2 Haftada 1', '3 Haftada 1', 'Günde Yarım','');
	
	var ilacMiktarValue = new Array(1,2,3,4,5,6,7,8,9,10,0);
	var ilacMiktarText = new Array('1 kutu','2 kutu','3 kutu','4 kutu','5 kutu','6 kutu','7 kutu','8 kutu','9 kutu','10 kutu','');

    
      var row = tablo.tBodies[0].insertRow(num);
      var cell0 = row.insertCell(0);                                              
      var textNode = document.createTextNode(loincKod);
      cell0.setAttribute("style", "display:none");
      cell0.appendChild(textNode);

      var cell1 = row.insertCell(1);
      var textNode = document.createTextNode(ilacAdi);
      cell1.appendChild(textNode);
      
      var cell2 = row.insertCell(2);
      var oSelect = document.createElement("select");
      oSelect.setAttribute("class", "edit" );
      oSelect.setAttribute("id", 'ilacUygulamaSekli_'+loincKod);
      for(var i = 0; i < ilacUygulamaValue.length; i ++ )
      {
         var oOption = document.createElement("OPTION")
         var t = document.createTextNode(ilacUygulamaText[i])
         oOption.setAttribute("value", ilacUygulamaValue[i]) 
         if(ilacUygulamaValue[i]==kullanimSekli) oOption.setAttribute("selected", "selected")
         oOption.appendChild(t);
         oSelect.appendChild(oOption);
      }

      cell2.appendChild(oSelect);
       
          var cell3 = row.insertCell(3);
          var oSelect = document.createElement("select");
          oSelect.setAttribute("class", "edit" ); 
          oSelect.setAttribute("id", 'ilacDozu_'+loincKod);
          for(var i = 0; i < ilacDozValue.length; i ++ )
          {
             var oOption = document.createElement("OPTION");
             var t = document.createTextNode(ilacDozText[i]);
             oOption.setAttribute("value", ilacDozValue[i]);
             if(ilacDozValue[i]==birimDoz) oOption.setAttribute("selected", "selected")
             oOption.appendChild(t);
             oSelect.appendChild(oOption);
          }

          cell3.appendChild(oSelect);         
          
           
            //ELLE GÝRÝLEN REÇETE
          var cell4 = row.insertCell(4);
          var giris = document.createElement('input');
          giris.setAttribute('type', 'input');
          if(birimDoz==0) giris.setAttribute("value",dozAdi);
          giris.setAttribute("id", 'giris_'+loincKod);
          giris.setAttribute('class', 'edit');
          
          cell4.appendChild(giris);
          
          
          var cell5 = row.insertCell(5);
          var oSelect = document.createElement("select");
          oSelect.setAttribute("class", "edit" ); 
          oSelect.setAttribute("id", 'ilacMiktari_'+loincKod);
          for(var i = 0; i < ilacMiktarValue.length; i ++ )
          {
             var oOption = document.createElement("OPTION");
             var t = document.createTextNode(ilacMiktarText[i]);
             oOption.setAttribute("value", ilacMiktarValue[i]);
             if(ilacMiktarValue[i]==dozDeger) oOption.setAttribute("selected", "selected");
             oOption.appendChild(t);
             oSelect.appendChild(oOption);
          }

          cell5.appendChild(oSelect);         

      var cell6 = row.insertCell(6);
      var btnEl = document.createElement('input');
      btnEl.setAttribute('type', 'button');
      btnEl.setAttribute('value', 'Sil');
      btnEl.setAttribute('class', 'edit');
      btnEl.onclick = function ()
      {
         deleteCurrentRow(this)
      }
      cell6.appendChild(btnEl);

  }


/****************************
birinci nesneden secileli ikici nesneye atar
****************************/

function aktar(birinciiNesne, ikinciNesne)
{
   var birinciNesneIslemi = document.getElementById(birinciiNesne);
   var ikinciNesneIslemi = document.getElementById(ikinciNesne);
   var boxLength = ikinciNesneIslemi.length;
   var selectedItem = birinciNesneIslemi.selectedIndex;
   var selectedText = birinciNesneIslemi.options[selectedItem].text;
   var selectedValue = birinciNesneIslemi.options[selectedItem].value;
   var i;
   var isNew = true;

   if (boxLength != 0)
   {
      for (i = 0; i < boxLength; i ++ )
      {
         thisitem = ikinciNesneIslemi.options[i].text;
         if (thisitem == selectedText)
         {
            isNew = false;
            break;
         }
      }
   }
   if (isNew)
   {
      newoption = new Option(selectedText, selectedValue, false, false);
      ikinciNesneIslemi.options[boxLength] = newoption;
   }
   birinciNesneIslemi.selectedIndex = - 1;

}

/****************************
ikincinesneden secileli cikarir
****************************/

function cikar(ikinciNesne)
{

   var ikinciNesneIslemi = document.getElementById(ikinciNesne);
   var boxLength = ikinciNesneIslemi.length;
   secilenDizi = new Array();
   var count = 0;
   for (i = 0; i < boxLength; i ++ )
   {
      if (ikinciNesneIslemi.options[i].selected)
      {
         secilenDizi[count] = ikinciNesneIslemi.options[i].value;
      }
      count ++ ;
   }
   var x;
   for (i = 0; i < boxLength; i ++ )
   {
      for (x = 0; x < secilenDizi.length; x ++ )
      {
         if (ikinciNesneIslemi.options[i].value == secilenDizi[x])
         {
            ikinciNesneIslemi.options[i] = null;
         }
      }
      boxLength = ikinciNesneIslemi.length;
   }
}

/************
*
*
*************/
function loadXMLString(txt)
{
try //Internet Explorer
  {
  xmlDoc=new ActiveXObject("Microsoft.XMLDOM");
  xmlDoc.async="false";
  xmlDoc.loadXML(txt);
  return xmlDoc;
  }
catch(e)
  {
  try //Firefox, Mozilla, Opera, etc.
    {
    parser=new DOMParser();
    xmlDoc=parser.parseFromString(txt,"text/xml");
    return xmlDoc;
    }
  catch(e) {alert(e.message)}
  }
return null;
}

function loadXMLDoc(dname)
{
var xmlDoc;
if (window.XMLHttpRequest)
  {
  xmlDoc=new window.XMLHttpRequest();
  xmlDoc.open("GET",dname,false);
  xmlDoc.send("");
  return xmlDoc.responseXML;
  }
// IE 5 and IE 6
else if (ActiveXObject("Microsoft.XMLDOM"))
  {
  xmlDoc=new ActiveXObject("Microsoft.XMLDOM");
  xmlDoc.async=false;
  xmlDoc.load(dname);
  return xmlDoc;
  }
alert("Error loading document");
return null;
} 
/*****************************
*poliklinik kayitlarinin epikrize 
*donusturen funksiyon
*****************************/
function poliklinikKayit()
{
	var nesne = document.getElementById('KOK_ID')
		var xml = '<PROTOKOL><PROTOKOL_BILGILERI><KOK_ID>'+nesne.value+'</KOK_ID>'
		nesne = document.getElementById('protokolTarihi')
	xml = xml+'<protokolTarihi>'+nesne.value+'</protokolTarihi>'
		var sene = nesne.value.substr(-4)
 		nesne = document.getElementById('protokolNo')
	xml = xml+'<protokolNo>'+sene+nesne.value+'</protokolNo>'
 		nesne = document.getElementById('TC_ID')
	xml = xml+'<tcId>'+nesne.value+'</tcId>'
		nesne = document.getElementById('sikayetleri')
	xml = xml+'<sikayetleri><![CDATA['+nesne.value+']]></sikayetleri>'
		nesne = document.getElementById('anamnezi')
	xml = xml+'<anamnezi><![CDATA['+nesne.value+']]></anamnezi>'
 	xml = xml+'</PROTOKOL_BILGILERI>'
	xml = xml+'<BULGULAR>';	
/*------------------------------------------------------------------------------
isaretlenmis fizik muayene bilgileri aliniyor
--------------------------------------------------------------------------------*/

 		nesne = document.getElementById('kaydedilecekBulgular')

          for(i=1; i<nesne.rows.length; i++){
          	
            var x=nesne.rows[i].cells;
            var nesneIsmi = x[0].innerHTML;
			var hucre = nesne.rows[i].cells[2].innerHTML;
			var deger = document.getElementById(nesneIsmi)
			
			if(!deger){
            	if(hucre.substring(0,4)!='<img')
            		var degeri = hucre;
            	else
            		var degeri = 'var'; 
            }else {if(deger.type=='select-one')
                           degeri = deger[deger.value].text; 
                         else 
                            degeri = deger.value;} 
            
			xml = xml+'<BULGU><A>'+nesneIsmi+'</A><B>'+nesne.rows[i].cells[1].innerHTML+'</B><C>'+degeri+'</C></BULGU>'
          }

/*------------------------------------------------------------------------------
isaretlenmis fizik muayene bilgileri sonu
--------------------------------------------------------------------------------*/
	xml = xml+'</BULGULAR><LABORATUVAR>';
/*------------------------------------------------------------------------------
istenmis tetkikler aliniyor
yeni bir tetkik eklendiginde yada cikarildiginda diziye yansitilacak
--------------------------------------------------------------------------------*/
		
		for(var i=0;i<tetkikler.length;i++){
			nesne = document.getElementById(tetkikler[i])
			if(nesne.checked)	xml = xml+'<TETKIK>'+tetkikler[i]+'</TETKIK>'
		}
/*------------------------------------------------------------------------------
istenmis tetkikler sonu
--------------------------------------------------------------------------------*/
	xml = xml+'</LABORATUVAR><TANILAR>'
/*------------------------------------------------------------------------------
bu prokolde konulmus teshis yada teshisler aliniyor
--------------------------------------------------------------------------------*/
nesne = document.getElementById('kaydedilecekTanilar')

          for(i=1; i<nesne.rows.length; i++){
  	       	var x=nesne.rows[i].cells;
          	xml = xml+'<TANI><A>'+x[0].innerHTML+'</A><B>'+x[1].innerHTML+'</B></TANI>'
          }
/*------------------------------------------------------------------------------
teshis yada teshislerin sonu
--------------------------------------------------------------------------------*/
	xml = xml+'</TANILAR><RECETE>'
/*------------------------------------------------------------------------------
recete bilgileri aliniyor
--------------------------------------------------------------------------------*/

 		nesne = document.getElementById('kaydedilecekRecete')

          for(i=1; i<nesne.rows.length; i++){
          	
            var x=nesne.rows[i].cells;
            var nesneIsmi = x[0].innerHTML
			var degerI = document.getElementById('ilacUygulamaSekli_'+nesneIsmi)
			var degerII = document.getElementById('ilacDozu_'+nesneIsmi)
			var degerIII = document.getElementById('ilacMiktari_'+nesneIsmi)
            if(degerII.value==0){
            var degerIV = document.getElementById('giris_'+nesneIsmi).value    
            }else{
            var degerIV =  degerII[degerII.selectedIndex].text;   
            } 
             
			
			xml = xml+'<ILAC><A>'+nesneIsmi+'</A><B>'+nesne.rows[i].cells[1].innerHTML+'</B><C>'+degerI.value+'</C><D>'+degerII.value+'</D><E>'+degerIII.value+'</E><F>'+degerIV+'</F></ILAC>'
          }

/*------------------------------------------------------------------------------
recete bilgi alimi sonu
--------------------------------------------------------------------------------*/	
	xml = xml+'</RECETE><RAPOR>'
/*------------------------------------------------------------------------------
tibbi rapor bilgileri aliniyor
--------------------------------------------------------------------------------*/
	if((document.getElementById('r_RAPOR_TURU').value > 0) &&
		(document.getElementById('r_BASLAMA_TARIHI').value != '') &&
 		(document.getElementById('r_BITIS_TARIHI').value != ''))
 		{
 			xml = xml+ '<A>'+document.getElementById('r_RAPOR_TURU').value+'</A>';
 			xml = xml+ '<B>'+document.getElementById('r_BASLAMA_TARIHI').value+'</B>';
 			xml = xml+ '<C>'+document.getElementById('r_BITIS_TARIHI').value+'</C>';
 			xml = xml+ '<D><![CDATA['+document.getElementById('r_RAPOR_METNI').value+']]></D>';
 		}
/*------------------------------------------------------------------------------
tibbi rapor bilgi alimi sonu
--------------------------------------------------------------------------------*/	
	xml = xml+'</RAPOR>'
	if((z.getSelectedValue()!=null) && (document.getElementById('sevkYapildi').checked)) 
	xml = xml+'<SEVK>'+z.getSelectedValue()+'</SEVK>' 
	else 
	xml = xml+'<SEVK></SEVK>'
	xml = xml+'</PROTOKOL>'
	//alert('\<\?xml version="1.0" encoding="UTF-8"\?\>'+xml)
	//xml ="\<\?xml version='1.0' encoding='UTF-8'\?\>"+xml
	
	nesne = document.getElementById('kaydedilecekTanilar')
	if(nesne.rows.length<2)
		alert('DİKKAT: Enaz bir tanı girmelisiniz !....')
	else 
		ajaxIslem('ANEMON_800u.php',xml)
}

/*------------------------------------------------------------------------------
LABORATUVAR istekleri 
panel panel bilgi alimi sonu
ekleme cıkarma icin 
	tetkikler dizisine bak
	fonksiyonları gozden gecir
	arayuzu kontrol et bir tanesinde dahi eksik uyumsuzluk olmasin
	loop krilince islem yarida kaliyor DÄ°KKAT !...................
--------------------------------------------------------------------------------*/	
function isaretleriTemizle(){
	
	for(var i=0;i<tetkikler.length;i++){
		document.getElementById(tetkikler[i]).checked=false
	}
}
function lipitKontrolu(){
	document.getElementById('902110').checked="checked"
	document.getElementById('902290').checked="checked"
	document.getElementById('901580').checked="checked"
	document.getElementById('903990').checked="checked"
}

function bobrekKontrolu(){
	document.getElementById('901940').checked="checked"
	document.getElementById('902210').checked="checked"
	document.getElementById('901750').checked="checked"
}

function karacigerKontrolu(){
	document.getElementById('900580').checked="checked"
	document.getElementById('900200').checked="checked"
	document.getElementById('900690').checked="checked"
	document.getElementById('900691').checked="checked"
}

function romatizmaKontrolu(){
	document.getElementById('901620').checked="checked"
	document.getElementById('900560').checked="checked"
	document.getElementById('900890').checked="checked"
	document.getElementById('907970').checked="checked"
		document.getElementById('900570').checked=false
		document.getElementById('900900').checked=false
		document.getElementById('903380').checked=false

}

function romatizmaKontroluO(){
	document.getElementById('900570').checked="checked"
	document.getElementById('900900').checked="checked"
	document.getElementById('903380').checked="checked"
	
		document.getElementById('901620').checked=false
		document.getElementById('900560').checked=false
		document.getElementById('900890').checked=false
		document.getElementById('907970').checked=false
}

function anemiKontrolu(){
	document.getElementById('901620').checked="checked"
	document.getElementById('901020').checked="checked"
	document.getElementById('901040').checked="checked"
}

function burusellaKontrolu(){
	document.getElementById('907070').checked="checked"
	document.getElementById('907460').checked="checked"
	document.getElementById('907430').checked="checked"
	document.getElementById('907590').checked="checked"
	document.getElementById('909290').checked="checked"
	document.getElementById('901420').checked="checked"
}

function biyokimyaRutin(){
	document.getElementById('903240').checked="checked"
	document.getElementById('900210').checked="checked"
	document.getElementById('901020').checked="checked"
	document.getElementById('901040').checked="checked"
	document.getElementById('901220').checked="checked"
	document.getElementById('901460').checked="checked"
	document.getElementById('901500').checked="checked"
	document.getElementById('901940').checked="checked"
	document.getElementById('902210').checked="checked"
	document.getElementById('904120').checked="checked"
	document.getElementById('900580').checked="checked"
	document.getElementById('900200').checked="checked"
	document.getElementById('901390').checked="checked"
	document.getElementById('900340').checked="checked"
	document.getElementById('902110').checked="checked"
	document.getElementById('903990').checked="checked"
	document.getElementById('901580').checked="checked"
	document.getElementById('902290').checked="checked"
	document.getElementById('900690').checked="checked"
}
/*--------------------------------------------------------------------------
 * hazırlanan receteyi printer e göndemek için hazırlar
 --------------------------------------------------------------------------*/
function receteCikar(gelen)
{
var v_TC_ID = gelen; 
 var recete = new Array();              
          var nesne = document.getElementById('kaydedilecekRecete');j=0;
          for(i=1; i<nesne.rows.length; i++){
            recete[j] =  nesne.rows[i].cells[0].innerHTML; 
            recete[j+1] =  nesne.rows[i].cells[1].innerHTML;
            var nesneId = 'ilacUygulamaSekli_'+recete[j] ;
            var deger = document.getElementById(nesneId); 
                recete[j+2] =  deger[deger.selectedIndex].value;
            var nesneId = 'ilacDozu_'+recete[j] ;
            var deger = document.getElementById(nesneId); 
                if(deger[deger.selectedIndex].value!=0){
                recete[j+3] =  deger[deger.selectedIndex].value;
                recete[j+4] =  deger[deger.selectedIndex].text;   
                }else{
            recete[j+3] =  deger[deger.selectedIndex].value;
            //alert(document.getElementById('giris_'+recete[j]).value);
           
            var nesneId = 'giris_'+recete[j] ;
            var deger = document.getElementById(nesneId);    
            recete[j+4] =  deger.value;  
              
                }
               
            var nesneId = 'ilacMiktari_'+recete[j] ;
            var deger = document.getElementById(nesneId); 
                recete[j+5] =  deger[deger.selectedIndex].value;
                j=j+6;
          }
       
          var icd10 = new Array();
             var nesne = document.getElementById('kaydedilecekTanilar');
            for(i=1; i<nesne.rows.length; i++) icd10[i-1] = nesne.rows[i].cells[0].innerHTML; 
          var protokolNo=document.getElementById('protokolNo').value;  
      window.open('../AHBS/AHBS_300d.php?q='+v_TC_ID+'anemon-tarzan'+recete+'anemon-tarzan'+icd10+'anemon-tarzan'+protokolNo);
}