configure keyboard



IBM's Command List programming language & Restructured Extended Executor

Re: configure keyboard

Postby Robert Sample » Fri May 06, 2011 8:26 pm

Keyboard mappings depend upon the terminal emulator you are using (such as PC3270, REFLECTION, HUMMINGBIRD, etc). Consult your terminal emulation documentation to find out if what you want to do is possible under that emulator, and if so, how to do it.
Robert Sample
Global moderator
 
Posts: 3719
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: configure keyboard

Postby Pedro » Wed May 11, 2011 2:31 am

Julie, it is still not clear what you are asking for. Making assumption...

For PCOMM: in your ISPF application, you would still define ZPF19 as you desire.

From the PCOMM keyboard utility, you can re-map the keys. First, select the 'n' key. Then assign 'program function key 19' to the Ctrl key.

For my use, I mapped Ctrl-F to PF5. So when I press Ctrl-F, it issues PF5 and works as a RFIND (repeat find).
Pedro Vera
User avatar
Pedro
 
Posts: 684
Joined: Thu Jul 31, 2008 9:59 pm
Location: Silicon Valley
Has thanked: 0 time
Been thanked: 53 times

Re: configure keyboard

Postby Julie » Wed May 11, 2011 12:40 pm

Thanks Pedro.
I finally decided to create a command in ISPCLIB.
Address TSO                                                   
"ALTLIB ACTIVATE APPLICATION(CLIST) DA('DMONT.ISPF.REXX')"     
Address ISPEXEC                                               
"LIBDEF ISPPLIB DATASET ID('DMONT.ISPF.PANEL')"               
"LIBDEF ISPSLIB DATASET ID('DMONT.ISPF.SKELS')"               
"LIBDEF ISPMLIB DATASET ID('DMONT.ISPF.MSG')"                 
CALL MONCMPEM                                                 
Address ISPEXEC                                               
"LIBDEF ISPMLIB"                                               
"LIBDEF ISPSLIB"                                               
"LIBDEF ISPPLIB"                                               
Address TSO                                                   
"ALTLIB DEACTIVATE APPLICATION(CLIST)"                         
Exit (1)                                                       


'isredit macro'                             
'isredit locate next msgline'               
if rc = 4 then 'ispexec setmsg msg(moner004)'
Julie
 
Posts: 21
Joined: Tue May 03, 2011 12:45 pm
Has thanked: 0 time
Been thanked: 0 time

Previous

Return to CLIST & REXX