added sysprog entities
This commit is contained in:
87
SYSPROG/STPROCINS/WINDOW.CONSTANTS.txt
Normal file
87
SYSPROG/STPROCINS/WINDOW.CONSTANTS.txt
Normal file
@ -0,0 +1,87 @@
|
||||
Compile Insert window.constants
|
||||
* rjc 12-08-15 Import from Arev_bp
|
||||
* W.ENV LAYOUT
|
||||
|
||||
EQU NEXT.HELP.NO$ TO 1
|
||||
EQU VARY.TYPE$ TO 2
|
||||
EQU VARY.POS$ TO 3
|
||||
EQU PRESERVE.KEYS$ TO 4
|
||||
EQU PRESERVE.FIELDS$ TO 5
|
||||
EQU DFLT.MASK$ TO 6
|
||||
EQU BROWSE.OFF$ TO 8
|
||||
|
||||
* DISPLAY.ACTION DEFINITIONS
|
||||
|
||||
EQU REDISPLAY.HIGHLIGHTS$ TO 4
|
||||
EQU REDISPLAY.PROMPTS$ TO 5
|
||||
EQU REDISPLAY.LIST$ TO 6
|
||||
EQU REDISPLAY.ALL$ TO 7
|
||||
EQU RECALC.PROMPTS$ TO 9
|
||||
|
||||
* WINDOW.ACTION DEFINITIONS
|
||||
|
||||
EQU TOGGLE.TW.MODE$ TO 1
|
||||
EQU PRINT.BROWSE.LIST$ TO 2
|
||||
EQU MPR.MODE$ TO 12
|
||||
EQU PAN.MODE$ TO 4
|
||||
EQU MOVE.MODE$ TO 8
|
||||
EQU RESIZE.MODE$ TO 12
|
||||
|
||||
* PROMPT.TYPE DEFINITIONS
|
||||
|
||||
EQU PT.FILE$ TO 1
|
||||
EQU PT.KEY$ TO 2
|
||||
EQU PT.SYMBOLIC$ TO 3
|
||||
EQU PT.DATA$ TO 4
|
||||
|
||||
* AMV.VARS DEFINITIONS
|
||||
|
||||
EQU AMV.DISPLAY$ TO 1
|
||||
EQU AMV.WIDTH$ TO 2
|
||||
EQU AMV.DEPTH$ TO 3
|
||||
EQU AMV.MAX$ TO 4
|
||||
EQU AMV.LINER$ TO 5
|
||||
|
||||
* AMV.ACTION DEFINITIONS
|
||||
|
||||
EQU AMV.CLEAR$ TO 1
|
||||
EQU AMV.DELETE$ TO 2
|
||||
EQU AMV.INSERT$ TO 3
|
||||
EQU AMV.CHANGED$ TO 4
|
||||
EQU AMV.CHANGED.ALL$ TO 5
|
||||
|
||||
* MODULE # PARAMETER TO JOINER()
|
||||
|
||||
EQU READ.ALL.JOINS$ TO 1
|
||||
EQU CHANGE.JOIN$ TO 2
|
||||
EQU UNLOCK.JOIN$ TO 3
|
||||
EQU UPDATE.JOIN$ TO 4
|
||||
EQU DELETE.JOIN$ TO 5
|
||||
EQU INIT.JOIN$ TO 6
|
||||
EQU JOIN.COUNT$ TO 9
|
||||
|
||||
* PSEUDO.FILE LAYOUT
|
||||
|
||||
EQU PSEUDO.SETUP$ TO 1
|
||||
EQU PSEUDO.SAVE$ TO 4
|
||||
EQU PSEUDO.EXIT$ TO 7
|
||||
*EQU PSEUDO.SET$ TO 8 (Removed to allow collector window to null pseudo.file)
|
||||
|
||||
* FORMAT TYPE
|
||||
|
||||
EQU TEXT TO 'T'
|
||||
EQU NOFORMAT TO 'TN'
|
||||
|
||||
* RESET VALUES
|
||||
|
||||
EQU CLEAN.UP.LINE$ TO 1
|
||||
EQU CLEAN.UP.EDIT$ TO 2
|
||||
EQU RESET.EDIT$ TO 3
|
||||
EQU RESET.PROMPT$ TO 4
|
||||
EQU RESET.RECORD$ TO 5
|
||||
EQU RESET.WINDOW$ TO 6
|
||||
|
||||
* EXTRA KEY DEFINITIONS
|
||||
|
||||
*EQU COPY.KEY$ TO \002E\ ;* 02/02/88 - DW - SPEC 111 USED IN WIN.INT
|
||||
* Source Date: 13:11:06 28 JUL 1992 Build ID: AREV*2.2.58 Level: 2.2
|
Reference in New Issue
Block a user