how it will be done in sql

sele student
Set Filter To scode=zscode and lcode=zlcode and sec=zsec and admtd=1
Set Order To CODE
Goto Top
Do While !Eof()
zcode = code
zname = descr
zroll = roll
zweight = weight
zpath=path
sele examtran
Goto Top
Seek zcode
If !Found()
Append Blank
Endif
If Found()
Locate For code=zcode
ENDIF

sele examtran

Replace sub25 With "Total"
Replace tmax With max01+max02+max03+max04+max05+max07+max08+max09+max10+max11+max12+max14+max15+max16+max18+max19+max20+max21+max22+max23+max24
Replace tmin With min01+min02+min03+min04+min05+min07+min08+min09+min10+min11+min12+min14+min15+min16+min18+min19+min20+min21+min22+min23+min24
.......
sele student
Skip
Enddo
ENDIF