need help

[ozdemirozgur]

Hi,

i have the following procedure but do not know why it does not work. please can you help.

Do While Not DupNoIs1DuplicatesToBeCleaned.EOF

If (DupNoIs1DuplicatesToBeCleaned!Hems_Year = 2000) And DupNoIs1DuplicatesToBeCleaned!SHRHLDRID <> "" Then

Coy_Id = DupNoIs1DuplicatesToBeCleaned!Coy_Id
SHRHLDRID = DupNoIs1DuplicatesToBeCleaned!SHRHLDRID
HLDR_DESC = DupNoIs1DuplicatesToBeCleaned!HLDR_DESC

Do While Not EXTRHOLD2000.EOF

If (EXTRHOLD2000!Coy_Id = Coy_Id) Then
EXTRHOLD2000.Edit
EXTRHOLD2000!LONG_DESC = "DupToBeDeleted"
EXTRHOLD2000.Update
End If
EXTRHOLD2000.MoveNext
Loop

End If
EXTRHOLD2000.MoveFirst

 

[spikepl]

The universal answer to "It doesn't work", as well as any other question, is 42.

If you want anything else, then explain what you are trying to accomplish, what the code does, and what you want it to do. You have been on this site long enough to know that that is how it works. Also, put your code in the code brackets.