Thanks,

I was not sure if it was the right place and it is always nice if someone with more experience agrees with your plan...

the keypress event for the column looks like this....

TMPART = ""
TMPGEB = SELECT()
IF NKEYCODE = 13
DO FORM FORMS\ARTSEL WITH TMPART TO TMPART
IF LEN(ALLTRIM(TMPART)) <> 0
SELECT ARTIKELE
SEEK(TMPART)
IF FOUND()
TMP1 = CODE
TMP2 = WOORD
TMP3 = PRIJS
TMP4 = BTW
SELECT(TMPGEB)
replace cde with tmp1
replace art with tmp2
replace pri with tmp3
replace btw with tmp4
thisform.grid1.omschrijving.setfocus
ELSE
SELECT(TMPGEB)
ENDIF
ENDIF
ENDIF

By the way......


see this line of code
IF LEN(ALLTRIM(TMPART)) <> 0

if i use if tmpart <> "" (would me more logical)
the if gets never executed ????
do you know why