I have written the following code to override the default ISPF Key assignments. I would like PF7(Scroll-Up) and PF8(Scroll-Down) to be handled by my application. However, the PF07 and PF08 keys still default to UP and DOWN.
ZPF8 = 'NEXT'
Address Ispexec "ADDPOP"
Address Ispexec "VPUT (ZPF7,ZPF8) PROFILE"
Say 'VPUT RC: ' RC
Address Ispexec "DISPLAY PANEL(DYNAREA)"
DISPLAY_RC = RC
ADDRESS ISPEXEC "REMPOP"
At this point, I do not wish to define a new keylist with an APPLID. I tried searching the forum and other articles on the Internet, to override Pfkeys. But, I think I am missing something. Below is my ISPF Panel WYSIWIG code.
@ AREA(DYNAMIC) SCROLL(OFF)
Y TYPE(CHAR) COLOR(TURQUOISE) HILITE(REVERSE)
~ TYPE(CHAR) COLOR(GREEN)
$ TYPE(DATAIN) COLOR(TURQUOISE) HILITE(REVERSE)
_ TYPE(NEF) PADC(_)
| TYPE(TEXT) COLOR(YELLOW)
¢ TYPE(DATAOUT) COLOR(BLUE)
)BODY WINDOW(76,12) CMD(ZCMD)
| MINE - Structure Chart Generator
?Command ==> _ZCMD
Thank you very much.