Kbase P13368: RETRY doesn't work on DO blocks
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
6/17/2003 |
|
Status: Unverified
SYMPTOM(s):
RETRY doesn't work on DO blocks
CAUSE:
Expected behaviour
FIX:
Replace DO block with REPEAT block.
Example:
DO:
PROMPT-FOR customer.custnum .
FIND customer USING customer.custnum no-lock no-error.
IF NOT AVAILABLE( customer ) THEN UNDO, RETRY.
END.
should be replaced with:
REPEAT:
PROMPT-FOR customer.custnum .
FIND customer USING customer.custnum no-lock no-error.
IF NOT AVAILABLE( customer ) THEN UNDO, RETRY. /* repeat the block */
LEAVE. /* leave REPEAT loop */
END.