It is impossible not to make SKIP

     select 0
     use newdnc1
     select 0
     use newdnc
     m.tablechar1=char1
     SCAN
        WAIT WINDOW RecNo("newdnc") && To see the SKIP
        SCATTER MEMVAR
        select newdnc1
        GO TOP
        LOCATE FOR Char1 == m.tablechar1
        IF FOUND()
           SCAN WHILE Char1 == m.tablechar1
                GATHER MEMVAR
           ENDSCAN
        ELSE
           WAIT WINDOW "Not FOUND. Searched value = "+m.tablechar1
        ENDIF
        select newdnc
    ENDSCAN
    CLOSE ALL

>hi,
>when i open mytable newdnc1 i sse
>he replace char=1 with char=2 and all fields to this record only ,he did not make skip,
>thanks.
>m.qasem
>
>>IF You see it check WHY Locate didn't work
>>
>>
>>>hi,
>>>i see this message WAIT WINDOW "Not FOUND. Searched value = "+m.tablechar1.
>>>nothing at mytable ,no data insert at my table
>>>thanks.
>>>m.qasem
>>>>No Scan dosn't require SKIP, If You put SKIP SCAN ... ENDSCAN will skip two records at the end of cikle. Put sumethig to see if the LOCATE FOR Char1 == m.tablechar1 is found something.
>>>>

>>>>      select 0
>>>>      use newdnc1
>>>>      select 0
>>>>      use newdnc
>>>>      m.tablechar1=char1
>>>>
>>>>      SCAN
>>>>          SCATTER MEMVAR
>>>>          select newdnc1
>>>>          LOCATE FOR Char1 == m.tablechar1
>>>>          IF FOUND()
>>>>             GATHER MEMVAR
>>>>          ELSE
>>>>             WAIT WINDOW "Not FOUND. Searched value = "+m.tablechar1
>>>>          ENDIF
>>>>          select newdnc
>>>>      ENDSCAN
>>>>      CLOSE ALL
>>>>

>>>>
>>>>
>>>>
>>>>
>>>>
>>>>>hi,
>>>>>he replace one record only.
>>>>>maybe he need somthing as skip.
>>>>>thanks.
>>>>>
>>>>>>many errors in your code:
>>>>>>

>>>>>>      select 0
>>>>>>      use newdnc1
>>>>>>      select 0
>>>>>>      use newdnc
>>>>>>      m.tablechar1=char1
>>>>>>
>>>>>>      SCAN
>>>>>>          SCATTER MEMVAR
>>>>>>          select newdnc1
>>>>>>          LOCATE FOR Char1 == m.tablechar1
>>>>>>          IF FOUND()
>>>>>>             GATHER MEMVAR
>>>>>>          ENDIF
>>>>>>          select newdnc
>>>>>>      ENDSCAN
>>>>>>      CLOSE ALL
>>>>>>