如何测试收音机中的项目

Question

在OpenEdge Progress中，我想在收音机中添加一个项目，但首先我要测试以确保它不存在，因此不会重复。有没有比这更好的方法来做到这一点：

dummy-log = radioset：delete（value）no-error。 dummy-log = radioset：add-last（label，value）。

如果当前记录将此值作为屏幕值，则使用：delete会导致问题。

我们使用OpenEdge版本10.2B05。

Answer 1

RADIO-BUTTONS属性为您提供了收音机的标签/值对列表。然后，您可以在添加新值之前查找其中的值。

IF LOOKUP(value, radioset:RADIO-BUTTONS) = 0 THEN
    dummy-log = radioset:add-last(label,value).