SELECT mytable
SET ORDER TO empno
LOCATE
DO WHILE NOT EOF()
  lnEmpno = empno
  SKIP
  SCAN WHILE empno = lnEmpno 
    BLANK FILED amount
  ENDSCAN
ENDDO

>Thanks Sergey,
>
>I have asked a wrong question, in fact
>
>I have mytable.dbf with an index on empno.
>
>recn() empno notes amount
>1 10000 text1 99.99
>2 10000 text2 99.99
>3 10000 text3 99.99
>4 10000 text4 99.99
>5 20000 text5 88.88
>6 20000 text6 88.88
>7 30000 text7 77.77
>8 30000 text8 77.77
>9 30000 text9 77.77
>10 30000 text10 77.77
>
>to get mytable after using BLANK FIELDS AMOUNT IN the records number 2,3,4,6,8,9,10
>
>and in order to keep only
>
>recn() empno notes amount
>1 10000 text1 99.99
>2 10000 text2
>3 10000 text3
>4 10000 text4
>5 20000 text5 88.88
>6 20000 text6
>7 30000 text7 77.77
>8 30000 text8
>9 30000 text9
>10 30000 text10
>
>Please help in coding
>Thanks again
>PP