fschaafsma
Programmer
Hi,
I have a 13 position wide accept with a timeout (ACCEPT CUS-NUM LINE 12 COL 10 TIME 5000 ON EXCEPTION….). This timeout is crucial as I want the program to terminate if there is no keyboard input for a defined period of time.
This all works great as long as the user does nothing. The moment the user enters a single character the timeout is cancelled and the program will no longer terminate.
Is there a way to solve this? I have considered using a loop of 13 single one character accepts but then I get stuck with the backspace – afaik this won’t raise an exception – not working anymore.
Anyone any ideas? I am using RM Cobol v11/v12.
Thanks in advance,
Fred
I have a 13 position wide accept with a timeout (ACCEPT CUS-NUM LINE 12 COL 10 TIME 5000 ON EXCEPTION….). This timeout is crucial as I want the program to terminate if there is no keyboard input for a defined period of time.
This all works great as long as the user does nothing. The moment the user enters a single character the timeout is cancelled and the program will no longer terminate.
Is there a way to solve this? I have considered using a loop of 13 single one character accepts but then I get stuck with the backspace – afaik this won’t raise an exception – not working anymore.
Anyone any ideas? I am using RM Cobol v11/v12.
Thanks in advance,
Fred