LEX2079 ;ISL/KER - LEX*2.0*79 Env Check ;07/01/2011
Source file <LEX2079.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENV2 | ; Environment Check (for testing only)
|
|
CKO | ; Kill and Obtain new global
|
|
GBLS | ; Check Write access on globals
|
|
BM(X) | ; Blank Line with Message
|
|
TRIM(X) | ; Trim Spaces
|
|
ET(X) | ; Error Text
|
|
EF | ; Exported Files
|
|
CO | ; Obtain new global
|
|
CM | ; Missing ^LEXM
|
|
ED | ; Error Display
|
|
CHK | ; Check the Checksum
|
|
CF | ; Failed checksum
|
|
INSD(X) | ||
IMP | ; Import names
|
|
UR(X) | ; Check User variables
|
|
RGNF | ; Required global not found
|
|
ENV | ; Environment Check
; ; General |
|
CS | ; Checksum for import global
|
|
RGBL(X) | ; Check Write access on globals
|
|
CW | ; Wrong ^LEXM
|
|
CU | ; Unable to verify
|
|
QUIT | ; Quit Passed Environment Check
|
|
ABRT | ; Abort Failed Environment Check, KILL the distribution
|
|
OK | ; Environment is OK
|
|
VC(X,Y) | ; Verify Checksum for import global
|
|
SY(X) | ; Check System variables
|
|
NOTDEF(IEN) | ; Check to see if user is defined
|
|
M(X) | ; Message
|
|
GD | ; Global Data
|
|
EXIT | ; Exit Failed Environment Check
|
|
TEST | ;
|
|
INS(X) | ; Installed
|
|
CPD(X) | ; Check Current Patched Data is installed
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences |
---|---|
$$CPD | ENV+57, GBLS+8, RGBL+2 |
$$INS | ENV+33 |
$$INSD | ENV+33 |
$$NOTDEF | UR+2 |
$$RGBL | ENV+47 |
$$SY | ENV+12 |
$$TRIM | GBLS+9, RGBL+3 |
$$UR | ENV+10 |
$$VC | CS+3 |
ABRT | ENV+13, ENV+20, ENV+46, ENV+48, ENV+49, ENV+59, ENV+61 |
BM | ENV+7, GBLS+2, GBLS+5, GBLS+7, CHK+2, CS+1, OK+3 |
CF | CS+5 |
CKO | CW+3, CW+4, CU+1, CF+1 |
CM | RGBL+11, RGNF+3, CS+5 |
CO | CM+1 |
CS | ENV+61, CHK+1 |
CU | CS+5 |
CW | CS+5, TEST+1 |
ED | EXIT+1, ABRT+1, CHK+1, TEST+1 |
ENV | ENV2+1 |
ET | ENV+10, ENV+12, ENV+21, ENV+44, RGBL+10, RGNF+2, CM+1, CW+1, CW+3, CW+4 , CU+1, CF+1, CO+2, CO+3, CO+4, CKO+1, CKO+2, CKO+3, CKO+4, CKO+5 |
GBLS | ENV+59 |
IMP | ENV+4, ENV+24, RGNF+1, VC+2, CM+1, CW+1, CU+1, CF+1, CO+1, CKO+1 , OK+2 |
M | ENV+7, ENV+43, ENV+46, GBLS+3, GBLS+4, GBLS+6, GBLS+7, GBLS+12, GBLS+13, GBLS+14 , CHK+2, CS+4, VC+7, ED+1, ED+2, OK+3 |
OK | QUIT+1 |
QUIT | ENV+50, ENV+57 |
RGNF | GBLS+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | INSD+1~, INSD+7!, INSD+15!, NOTDEF+1~* |
DA(1 | INSD+7*, INSD+15* |
DA(2 | INSD+15* |
DIC | NOTDEF+1~* |
DIQ | NOTDEF+1~* |
DR | NOTDEF+1~* |
DUZ | UR+2 |
DUZ(0 | UR+1 |
IEN | NOTDEF~, NOTDEF+1 |
INS | CPD+1~* |
IO | SY+1 |
IOF | SY+1 |
IOM | SY+1 |
ION | SY+1 |
IOSL | SY+1 |
IOST | SY+1 |
LEX | ENV+25~, INS+1~*, INS+2, INSD+1~*, INSD+2, NOTDEF+1~ |
LEXB | CW+1~*, CW+2, CW+3 |
LEXB1 | GBLS+1~, GBLS+11*, GBLS+13, RGBL+1~, RGBL+5* |
LEXB2 | GBLS+1~, GBLS+11*, GBLS+13, RGBL+1~, RGBL+5* |
LEXBUILD | ENV+4~, ABRT+1, RGNF+1~, VC+1~, VC+2, CM+1~, CW+1~, CW+2, CU+1~, CF+1~ , CO+1~, CO+3, CKO+1~, CKO+5, OK+1~, OK+2, IMP+9* |
LEXC | ENV+25~, ENV+26*, ENV+28*, ENV+45, VC+3~, VC+8*, VC+9 |
LEXC1 | ENV+25~, ENV+26*, ENV+37 |
LEXC2 | ENV+25~, ENV+26*, ENV+29, ENV+35, ENV+38 |
LEXC3 | ENV+25~, ENV+26*, ENV+29*, ENV+36, ENV+40, ENV+42 |
LEXC4 | ENV+25~, ENV+26*, ENV+29*, ENV+42 |
LEXCK | CS+2~*, CS+3, VC+3~, VC+4*, VC+5, VC+17 |
LEXCNT | VC+3~, VC+6*, VC+12*, VC+13* |
LEXCOM | ENV+31~, ENV+32*, ENV+42 |
LEXCPD | GBLS+1~, GBLS+8*, GBLS+10, RGBL+1~, RGBL+2*, RGBL+4 |
LEXD | VC+3~, VC+14* |
LEXDA | INSD+1~, INSD+7*, INSD+8, INSD+15*, INSD+17, INSD+19 |
LEXE | ENV+4~, ENV+13, ENV+46, ENV+48, ENV+49, ENV+59, ENV+61, EXIT+1!, ABRT+1, ABRT+2! , GBLS+1~, GBLS+9*, INSD+1~, INSD+21*, INSD+22, CHK+1, CS+1!, ED+2! |
LEXE( | ET+1*, ED+1 |
LEXE(0 | ET+1* |
LEXEC | RGBL+1~, RGBL+3* |
LEXF | GBLS+1~, GBLS+10*, GBLS+13, RGBL+1~, RGBL+4* |
LEXFULL | ENV+50, ENV+57, QUIT+1!, EXIT+1!, ABRT+2! |
LEXFY | ENV+4~, ENV+6, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~ , OK+1~, IMP+13* |
LEXG | ENV+4~, ENV+47*, ENV+48, ENV+49 |
LEXGBL | GBLS+1~, GBLS+10*, GBLS+12, GBLS+13, RGBL+1~, RGBL+4*, RGBL+6, RGNF+2, RGNF+3 |
LEXGCS | VC+3~, VC+8*, VC+15*, VC+17 |
LEXI | ENV+25~, ENV+27*, ENV+28, ENV+30*, ENV+31, ENV+34, GBLS+1~, GBLS+8*, GBLS+9, RGBL+1~ , RGBL+2*, RGBL+3, INS+1~, INS+2*, INS+3, INSD+1~, INSD+18*, INSD+20*, INSD+21, INSD+22 , ET+1~*, ED+1~* |
LEXIGHF | ENV+4~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CO+3, CKO+1~ , CKO+4, OK+1~, IMP+11* |
LEXINE | ENV+31~, ENV+33*, ENV+41 |
LEXINS | ENV+31~, ENV+33* |
LEXIT | ENV+57~* |
LEXL | VC+3~, VC+6*, VC+13 |
LEXLC | VC+3~, VC+6*, VC+13* |
LEXLREV | ENV+4~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, OK+1~ , IMP+4* |
LEXMSG | INSD+1~, INSD+6!, INSD+13! |
LEXN | VC+3~, VC+8*, VC+9*, VC+10, VC+11, VC+14 |
LEXNC | VC+3~, VC+8*, VC+14*, VC+16 |
LEXND | CS+2~, CS+3*, VC+3~, VC+4*, VC+5, VC+6, VC+16 |
LEXNS | INSD+1~, INSD+2*, INSD+3, INSD+5 |
LEXO | ENV+25~, ENV+40*, ENV+45 |
LEXOK | GBLS+1~*, GBLS+12*, GBLS+14 |
LEXOUT | INSD+1~, INSD+6!, INSD+13! |
LEXOUT("DILIST" | INSD+6, INSD+9, INSD+11, INSD+13, INSD+18, INSD+20 |
LEXP | ENV+25~, INS+1~, INS+2*, VC+3~, VC+15* |
LEXPAT | ENV+25~, ENV+28*, ENV+29, ENV+31~, ENV+32*, ENV+33, ENV+37, ENV+44 |
LEXPI | INSD+1~, INSD+6*, INSD+7, INSD+14, INSD+15, INSD+16 |
LEXPN | ENV+25~, ENV+33*, ENV+39, ENV+44, INSD+1~, INSD+2*, INSD+3*, INSD+9, INSD+11, INSD+13 , INSD+17, INSD+19 |
LEXPTYPE | ENV+4~, ENV+6, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~ , OK+1~, IMP+1*, IMP+2* |
LEXQTR | ENV+4~, ENV+6, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~ , OK+1~, IMP+15* |
LEXR | ENV+25~, ENV+26*, ENV+29*, ENV+35, ENV+36 |
LEXREL | ENV+31~, ENV+32*, ENV+38 |
LEXREQ | ENV+31~*, ENV+32 |
LEXREQP | ENV+4~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, OK+1~ |
LEXREQP( | ENV+27, ENV+28, ENV+30, ENV+31 |
LEXREQP(0 | ENV+24 |
LEXREQP(1 | IMP+6* |
LEXREQP(2 | IMP+7* |
LEXRT | GBLS+1~, GBLS+10*, GBLS+11, GBLS+12, GBLS+13, RGBL+1~, RGBL+4*, RGBL+5, RGBL+6 |
LEXS | GBLS+1~, GBLS+8*, RGBL+1~, RGBL+2*, RGBL+6*, RGBL+7, RGBL+8*, RGBL+9*, RGBL+10, VC+3~ , VC+6*, VC+7*, VC+13 |
LEXSCR | INSD+1~, INSD+4*, INSD+5, INSD+16*, INSD+17, INSD+19* |
LEXSTR | ENV+4~, ENV+6*, ENV+7 |
LEXT | GBLS+1~, GBLS+10*, GBLS+11, GBLS+13, RGBL+1~, RGBL+4*, RGBL+5, VC+3~, VC+14*, VC+15 , OK+1~, OK+2*, OK+3 |
LEXTX | ENV+31~, ENV+37*, ENV+38*, ENV+40*, ENV+41*, ENV+42*, ENV+43 |
LEXV | INS+1~, INS+2*, INS+3, CS+2~, CS+3*, CS+4, CS+5 |
LEXVD | INSD+1~, INSD+9*, INSD+10, INSD+11*, INSD+12 |
LEXVI | INSD+1~, INSD+13*, INSD+14, INSD+15, INSD+16 |
LEXVR | INSD+1~, INSD+2*, INSD+3*, INSD+4, INSD+8 |
LEXX | GBLS+1~, GBLS+8, GBLS+9*, GBLS+10, RGBL+1~, RGBL+2, RGBL+3*, RGBL+4 |
U | ENV+8* |
X | GBLS+1~, GBLS+8*, RGBL~, RGBL+2*, RGBL+6*, RGBL+7, RGBL+10, RGBL+11, RGBL+12, INS~ , INS+1*, INSD~, INSD+1, INSD+2, INSD+9, INSD+10*, INSD+11, INSD+12*, INSD+22*, INSD+23 , VC~, VC+4, SY~, UR~, CPD~, ET~, ET+1, BM~, BM+1*, M~ , M+1*, TRIM~, TRIM+1*, TRIM+2*, TRIM+3 |
>> XPDABORT | ABRT+1* |
>> XPDDIQ("XPI1" | ENV+5!* |
>> XPDDIQ("XPZ1" | ENV+5!* |
XPDENV | ENV+50, ENV+59, ENV+61, ENV2+1~* |
>> XPDQUIT | EXIT+1*, ABRT+1* |
>> XPDQUIT( | ABRT+1* |
Y | VC~, VC+4 |