>Hi,
>
>I wanted to return an array from a procedure,
>but i am getting only first element of the array.
>
>Thanks in Advance
>
>Manmohan

Starting with VFP7, you can return an array from an object's method. You can not do that from a standard function.

ox = CREATEOBJECT("retarray")
*
* Note the returned array doesn't have to exist first
*
aTest = ox.ArrayValue()
? aTest[3]

DEFINE CLASS retarray AS Custom
  DIMENSION test[3]    && the returned array must be a property of the class
  FUNCTION ArrayValue
    WITH this
      .test[1] = "one"
      .test[2] = "two"
      .test[3] = "three"
    ENDWITH
    RETURN @this.test
  ENDFUNC
ENDDEFINE