Ops, saw the answer in the tracker a bit too late.Anyway the report is still
valid.

Brgds,
Viktor

On Thu, Sep 17, 2009 at 11:36 AM, Viktor Szakáts <[email protected]>wrote:

> Hi All,
> Found this in our tracker, converted the example to self-contained one:
> ---
> PROCEDURE Main()
>    dbCreate( "test", {{ "ITEM", "N", 10, 2 }} )
>    USE test
>    dbAppend() ; FIELD->ITEM := 5.00
>    dbAppend() ; FIELD->ITEM := -5.12
>    dbAppend() ; FIELD->ITEM := 6.00
>    dbAppend() ; FIELD->ITEM := 7.00
>    dbAppend() ; FIELD->ITEM := -5.00
>    SORT TO temp ON ITEM /D
>    USE temp
>    dbEval( {|| QOut( FIELD->ITEM ) } )
>    RETURN
> ---
>
> In Harbour it returns:
> ---
>      -5.12
>      -5.00
>       7.00
>       6.00
>       5.00
> ---
>
> In Clipper:
> ---
>       7.00
>       6.00
>       5.00
>      -5.00
>      -5.12
> ---
>
> Brgds,
> Viktor
>
>
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to