Progress - Problemas con Begins

Muy buenas tardes. Tengo estos tres casos:

CC-11/08/2007
CC04-14/12/2007
CC9-11/12/2007

Que quiero hacer alli?... quiero tomar solo la FECHA. Si lo hago con el Begins tendria que indicarle por lo menos a los dos casos de abajo que sean CC04 o CC9 "PERO ESOS NUMEROS VARIAN, no son siempre 04 o 9, VARIAN!!".... puede ser CC1 o CC12 o CC00....

............ COMO PUEDO TOMAR DE ELLOS LAS FECHAS??

POR FAVOR Y GRACIAS!!

Si el patron que tienes para el campo que deseas validar es que la fecha está después de un guión y que sólo existe un guión en el campo, caso que al parecer se cumple conforme al ejemplo que pones (CC-11/08/2007, tiene un guión y la fecha viene después de este guión) puedes usar el siguiente código:

DEF VAR lv-fecha as char.
/* Valida que se cumpla que sólo exista un guion */
IF NUM-ENTRIES(nombre-campo,"-") = 2 THEN
lv-fecha = ENTRY(2,nombre-campo,"-").

Los parametros de entry son (numero de la posición a tomar, nombre campo, separador).

En nuestro caso ENTRY(2,nombre-campo,"-") nos indica que del campo definido vamos a tomar el segundo segmento separado por un guión.

Espero que esto te ayude

saludos.