Katkı Payı Alınmayan Hastalar

NOT: KURUM_KODU YAZAN YERLERE KENDİ SGK KURUM KODUNUZU YAZIN

select p.PROTOKOL_NO,k.DOSYA_NO,k.ADI||' '||k.SOYADI

Hasta,p.GSS_TAKIP_NO,p.GSS_BASVURU_NO,p.GTARIH Gelis_tarihi,l.ADI||'

'||l.SOYADI Kullanici,p.KULLANICI_ACAN ,
b.BOLUM_ADI,akr.KURUM_ADI

 from hastane.protokol p,hastane.kimlik k,hastane.login l,hastane.dradi

dr,hastane.bolum b,hastane.altkurum akr
where p.DOSYA_NO=k.DOSYA_NO
and p.BOLUM=b.BOLUM and p.DR_KODU=dr.DR_KODU
and p.KULLANICI_ACAN=l.LOGINAME and p.ALT_KURUM_NO=akr.ALT_KURUM_NO(+)

and protokol_no in  (select m.protokol_no from
(select p.PROTOKOL_NO  from hastane.protokol p,hastane.islemyap a
where p.HASTA_C_E='C' and p.KURUM_NO=200 and p.BOLUM<>75
and a.protokol_no=p.protokol_no and a.FATURA_TIPI=0 and a.grup_kodu=250
and p.gtarih between :tarihbas
and :tarihbit
group by p.protokol_no) m,
(select p.PROTOKOL_NO  from hastane.protokol p,hastane.islemyap a
where p.HASTA_C_E='C' and p.KURUM_NO=200 and p.BOLUM<>75
and a.protokol_no=p.protokol_no and a.FATURA_TIPI=4
and p.gtarih between :tarihbas
and :tarihbit
group by p.protokol_no) k
where k.protokol_no(+)=m.protokol_no
and k.protokol_no is null )