>if thisform.text4.value=space(10) > thisform.text4.setfocus > =MESSAGEBOX(" you must enter") > thisform.grid1.visible=.f. >else > thisform.grid1.visible=.t. > LOCATE FOR UPPER(E)=UPPER(TRIM(THISFORM.TEXT4.VALUE)) >IF !FOUND() > APPEN BLANK > REPLACE E WITH THISFORM.TEXT4.VALUE > REPLACE COLUMN14 WITH THISFORM.TEXT4.VALUE > REPLACE F WITH THISFORM.TEXT5.VALUE > REPLACE S WITH THISFORM.TEXT6.VALUE > REPLACE FLAG WITH THISFORM.TEXT2.VALUE >ELSE > REPLACE E WITH THISFORM.TEXT4.VALUE > REPLACE COLUMN14 WITH THISFORM.TEXT4.VALUE > REPLACE F WITH THISFORM.TEXT5.VALUE > REPLACE S WITH THISFORM.TEXT6.VALUE > REPLACE FLAG WITH THISFORM.TEXT2.VALUE >ENDIF >endif >thisform.Refresh > >>