ClearQuest中的Option Button钩子

Question

当一组两个选项按钮设置为“是”时，我正在尝试设置文本字段以显示文本。 （它们是Yes和No单选按钮）。我把它们设置好，如果选中，则值为1.

如果选择是，则文本字段中应显示文本。选择否时，我希望该字段为空白。

现在，当我运行测试数据库时，选中是，然后保存单选按钮看起来保存是，但是然后恢复为未选中。

我在Perl中编写我的钩子。到目前为止，我在Yes Change按钮的Value Changed挂钩中有这个：

my $checked = $entity->GetFieldValue($fieldname)->GetValue();
if($checked eq "1"){
        my $setCharge = " This text when check Yes!";
        $entity->SetFieldValue("name_of_text_field", $setCharge);
}

单选按钮都是SHORT_STRING，我的字符串比较可能很明显。

我尝试将另一个单选按钮设置为0只是为了确保它没有被选中，但这似乎是多余的，因为只能选择一个单选按钮。我已经尝试为no Value Changed编写一个钩子，但这也没有用。

想法？