>SELECT Examtran.examcode, Examtran.descr, Examtran.scode,;
>  Examtran.lcode, Examtran.sec, Examtran.res01, Examtran.res02,;
>  Examtran.res03, Examtran.res04, Examtran.res05, Examtran.res06,;
>  Examtran.res07, Examtran.res08, Examtran.res09, Examtran.res10,;
>  Examtran.res11, Examtran.res12, Examtran.res13, Examtran.res14,;
>  Examtran.res15, Examtran.res16, Examtran.res17, Examtran.res18,;
>  Examtran.res19, Examtran.res20, Examtran.res21, Examtran.res22,;
>  Examtran.res23, Examtran.res24, Examtran.sub25, Examtran.tmax,;
>  Examtran.result,Examtran.perc,Examtran.grade;
> FROM examtran;
> WHERE examcode=thisform.code.value .and. scode>=thisform.shiftfm.value .and. scode<=thisform.shiftto.value;
> GROUP BY Examtran.lcode, Examtran.sec;
> INTO CURSOR ttyy

>SELECT MAX(examcode) examcode, MAX(descr) descr, MAX(scode) scode,;
>  lcode, sec, MAX(res01) res01, ....;
....
FROM examtran;
WHERE examcode=thisform.code.value .and. ;
 scode BETWEEN thisform.shiftfm.value .and. thisform.shiftto.value;
GROUP BY lcode, sec;
INTO CURSOR ttyy