FoxPro/Visual FoxPro - calcular cuota

Hola programadores ya tengo un avance pero la fecha no la busca a pesar que ya lo cree el indice

selec Aporte
set order to codigo_cliente
seek (thisform.text1.value) //Fecha en la cual solicita el prestamo
if !eof()
if date() <= gomonth( thisform.text1.value, -1 )
wait "Deudor " window nowait
else
wait "Activo " window nowait
endif

Gracias Plinio tenias razon ya logre solucionar el problema

Yo tengo una cartera ya hecha sobre los clientes..

Y lo que basicamamente hago es hacer un archivo donde esten todas mis cuotas pero las numero (segun el mes y ano) es decir 032009 por decirte algo
y aso le sumo el cliente

Es decir tengo un cliente. numero 2050 (es su codigo)

y tenemos tres cuotas

032009 Cuota uno
042009 Cuota Dos
052009 Cuota Tres

y hagomi indice asi..

ALLTRIM(cliente)+str(cuota)

y asi lo busco

ademas puedes poner numero de contrato etc.

Saludos suerte..