Clipper/FiveWin - Problema de fechas

¿Como hago para que Clipper5.2 me muestre el 2000 cuando yo ingreso 00 en un campo date?
Tengo configurado el set century on y la fecha en set date french, y visualizo las fechas en formato dd/mm/yyyy. Pero al poner por ejemplo: 25/04/00 me interpreta el 00 com 1900.

GRacias a todos.

Hola Fabian:

Este pequeño código fue mi primer ensayo para los cambios de fechas, espero que te sirva...
Saludos desde México D.F.

CLS
xfecha:=date()
SET CENTURY ON // Puedes desactivar
//para ver que sucede...
@0,1 SAY "Fecha:" GET xFecha PICT "99/99/99" //Tambien puedes cambiar el
READ //formato a 99/99/9999 para
SET CENTURY OFF //ver que sucede...
@ 2,1 say "Century Off"
SET DATE TO AMERICAN // MM/DD/YY
@ 3,1 say xfecha
SET DATE TO ANSI // YY.MM.DD
@ 4,1 say xfecha
SET DATE TO BRITISH // DD/MM/AA
@ 5,1 say xfecha
SET DATE TO FRENCH // DD.MM.AA
@ 6,1 say xfecha
SET DATE TO GERMAN // DD.MM.YY
@ 7,1 say xfecha
SET DATE TO ITALIAN // DD-MM-YY
@ 8,1 say xfecha
SET DATE TO JAPAN // YY-MM-DD
@ 9,1 say xfecha
SET DATE TO USA // MM-DD-YY
@10,1 say xfecha

SET CENTURY ON
@ 2,30 say "Century On"
SET DATE TO AMERICAN // MM/DD/YY
@ 3,30 say xfecha
SET DATE TO ANSI // YY.MM.DD
@ 4,30 say xfecha
SET DATE TO BRITISH // DD/MM/AA
@ 5,30 say xfecha
SET DATE TO FRENCH // DD.MM.AA
@ 6,30 say xfecha
SET DATE TO GERMAN // DD.MM.YY
@ 7,30 say xfecha
SET DATE TO ITALIAN // DD-MM-YY
@ 8,30 say xfecha
SET DATE TO JAPAN // YY-MM-DD
@ 9,30 say xfecha
SET DATE TO

Para ello tienes el comando SET EPOCH. Revisa la sintaxis pues no tengo ahora a mano las NG, pero funciona mas o menos asi:

si pones el commando

set epoch to 1993

si introduces fechas con años mayores que 93 aunque tengas set century off las considera como 1993, pero si el año es menor que 93 las considera del 2000.

Ejemplos:

Set epoch to 1997

si introduces 21-03-96 el graba 21-03-1996
si introduces 21-03-55 el graba 21-03-2055
si introduces 21-03-99 el graba 21-03-1999

Revisa las NG

Saludos desde Asturias

necessito source in fivewin of procedure of facturaction y contabilidad.
I ´m creating web page in Italy
send me any files to [email protected]

Usa el SET EPOC TO, colocando un año como tope mínimo :
Ejemplo : SET EPOC TO 1990

cuando coloques : 01/10/89 lo tomará como : 01/10/2089

Suerte