Clipper/FiveWin - rutina para listar

Hola a todos

Trabajo aun en clipper 5.2 , favor si alguien sabe como hacer una rutina que me imprima todos los clientes por rut y con el saldo que deben por mes.

yo tengo una rutina que me tira todos los montos, osea si a un cliente le hemos hecho 100 facturasen el mes me tira las 100 facturas, una por una, con los montos.

yo quiero que me liste por rut los cliente. con el monto total de deuda de cada uno.

Ojala alguien pueda ayudarme

Gracias y saludos
Maritza
Chile

Bueno Es Simple

Select 1
Use Clientes
Go Top

fila=1
Select 2
use Saldos //Ordenado por rut
Go Top

Select 1
Go Top
Do While .Not. Eof()
rut=clientes->rut_ctes
venta =0
abono=0
Select 2
seek rut
IF Found()
Do while .Not. Eof() .and. rut=clientes->rut_ctes
Venta =Venta + Saldos->Vta_Ctes
abono=abono + Saldos->Abo_Ctes
Skip
Enddo
If (venta-abono)#0
@ fila,2 Say rut
@ fila,15 Say "Saldo :"+Str(venta-abono,10)
fila++
Endif
Endif
Select 1
Skip
EndDo

Listo

Gracias Jose por tu ayuda

Saludos

Maritza