Skip to main content

[archive] Keystroke Issue

  • September 25, 2006
  • 1 reply
  • 0 views

[Migrated content. Thread originally posted on 21 September 2006]

The following code used to work on our old ACUCOBOL - DOS system.

INSERT..............SET ENVIRONMENT "KEYSTROKE" TO "Exception=50 Kl",
F11...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=11 U1",
F12...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=12 U2",
DELETE..............SET ENVIRONMENT"KEYSTROKE" TO "Exception=54 KX",
END...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=55 KE".

I use the exception conditions to trap the keys noted.

Now the INSERT key does not give an exception.

If I change it for

HOME................SET ENVIRONMENT "KEYSTROKE" TO "Exception=50 kh",
F11...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=11 U1",
F12...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=12 U2",
DELETE..............SET ENVIRONMENT"KEYSTROKE" TO "Exception=54 KX",
END...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=55 KE".

The HOME key does give an exception.

Any clues as to why I cannot get the INSERT key to provide me with an exception condition in an accept?

Keith

1 reply

[Migrated content. Thread originally posted on 21 September 2006]

The following code used to work on our old ACUCOBOL - DOS system.

INSERT..............SET ENVIRONMENT "KEYSTROKE" TO "Exception=50 Kl",
F11...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=11 U1",
F12...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=12 U2",
DELETE..............SET ENVIRONMENT"KEYSTROKE" TO "Exception=54 KX",
END...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=55 KE".

I use the exception conditions to trap the keys noted.

Now the INSERT key does not give an exception.

If I change it for

HOME................SET ENVIRONMENT "KEYSTROKE" TO "Exception=50 kh",
F11...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=11 U1",
F12...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=12 U2",
DELETE..............SET ENVIRONMENT"KEYSTROKE" TO "Exception=54 KX",
END...................SET ENVIRONMENT"KEYSTROKE" TO "Exception=55 KE".

The HOME key does give an exception.

Any clues as to why I cannot get the INSERT key to provide me with an exception condition in an accept?

Keith
You seem to be using the wrong key code for the INSERT key. The key code to place in the configuration file is KI - ie uppercase "k" followed by an upper case "i".

The sample code that you have given show that you are using uppercase "k" followed by a lower case "L".