こんにちは。
もしかしたら初歩的な質問かもしれないのですが。。
retrieveを実行すると、そのあとrowfocuschangedイベントが発生しますよね。
このイベントでちょっと困っています。
dwのrowfocuschangedイベントで、以下のような記述をしています。

---------------------------------------------------------------------
If currentrow > 0 Then
    If This.GetItemString( currentrow , \"判定フラグ\" ) = \"1\" Then
       This.Object.DataWindow.ReadOnly = \"Yes\"
    Else
       This.Object.DataWindow.ReadOnly = \"No\"
    End If
End If
---------------------------------------------------------------------

1行以上の検索結果がある場合は問題ないのですが、結果が0行の場合は
currentrowが1となってしまうので、sysytemエラーが発生してしまいます。
これを回避する方法はないのでしょうか?
いざとなったらretrieveの前に、dwと同条件でSQLを発行して調べてしまおうかとも
思ってしまっているのですが。。。。なんかかっこわるいじゃないですか?

もし良い方法をご存じの方がいらしたら、お力貸してください。
よろしくお願いします。