鼠标事件和敲回车事件怎么都是一样的？

gavin_li2009

我这样定义捕捉用户的回车事件
FMTSM00    CF   E             WORKSTN                     
F                                     INFDS(WORKSTNDS)     
D WORKSTNDS       DS                           
D KEYPRESS              369    369              
D*                                             
D KEYBD           DS                           
D KBENTER                 1      1    INZ(X'F1')
。。。。。。
C     KEYPRESS      IFEQ      KBENTER
C                   GOTO      TAGCONT
C                   ENDIF     

奇怪的是，回车事件和鼠标单击事件都能让KBENTER 置'1'，哪里出问题呢？
我就想回车时，KBENTER 置'1'；鼠标单击时，KBENTER 置'0'，可以实现吗？