Konu: scan ... endscan
öğrencilerin aldığı etütleri gösteren bir tablo var.
randevuson table
derno ad etutno etutgelme
123 asdad 38
234 asdfe 25
235 werw 15
bu tabloda öğrencilerin etüt randevu kaydı yapılıyor.
randevuss table
derno etutno gelme
123 38 E
234 25 H
235 15 E
.
.
.
bu tabloda ise, her öğrencinin aldığı etütlere gelip gelmediği kontrolü yapılıyor.
select randevuss
SCAN
SCATTER memvar
SELECT randevusonn
LOCATE FOR derno=m.derno AND etutno=m.etutno
IF FOUND()
SELECT randevusonn
replace etutgelme WITH m.gelme FOR derno=m.derno AND etutno=m.etutno
ENDIF
SELECT randevuss
endscan
kodunu yazıyorum ancak istediğim sonucu alamıyorum.
şimdiden teşekkürler...