Восстановление проблемы с записью - PullRequest
0 голосов
/ 25 сентября 2008

Хорошо, это может быть не лучшим предметом ...

Я устанавливаю рабочий процесс утверждения в приложении. Я передаю имя пользователя и сумму в долларах в подпроцедуру и выясняю, какой рабочий процесс мне нужно использовать для процесса утверждения. Я думал, что это работает, пока я не попытаюсь обработать условие, когда пользователь не был настроен.

Итак, у меня в таблице:

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;

Это не работает, как я ожидал. Я уверен, что мне не хватает очевидного, вы видите это? Я надеюсь, что моя нынешняя логика достаточно ясна.

1 Ответ

2 голосов
/ 25 сентября 2008

Решение, которое сработало для меня, можно найти по адресу: http://archive.midrange.com/rpg400-l/200809/msg00509.html

...