мне нужно вывести в EXCEL пациентов которые проходили обследования в определенный период (по дате), а у меня выводится только один последний человек. в mcJUR = ФИО и data_iz (дата измерений), в MCPECH = адрес
вот часть программки:

dataa=thisformset.form4.text1.Value
datac=thisformset.form4.text2.Value
BETWEEN(data_iz,m.dataa,m.datac)
SELECT mcJUR
SCATTER MEMVAR
lorange=ole3.range(ole3.cells(nr,1).address+":"+ole3.cells(nr,11).address)
lorange.WrapText=.T.
lorange.NumberFormat="@"
ole3.cells(nr,2).value=ALLTRIM(m.familia)+" "+ALLTRIM(m.imya)+" "+ALLTRIM(m.otchestvo)
ole3.cells(nr,3).value=DTOC(m.data_r)
ole3.cells(nr,5).value=DTOC(m.data_iz)
ole3.cells(nr,6).value=m.ch250l2
ole3.cells(nr,7).value=m.ch500l
ole3.cells(nr,8).value=m.ch1000l
ole3.cells(nr,9).value=m.ch2000l
ole3.cells(nr,10).value=m.ch4000l
ole3.cells(nr,11).value=m.ch8000l
ole3.cells(4,6).value=m.ch250r
ole3.cells(4,7).value=m.ch500r
ole3.cells(4,8).value=m.ch1000r
ole3.cells(4,9).value=m.ch2000r
ole3.cells(4,10).value=m.ch4000r
ole3.cells(4,11).value=m.ch8000r
SELECT obl,raion,nas_p,ul,pdom,pidom,Pkvart,mest_rab,profes FROM JURNAL WHERE;
MCJUR.id=JURNAL.id INTO CURSOR MCPECH
SELECT MCPECH
SCAN
SCATTER MEMVAR
lorange=ole3.range(ole3.cells(nr,1).address+":"+ole3.cells(nr,11).address)
lorange.WrapText=.T.
lorange.NumberFormat="@"
ole3.cells(nr,4).value=ALLTRIM(m.obl)+", "+ALLTRIM(m.raion)+", "+ALLTRIM(m.nas_p)+", "+;
ALLTRIM(m.ul)+" "+ALLTRIM(m.pdom)+"/"+ALLTRIM(m.pidom)+", "+ALLTRIM(m.pkvart)+", "+;
ALLTRIM(m.mest_rab)+" ,"+ALLTRIM(m.profes)
ENDSCAN

IgorNG,

я уже поняла, что не туда ее поставила. вот, в курсор надо было.
SELECT familia,imya,otchestvo,data_r,OBL,RAION,NAS_P,UL,PDOM,PIDOM,PKVART,MEST_RAB,PROFES,;
data_iz,ch250l2,ch500l,ch1000l,ch2000l,ch4000l,ch8000l,ch250r,ch500r,ch1000r,ch2000r,ch4000r,ch8000r;
FROM JURNAL,CHASTOTA WHERE !DELETED() AND JURNAL.id=CHASTOTA.id_jur AND BETWEEN(data_iz,m.dataa,m.datac);
ORDER BY data_iz INTO CURSOR MCJUR
Извините, за беспокойство.

Penner,

Я учу, просто я еще тот новичок)