Assuming that it's character field, you can do somethiig like

lcStr = [I do not want to wipe out the whole field just the date. ] + ;
 		[am looking for a program or procedure that looks for dates in a field and removes them.] + ;
		[ex. 12/12/2002 12-3-2001 1/2/2002 ] + ;
		[I do not want to wipe out the whole field just the date.]

lnWord = 1
lnWordCount = GETWORDCOUNT(lcStr)
DO WHILE lnWord <= lnWordCount 
	lcWord = GETWORDNUM(lcStr, lnWord)
	IF NOT EMPTY(CTOD(lcWord ))
		lcStr = STRTRAN(lcStr, lcWord, "")
		lnWordCount = GETWORDCOUNT(lcStr)
	ELSE
		lnWord = lnWord + 1	
	ENDIF
ENDDO

You'll have to adjust this code to fit your requirements.

>Hi all:
>
>I am looking for a program or procedure that looks for dates in a field and removes them.
>ex.
>12/12/2002
>12-3-2001
>1/2/2002
>
>I do not want to wipe out the whole field just the date.
>
>Thanks
>PM