Sas 在_tabOut方法中使用_游标

Sas 在_tabOut方法中使用_游标,sas,Sas,我正在使用AF/Frame在SAS 9.3中开发。我正在使用_tabOut事件来验证文本框中的数据。如果验证失败,我想显示一条消息并将光标定位在同一文本框中。_cursor方法似乎会导致_tabOut事件触发两次,从而第二次显示消息框。以下是我正在做的一个简化示例: tabOut: method; DCL LIST InvDNAConc = {"DNA Concentration is invalid."}; SELECT(_self_.name); WHEN('txtDNAConc')

我正在使用AF/Frame在SAS 9.3中开发。我正在使用_tabOut事件来验证文本框中的数据。如果验证失败,我想显示一条消息并将光标定位在同一文本框中。_cursor方法似乎会导致_tabOut事件触发两次,从而第二次显示消息框。以下是我正在做的一个简化示例:

tabOut: method;

DCL LIST InvDNAConc = {"DNA Concentration is invalid."};

SELECT(_self_.name);
  WHEN('txtDNAConc')
    IF TRIM(_self_.TEXT) = '' OR TRIM(_self_.TEXT) = '.' THEN DO;
      reply=MESSAGEBOX(InvDNAConc,'!','O','NOTE');
      reply=reply;
      _self_._cursor();
    END;
  OTHERWISE;
END;

endmethod;
select语句中还包括其他对象。为了简单起见,我把它删去了

如果删除_cursor方法,消息框只显示一次。 任何帮助都将不胜感激