AS/400 mapping keys

Bhouse53
5 pts.
Tags:
AS/400
AS/400 administration
AS400 Data Definitions
do you have a mapping to keys for commands on as400
Asked: Last updated:

Answer Wiki

Thanks. We'll let you know when a new response is added.

if you are talking about the “F” keys, they are KA, KB, KC, KD, etc in RPG II/III.

if you use the IndAra keyword in the DDS, it would look like:

A CA03(03)

this turns on *In03 in the RPG program.

if you go further and define the F & D-specs like this:

FLkUpDonrD cf e workstn IndDs(Indicators)

d Indicators Ds
d Exit n OverLay(Indicators:03)

the keyword ot look for is Exit, not

if you mean keyboard mapping so that one key does many keystrokes, then you have to use a PC or programmable keyboard.

if a PC, you right-click on the blue-bar and map it there.

-sarge

Discuss This Question: 3  Replies

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.
  • TomLiotta
    What mapping? What commands? The question needs a lot of explanation. Tom
    125,585 pointsBadges:
    report
  • Splat
    Another method is not to assign indicators to function keys in the display file but use the AID (named 'function' in the following example) from the workstation INFDS 
    FDisplyFile Cf   e             Workstn                     
F                                     infds(workstn)      


D Workstn         Ds                 
D  dspfilnm         *file            
D  dsprcdnm         *record          
D  function             369    369   
D  cursor               370    371b 0


D F1              C                   const(x'31')
D F2              C                   const(x'32')
D F3              C                   const(x'33')
D F4              C                   const(x'34')
D F5              C                   const(x'35')
D F6              C                   const(x'36')
D F7              C                   const(x'37')
D F8              C                   const(x'38')
D F9              C                   const(x'39')
D F10             C                   const(x'3A')
D F11             C                   const(x'3B')
D F12             C                   const(x'3C')
                                                  
D F13             C                   const(x'B1')
D F14             C                   const(x'B2')
D F15             C                   const(x'B3')
D F16             C                   const(x'B4')
D F17             C                   const(x'B5')
D F18             C                   const(x'B6')
D F19             C                   const(x'B7')
D F20             C                   const(x'B8')
D F21             C                   const(x'B9')
D F22             C                   const(x'BA')
D F23             C                   const(x'BB')
D F24             C                   const(x'BC')
                                                  
D Clear           C                   const(x'BD')
D Enter           C                   const(x'F1')
D Help            C                   const(x'F3')
D Roll_down       C                   const(x'F4')
D Page_up         C                   const(x'F4')
D Roll_up         C                   const(x'F5')
D Page_down       C                   const(x'F5')
D Print           C                   const(x'F6')
D Home            C                   const(x'F8')
D Auto_enter      C                   const(x'3F')


If function = f3  or
   function = f12 or
   function = home;
Exsr End_of_pgm;
EndIf;
    I usually keep the function key constants in a /copy member.
    12,805 pointsBadges:
    report
  • TomLiotta
    if a PC, you right-click on the blue-bar and map it there. What "blue-bar"? I use iSeries Access (PComm), Mocha, TN5250 and Windows telnet emulators regularly. None have a "blue-bar" that I can see, except the window title bars. Tom
    125,585 pointsBadges:
    report

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: