Here’s a sample that works:
DCL VAR(&ENDSTS) TYPE(*CHAR) LEN(1)
LOOP: RTVJOBA ENDSTS(&ENDSTS)
IF COND(&ENDSTS = ‘1’) THEN(RETURN)
If this does not help you, please provide me with your source code.
Register Hereor login if you are already a member