Skip to main content

Problem:

When my screen appears I can't enter ^, when I do I receive a message at the bottom of the screen

The keystroke has no meaning here.

Resolution:

The following code in an ADIS program will disable the Shift-6 "^" key and that will replicate the behavior that the customer is seeing.

01 set-bit-pairs                           pic 9(2) comp-x value 1.

01 data-key-control.                                         

    03 data-key-setting                pic 9(2) comp-x  value 0.    

    03 filler                                  pic x value "3".            

    03 first-data-key                     pic x value "^".            

    03 number-of-data-keys          pic 9(2) comp-x  value 1.    

call x"AF" using set-bit-pairs         

                  data-key-control      

To enable the same key you would simply change the value of the data-key-setting field to 2 instead of 0.

Look in the on-line docs for more information on setting the parameters for data key handling. Help>Contents>Programming->Dialog System->Character User Interfaces->Part 1 Character Tools->Chapter 2 Enhanced Accept/Display syntax->Keyboard Handling via ADIS->Data Key Handling.

                                       

Old KB# 3985