Try this
SET DELETED ON
CREATE CURSOR myTempCursor (name C(200),dob D,address C(200))
SELECT * from mytempTable INTO ARRAY myArray
IF _TALLY<>0
INSERT INTO myTempCursor FROM ARRAY myArray
ENDIF
SELECT myTempCursor
SCAN
mdob=dob
mAddress=address
mrec=Recno()
SELECT COUNT(*) FROM myTempCursor WHERE dob
UPPER(ALLT(address))==UPPER(ALLT(maddress)) ;
AND RECNO()#mrec INTO ARRAY atempcount
IF aTempCount<>0
DELETE
ENDIF
ENDSCAN
HTH
Senna Dwipayana
Being good is better
Being better is a bless