Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)
Paste
Pasted as Plain Text by x ( 13 years ago )
SELECT HastaNo, HastaAdi, Cinsiyet, Yas, TO_CHAR(AmeliyatBasTarihi, 'dd/mm/yyyy') AmeliyatTarihi,
Ameliyatlar, GirisimNo, Antibiyotik, AntibiyotikKategori,
(SELECT COUNT(*)
FROM HASTA_ORDER_ISLEMLERI Hoi, HASTA_ORDER_UYGULAMA hou
WHERE hoi.HastaNo = HastaNo
AND hoi.HizmetKodu = IlacKodu
AND hou.UygulamaTarihi < AmeliyatBasTarihi
AND hou.OrderIslemNo = hoi.OrderIslemNo
AND hoi.Statu <> 3
AND hou.Statu = 1) AmeliyattanOnce,
(SELECT COUNT(*)
FROM STOKLAR s
WHERE s.DepoKodu = CikanDepoKodu
AND s.StokKodu = CikanStokKodu
AND s.StokTipi IN (2, 3)) AmeliyatAninda,
(SELECT COUNT(*)
FROM HASTA_ORDER_ISLEMLERI Hoi, HASTA_ORDER_UYGULAMA hou
WHERE hoi.HastaNo = HastaNo
AND hoi.HizmetKodu = IlacKodu
AND hou.UygulamaTarihi > AmeliyatBasTarihi
AND hou.OrderIslemNo = hoi.OrderIslemNo
AND hoi.Statu <> 3
AND hou.Statu = 1) AmeliyattanSonra
FROM (SELECT hbil.HastaNo, GetIsim(hbil.Adi, hbil.SoyAdi, hbil.Ikinciadi) HastaAdi, hbil.Cinsiyet,
CalcAgeAsNumber(hbil.DogumTarihi, MIN(ha.AmeliyatBasTarihi)) Yas,
MIN(ha.AmeliyatBasTarihi) AmeliyatBasTarihi,
AGG_CONCAT(GethizmetAdi(ha.AmeliyatKodu)) Ameliyatlar, ha.GirisimNo,
il.IlacAdi Antibiyotik, iak.AntibiyotikKategoriAdi AntibiyotikKategori,
smh.CikanDepoKodu, smh.CikanStokKodu, il.IlacKodu
FROM HASTA_AMELIYATLARI ha, HASTA_BILGILERI hbil, STOK_MALZEME_HAREKETLERI smh,
HASTA_HIZMET hh, ILAC_BILGILERI Il, ILAC_ANTIBIYOTIK_KATEGORILERI iak
WHERE Ha.AmeliyatBasTarihi BETWEEN TO_DATE(&BaslangicTarihi;, 'dd/mm/yyyy hh24:mi:ss') AND
TO_DATE(&BitisTarihi;, 'dd/mm/yyyy hh24:mi:ss')
AND ha.UygulayanBolum = &BolumKodu; AND ha.Statu <> 'X'
AND ha.GirisimNo IS NOT NULL
AND hbil.HastaNo = ha.HastaNo
AND hh.HastaNo = smh.HastaNo
AND hh.HizmetSiraNo = smh.HizmetSiraNo
AND ha.HastaNo = hh.HastaNo
AND ha.BasvuruNo = hh.BasvuruNo
AND smh.KayitTarihi BETWEEN Ha.AmeliyatBasTarihi - 1 AND Ha.AmeliyatBitTarihi + 1
AND il.IlacKodu = smh.MalzemeKodu
AND il.AntibiyotikKategoriRefNo IS NOT NULL
AND il.AntibiyotikKategoriRefNo != 1
AND iak.AntibiyotikKategoriRefNo = il.AntibiyotikKategoriRefNo
GROUP BY ha.GirisimNo, il.IlacKodu, il.IlacAdi, smh.CikanDepoKodu, smh.CikanStokKodu,
iak.AntibiyotikKategoriAdi, hbil.HastaNo, hbil.Adi, hbil.Soyadi, hbil.IkinciAdi,
hbil.Cinsiyet, hbil.DogumTarihi)
Revise this Paste