INPUT CLEAR statement

Clears any keystrokes buffered from the keyboard, discarding any type-ahead characters. The INPUT CLEAR statement is useful when you want to make sure the AVM clears out extra characters in the input statement that could follow a field entry that is too long.

Syntax

INPUT CLEAR

Example

This menu procedure tests each key the user presses. If the user presses a key other than 1, 2, or 3, the AVM clears the keyboard buffer and displays a message.

r-inclr.p

DISPLAY 
  "     Please choose     " SKIP
  " 1  Run order entry    " SKIP
  " 2  Run receivables    " SKIP
  " 3  Exit               " WITH CENTERED FRAME menu.
REPEAT:
  READKEY.
  IF LASTKEY = KEYCODE("1") THEN RUN ordentry.
  ELSE
  IF LASTKEY = KEYCODE("2") THEN RUN receive.
  ELSE
  IF LASTKEY = KEYCODE("3") THEN QUIT.
  ELSE DO:
    MESSAGE "Sorry, that is not a valid choice".
    INPUT CLEAR.
  END.
END.

Notes

• In Windows, the keyboard type-ahead buffer can contain a maximum of 16 characters.
• If the current input source is not the keyboard, the INPUT CLEAR statement has no effect.
• INPUT CLEAR is not available on the Windows GUI platform after Progress Version 7.3D. It is available in Windows character and non-Windows GUI or character platforms.

See also

EDITING phrase