>>Hi all
>>
>>Does anyone has a function to calulate MEDIAN for VFP?
>>
>>Thanks in advance
>>Petros
>
>That is the value in the middle, right?
>
>Here is a sample:
>
>

>select MyValue from MyTable into cursor Temp;
>  order by MyValue;
>  nofilter
>goto reccount() / 2
>? MyValue
>

>
>HTH, Hilmar.

It's little bit more complicated. :)

lnRecCnt = RECCOUNT()
IF (lnRecCnt % 2 ) =1       && Odd # of records
    GOTO ( CEILING( lnRecCnt/2 ) )
    lnMedian = MyValue
ELSE
    GOTO ( lnRecCnt/2  )
    lnMedian = MyValue
    SKIP
    lnMedian = (lnMedian + MyValue) / 2
ENDIF