home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
VSCPPv7.zip
/
VACPP
/
IBMCPP
/
macros
/
XEDIT.LX
< prev
next >
Wrap
Text File
|
1995-05-11
|
675b
|
26 lines
/* XEDIT key behaviour */
'MACRO LPEX'
'SET ACTION.ENTER ;PREFIXPROCESS ;PRIMITIVE PREVIOUSTAB'
'MACRO XEDITPRF'
'EXTRACT VIEWNUM'
'EXTRACT VIEWLIST'
do while(viewlist \= '')
'GOVIEW NOACT VIEWNUM 'subword(viewlist,1,1)
'SET MENUCHECK.LP_LPEXKEYS OFF'
'SET MENUCHECK.LP_EPMKEYS OFF'
'SET MENUCHECK.LP_SEUKEYS OFF'
'SET MENUCHECK.LP_XEDITKEYS ON'
'SET MENUCHECK.LP_ISPFKEYS OFF'
'SET MENUCHECK.LP_CUSTOMIZE OFF'
'SET PREFIXDISPLAYFORMAT 99999'
'SET PREFIXSHOW ON'
viewlist = delword(viewlist,1,1)
end
'GOVIEW NOACT VIEWNUM 'VIEWNUM
'EXTRACT DOCNUM INTO DOCNUM'
"SET GLOBAL.DOC" || DOCNUM || " 'MACRO XEDIT'"