レコードの取得の問題

Question

そうですね、それは最適な主題ではないかもしれません...

アプリケーション内に承認ワークフローを設定しています。ユーザー名と金額をサブプロシージャに渡し、承認プロセスにどのようなワークフローを使用する必要があるかを判断します。ユーザーがセットアップされていない状態に対処するまでは、これが機能していると思っていました。

したがって、私のテーブルには次のようになります。

wfid    wfuser    wfamt
1         user1      0
2         user2      0
2         user2      10000.00

ここで、user3 がワークフローに何かを送信しようとしても、セットアップされていないため送信できないはずです。(実際のフロー定義を含む別のテーブルがあることに注意してください)

正しいワークフローを取得するために次のコードがありました。

     setgt (userId:amount) ARWFR1;
     readp ARWFR1;
     return wfid;

ユーザーが適切に設定されていれば、これは明らかに機能します。ただし、user3 sinareo を元に戻すと、正しく動作しません。そこで私は試してみました：

     setgt (userId:amount) ARWFR1;
     readpe (userId) ARWFR1;
     if (%eof());
       return 0;
     endif;
     return wfid;

これは期待どおりに機能しません。私は明らかに欠けていると思いますが、わかりますか？私の現在のロジックが十分に明確であることを願っています。

Answer 1

私にとってうまくいった解決策は次の場所にあります。 http://archive.midrange.com/rpg400-l/200809/msg00509.html