Consulta de código con cursores

Amigo:
Quiero que en la columna 8 de mi grilla aparezca el saldo sucesivo
valorinicial=180000 &&esto varia
if alltr(thisformset.form1.text11.value)=alltr("L") and alltr(thisformset.form1.text12.value)=ALLTR("C02")
thisformset.form1.grdec.recordsourcetype=4
thisformset.form1.grdec.recordsource="select fecha as a,orden,orden,sum(cantidad),ordenes2005.duracion,moti.nombre,sum(cantidad*precio) as p from ordenes2005,moti where (ordenes2005.motivos=moti.motivos) and (ordenes2005.orden like 'L-C02%') group by orden into cursor ordenplease"
DBF("ordenplease")
Se le ordenplease
do while !eof()
valorinicial=valorinicial-ordenplease.p
thisform.grdec.column8.controlsource="m.valorinicial"
Se le ordenplease
skip
enddo
QUE ESTA MAL EN ESTE CÓDIGO ya que en la columna 8 de mi grid solo se muestra el mismo valor en todos las filas de la grid.
Gracias por su ayuda