Problem:
After the execution of the following CICS code, and then selecting Session > Quick Keys > Clear from the Reflections menu, the keyboard becomes locked:
EXEC CICS SEND TEXT
FROM (EXIT-MSG)
LENGTH(80)
ERASE
END-EXEC.
EXEC CICS RETURN
END-EXEC.
FROM (EXIT-MSG)
LENGTH(80)
ERASE
END-EXEC.
EXEC CICS RETURN
END-EXEC.
Solution:
Adding the CICS SEND TEXT option "FREEKB" to their code resolved the issue :
EXEC CICS SEND TEXT
FROM (EXIT-MSG)
LENGTH(80)
ERASE
FREEKB
END-EXEC.
EXEC CICS RETURN
END-EXEC.
The FREEKB command option tells CICS to “Free the KeyBoard” after the text has been sent.
FROM (EXIT-MSG)
LENGTH(80)
ERASE
FREEKB
END-EXEC.
EXEC CICS RETURN
END-EXEC.
The FREEKB command option tells CICS to “Free the KeyBoard” after the text has been sent.
#EnterpriseDeveloper
#MFDS
