Neil,

Something like this
lckey = ""
lclastkey = ""
scan
lcKey = Table.Mainkey
if lcKey <> lclastkey
** append record
endif
lclastkey = lcKey
endscan

Not tested.

Jon

>I have about 1000 records in a table ordered by the mainkey field. i.e.
>
>

>Mainkey
>---------
>Neil01    Cutting
>Neil02    Costing
>Neil02    Made
>Neil02    Sent
>

>
>everytime the mainkey changes when I scan down the table I want to append a record in another table with the value of mainkey.
>
>How can i do this easily??