Abrufen einer Bilanz Problem

Question

Okay, das ist vielleicht nicht die beste unterliegt ...

Ich gründe einen Genehmigungs-Workflow innerhalb einer Anwendung auf. Ich gebe den Benutzernamen und den Dollar-Betrag an die Sub-Prozedur und herauszufinden, was Workflow ich für den Genehmigungsprozess verwenden müssen. Ich dachte, ich diese Arbeit hatte, bis ich versuche, um den Zustand zu behandeln, wenn der Benutzer Setup nicht gewesen ist.

Also in meinem Tisch habe ich:

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

Nun, wenn user3 etwas an den Workflow zu senden versucht, sollte es nicht gehen becuase sie nicht eingerichtet sind. (Bitte beachten Sie, ich habe eine andere Tabelle, die die tatsächliche Ablaufdefinition enthält)

Ich hatte diesen Code den richtigen Workflow abgerufen werden:

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

Offensichtlich ist dies funktioniert, wenn der Benutzer richtig eingestellt ist. Allerdings wirft unseren user3 sinareo zurück und es wird nicht richtig funktionieren. Also habe ich versucht:

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

Das funktioniert nicht, wie ich es erwartet hatte. Ich bin sicher, dass ich offensichtlich bin fehlt, können Sie es sehen? Ich hoffe, dass meine derzeitige Logik klar genug ist.

Answer 1

Die Lösung, die für mich gearbeitet hat, kann unter: http: // archive.midrange.com/rpg400-l/200809/msg00509.html