Ali Şahan Blog Bir avuç SQL C# Oracle Lunix
Belirtilen sorgu ile Meddata yer alan iki kurum arasında ücret bazlı kıyaslama yapıla bilir
- :birincikurum_kodu
- kiyaslamak istediginiz birinci kurumun kodu
- :karsilacak_kurum_kodu
- kiyaslamak istediginiz ikinci kurumun kodu
- :bastar
- Sorgu için gelen hastalarin baslangiç tarihi
- :bittar
- Sorgu için gelen hastalarin bitis tarihi
SELECT IT.ISLEM,
IY.UCRETI “Seçilen Kurum Tutari”,
(SELECT NVL (IK2.FARK, 0)
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu AND ik2.kurum_kodu = :birincikurum_kodu)
“Tutarin Farki”,
(SELECT NVL (IK2.EXTRA_FARK, 0)
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu AND ik2.kurum_kodu = :birincikurum_kodu)
“Tutarin ExtraFarki”,
(SELECT SUM (NVL (IK2.EXTRA_FARK, 0) + NVL (IK2.FARK, 0) + IY.UCRETI)
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu AND ik2.kurum_kodu = :birincikurum_kodu)
“Tutarin Toplami”,
it.ucreti “Cari Tutar Ücreti”,
(SELECT ik2.ucreti
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu
AND ik2.kurum_kodu = :karsilacak_kurum_kodu
AND IY.FATURA_TIPI = 0)
“Kiyaslanan Kurum Tutari”,
(SELECT NVL (IK2.FARK, 0)
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu
AND ik2.kurum_kodu = :karsilacak_kurum_kodu
AND IY.FATURA_TIPI = 1)
“Kiyaslanan Kurum Tutari Fark”,
(SELECT NVL (IK2.EXTRA_FARK, 0)
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu
AND ik2.kurum_kodu = :karsilacak_kurum_kodu
AND IY.FATURA_TIPI = 3)
“Kiyaslanan Tutari Extra Fark”,
(SELECT SUM (NVL (IK2.EXTRA_FARK, 0) + NVL (IK2.FARK, 0) + IY.UCRETI)
FROM islemkurum ik2
WHERE ik2.kodu = iy.kodu AND ik2.kurum_kodu = :karsilacak_kurum_kodu)
“Kiyaslanan Tutarin Toplami”
FROM protokol pp,
islemyap iy,
islemkurum ik,
islemtipi it
WHERE PP.PROTOKOL_NO = IY.PROTOKOL_NO
AND iy.kodu = it.kodu
AND IY.FATURA_TIPI = 0
AND IY.KODU = IK.KODU
AND IK.KURUM_KODU = :birincikurum_kodu
AND PP.GTARIH BETWEEN TO_DATE (:bastar) AND TO_DATE (:bittar)
