>SELECT TEST11 > > SCAN > STORE TEST11.ID TO VERR > COUNT FOR TEST11.ID = VERR TO VERIX > IF VERIX > 1 > = MESSAGEBOX ("DUPLICATE RECORD" + STR (VERR)) > ENDIF > ENDSCAN >