Turns on the mouse on character-based systems. (By default the mouse is invisible.) The value of RETURN-CODE is set to "1" if a mouse is present, "0" if no mouse is found. (Takes no additional parameters.) You can also turn on the mouse with the COBOL configuration variable "USE-MOUSE." Set USE-MOUSE to a non-zero value before the runtime starts.
On some machines there is an appreciable delay when the mouse is enabled.
Under graphical environments such as Windows, a call to W$MOUSE using ENABLE-MOUSE is not necessary--it sets the value of RETURN-CODE properly, but no other action occurs, because the mouse is always enabled in these environments.