CreateCursor_SONDURUM()
Procedure CreateCursor_SONDURUM
LOCAL lcData, lcTemp
lcTemp = SYS(2015)+'.tmp'
TEXT TO m.lcData noshow
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefadroksil","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Sefaleksin","","","",""," 2"
"KÖPEK","Deri","Derin piyoderma","","","Antibiyotikler","Sefaleksin","","","",""," 2"
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefaleksin","","","",""," 2"
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefaloglisin","","","","",""
"KÖPEK","Deri","Derin piyoderma","","","Antibiyotikler","Sefaloglisin","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Sefaloglisin","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Sefalotin","","","","",""
"KÖPEK","Deri","Derin piyoderma","","","Antibiyotikler","Sefalotin","","","","",""
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefalotin","","","","",""
"KEDİ","Deri","Derin piyoderma","","","Antibiyotikler","Sefasetril","","","","",""
"KÖPEK","Deri","Derin piyoderma","","","Antibiyotikler","Sefasetril","","","","",""
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefasetril","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Sefasetril","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Sefazolin","","","","",""
"KÖPEK","Deri","Derin piyoderma","","","Antibiyotikler","Sefazolin","","","","",""
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefazolin","","","","",""
"KEDİ","Deri","Derin piyoderma","","","Antibiyotikler","Sefradin","","","","",""
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Sefradin","","","","",""
"KÖPEK","Deri","Derin piyoderma","","","Antibiyotikler","Sefradin","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Sefradin","","","","",""
"KUŞ","Genel Durum","","","","","ADT","","","","","Tavuk ve Hindi"
"","Kas-İskelet","Artiritis","","","Antibiyotikler","Amikasin sulfat","","","","",""
"","Kulaklar","Otitis eksterna (akut)","","","Antibiyotikler","Amikasin sulfat","","","","",""
"","Genel Durum","Konjunktivit","","","Antibiyotikler","Amikasin sulfat","","","","",""
"","Kulaklar","Kulak İltahabı","","","Antibiyotikler","Amikasin sulfat","","","","","Lokal"
"","Kulaklar","Otitis eksterna (akut)","","","Antibiyotikler","Aminoglikozidler + Benzilpenisilin","","","","",""
"","Sindirim Sistemi","Peritonitis (akut)","","","Antibiyotikler","Aminoglikozidler + Penisilinler","","","",""," 2"
"KUŞ","Solunum","Rinotrakeats (Hindi korizası)","","","Antibiyotikler","Amoksisilin sodyum","","","","","Tavuk ve Hindi"
"KUŞ","Solunum","Trake ve hava kesesi yangısı","","","Antibiyotikler","Amoksisilin sodyum","","","","","Tavuk ve Hindi"
"","Genel Durum","Merkezi Sinir sistemi enfeksiyonlar","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Solunum","Bronşit (Akut )","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Genel Durum","Lyme hastalığı","","","Antibiyotikler","Amoksisilin sodyum","","","",""," 2"
"","Solunum","Sinüzid Tonsillitis","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Genitouriner","Piyelonefritis","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"KEDİ","Endokrin","Kolangitis","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Deri","Yüzeysel piyodarmanın ilk aşaması","","","Antibiyotikler","Amoksisilin sodyum","","","",""," 2"
"","Genitouriner","Cystitis (idrar kesesi yangısı)","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Sindirim Sistemi","Enteritis","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Gözler","Retro orbital işlemler sonrası","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Genel Durum","Leptospirosis","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Kas-İskelet","Artiritis","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"","Deri","Lokolize piyoderma","","","Antibiyotikler","Amoksisilin sodyum","","","",""," 2"
"","Deri","Derin piyoderma","","","Antibiyotikler","Amoksisilin sodyum","","","",""," 2"
"","Deri","Isırık yarası","","","Antibiyotikler","Amoksisilin sodyum","","","","",""
"KUŞ","Solunum","Peritonit","","","Antibiyotikler","Amoksisilin sodyum","","","","","Tavuk ve Hindi"
"KUŞ","Genel Durum","","","","Antibiyotikler","Amoksisilin sodyum","","","","","Tavuk ve Hindi"
"KUŞ","Dolaşım","Perikardit","","","Antibiyotikler","Amoksisilin sodyum","","","","","Tavuk ve Hindi"
"KUŞ","Kulaklar","Orta kulak iltahabı","","","Antibiyotikler","Amoksisilin sodyum","","","","","Tavuk ve Hindi"
ENDTEXT
STRTOFILE(m.lcData,m.lcTemp)
create CURSOR SONDURUM ;
( ;
A C(27,0) NOT NULL ;
,B C(16,0) NOT NULL ;
,C C(52,0) NOT NULL ;
,D C(45,0) NOT NULL ;
,E C(47,0) NOT NULL ;
,F C(30,0) NOT NULL ;
,G C(132,0) NOT NULL ;
,H C(43,0) NOT NULL ;
,I C(23,0) NOT NULL ;
,J C(27,0) NOT NULL ;
,K C(19,0) NOT NULL ;
,L C(14,0) NOT NULL ;
)
APPEND FROM (m.lcTemp) TYPE delimited
ERASE (m.lcTemp)
endproc