added sysprog entities

This commit is contained in:
Infineon\StieberD
2024-03-25 15:17:34 -07:00
parent 600a8e1f61
commit 3a6a2b6b5b
1028 changed files with 171660 additions and 0 deletions

View File

@ -0,0 +1,19 @@
compile Insert global_Common
*
* GLOBAL_COMMON Insert File
*
* Labeled common variable which holds global environment parameters.
*
* created 6/7/89 jpv
COMMON /%GLOBAL.ENV%/ GLOBAL.ENV@
EQU E.COMMIT.VOLUME$ TO 1 ;* Contains global commit volume
EQU E.COMMIT.PROT$ TO 2 ;* 1 = Yes, 0 = No
EQU E.VICTIM.SELECTION$ TO 3 ;* For deadlock situations.
EQU E.IMPLICIT.LOCKING$ TO 4 ;* 1 = Record locking, 0 = File locking
EQU E.COORD.LOCKING$ TO 5 ;* Automatic coordinated locking (on/off)
EQU SYSTEM_RECORD$ TO "%GLOBAL_ENVIRONMENT%" ;* Record name in SYSTEM file where global constants are kept
* Source Date: 17:07:55 30 JUN 1992 Build ID: AREV*2.2.38 Level: 2.2