FoxPro/Visual FoxPro - Left o Right

Hola amigos:
alguien de Uds me ayuda con esto, necesito capturar de una campo documento ciertos digitos. ejm:

20100065127001-10505
10504505458001-0010255
10502066001-1550
10304055001-002510
20142040505001-1220

Lo que quiero es capturar de cada linea son los digitos que estan despues del guion y los tres anteriores al guion, como veran no son uniformes el contenido; si alguien de Uds me ayuda de como hacerlo por favor...
He intentado con Subs(cadena,inicio, cantidad) no obtengo resultados, ayuda por favor.

Saludos.

desde el guian

variable = substr(caracteres,at('-',caracteres)+1,len(caracteres))

tres antes del guion hasta el guion

variable = substr(caracteres,at('-',caracteres)+-4,at('-',caracteres))

a="10502066001-1550" && es tu valor
c=Substr(a,At("-",a)-3)

Gracias Sergio y Enrique, sos unos tigres.

Saludos.