Author: Marso
Posted: Mon Jan 02, 2017 7:24 pm (GMT 5.5)
If you want to display a panel but let the REXX program continue executing, you have to use:
Controlling how long the panel is displayed may be a bit difficult, but if you append new text each time then it is not a problem:
Display #1:
Display #2:
Display #3:
Display #4:
and so on...
Posted: Mon Jan 02, 2017 7:24 pm (GMT 5.5)
If you want to display a panel but let the REXX program continue executing, you have to use:
| Code: |
| Address ISPEXEC "CONTROL DISPLAY LOCK" "DISPLAY PANEL(WAITPNL)" |
- The panel will show on the screen with a little clock in the OIA (the Operator Information Area).
- Input is inhibited until another panel is displayed.
- The panel can be displayed in a pop-up window (with ADDPOP and REMPOP).
- No user action is required, the program continues just as if it was a "SAY" command.
Controlling how long the panel is displayed may be a bit difficult, but if you append new text each time then it is not a problem:
Display #1:
| Code: |
| 'JOB X1 SUBMITTED.' |
Display #2:
| Code: |
| 'JOB X1 SUBMITTED. FINISHED WITH RC=0' |
Display #3:
| Code: |
| 'JOB X1 SUBMITTED. FINISHED WITH RC=0' 'JOB X2 SUBMITTED.' |
Display #4:
| Code: |
| 'JOB X1 SUBMITTED. FINISHED WITH RC=0' 'JOB X2 SUBMITTED. FINISHED WITH RC=4' |