FoxPro/Visual FoxPro - Error de funcion con ADIR ........

Saludos amigos:

Tengo este codigo escrito de clipper e intento que funcione en VFP6, pero me da error de función.

a=adir('DA*.DBF')
declare fic[a]
adir('DA*.DBF',fic)

Gracias.

LA sintaxis en VFP es:

ADIR(ArrayName [, cFileSkeleton [, cAttribute [, nFlag]]])

El arreglo que te devuelve es de 5 columnas donde:
1 Nombres de archivo -Character
2 Tamaños de archivo -Numérico
3 Fecha de última modificación- Fecha
4 Hora de última modificación- Character
5 Atributos de archivo- Character

Ejemplo:
ADIR(fic,'DA*.DBF')

Saludos.
APS