LEX2080 ;ISL/KER - LEX*2.0*80 Env Check ;04/21/2014
Source file <LEX2080.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MAILQ | ; Quit Mail
|
|
ENV2 | ; Environment Check #2 - XPDENV=1
|
|
CKO | ; Kill and Obtain new global
|
|
GBLS | ; Check Write access on globals
|
|
IGT(X) | ; Import Global Error Text
|
|
KILL | ; Kill all ^TMP(
|
|
BM(X) | ; Blank Line with Message
|
|
GOK(X) | ; Input Global Ok for Install
|
|
TRIM(X) | ; Trim Spaces
|
|
CU | ; Unable to verify
|
|
ET(X) | ; Error Text
|
|
INSD(X) | ; Installed on
|
|
CO | ; Obtain new global
|
|
CM | ; Missing ^LEXM
|
|
ED | ; Error Display
|
|
CF | ; Failed checksum
|
|
NOTDEF(IEN) | ; Check to see if user is defined
|
|
IMP | ; Import names
|
|
UR(X) | ; Check User variables
|
|
RGNF | ; Required global not found
|
|
ENV | ; LEX*2.0*80 Environment Check
; Checks |
|
CS | ; Checksum for import global
|
|
RGBL(X) | ; Check Write access on globals
|
|
CW | ; Wrong ^LEXM
|
|
IG | ; Import Global
|
|
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
|
|
ADR(LEX) | ; Mailing Address
|
|
M(X) | ; Message
|
|
GD | ; Global Data
|
|
EXIT | ; Exit Failed Environment Check
|
|
UOK(X) | ; UCI Ok for Install
|
|
; Mail global array in message
|
||
INS(X) | ;
|
Name | Field # of Occurrence |
---|---|
^DIC | ADR+1, ADR+2 |
FIND^DIC | INSD+5, INSD+8, INSD+17, INSD+19 |
$$IENS^DILF | INSD+7, INSD+15 |
$$GET1^DIQ | MAIL+5 |
EN^DIQ1 | NOTDEF+1 |
$$FMTE^XLFDT | ENV+26, INSD+10, INSD+12, INSD+21 |
^XMD | MAIL+12 |
$$NETNAME^XMXUTIL | UOK+1 |
$$PATCH^XPDUTL | INS+1 |
$$PKG^XPDUTL | INS+2, INSD+2 |
$$VER^XPDUTL | INS+2, INSD+2 |
$$VERSION^XPDUTL | ENV+11, INS+2 |
BMES^XPDUTL | BM+1 |
MES^XPDUTL | M+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^DIC(4.2 - [#4.2] | Classic Fileman Calls |
^DIC(9.4 - [#9.4] | FIND^DIC |
9.49 | FIND^DIC |
9.4901 | FIND^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("UCI" | UOK+2 |
^%ZOSF("UCICHECK" | UOK+2 |
^LEXM | GOK+2 |
^LEXM(0 | GOK+3, CS+3, CS+4, VC+3, VC+8, CW+1 |
^LEXM(757 | IG+3 |
^LEXM(757.001 | IG+3 |
^LEXM(757.01 | IG+4 |
^LEXM(757.02 | IG+4 |
^LEXM(757.03 | IG+5 |
^LEXM(757.033 | IG+5 |
^LEXM(757.1 | IG+6 |
^LEXM(757.2 | IG+6 |
^LEXM(757.3 | IG+7 |
^LEXM(757.31 | IG+7 |
^LEXM(80 | GOK+2, IG+2 |
^LEXM(80.1 | GOK+2, IG+2 |
^LEXM(80.4 | GOK+2 |
^TMP("LEX*2.0*80" | RGNF+1, GOK+1, CS+1, VC+2, IG+1, MAIL+3 |
^TMP("LEXKID" | MAIL+6, MAIL+8, MAIL+10!, KILL+1! |
^TMP("LEXMSG" | MAIL+3!, MAIL+7, MAIL+8*, MAIL+9*, MAIL+10, MAIL+11, KILL+1! |
Name | Line Occurrences |
---|---|
$$ADR | MAIL+4 |
$$INS | ENV+23 |
$$INSD | ENV+23 |
$$NOTDEF | UR+2 |
$$RGBL | ENV+38 |
$$SY | ENV+8 |
$$TRIM | GBLS+9, RGBL+3 |
$$UR | ENV+6 |
$$VC | CS+4 |
ABRT | ENV+9, ENV+11, ENV+34, ENV+35, ENV+37, ENV+39, ENV+40, ENV+50, ENV+52 |
BM | GBLS+2, GBLS+5, GBLS+7, CS+2, OK+3 |
CF | CS+6 |
CKO | CW+3, CW+4, CU+1, CF+1 |
CM | RGBL+11, RGNF+3, CS+6 |
CO | CM+1 |
CS | ENV+52 |
CU | CS+6 |
CW | CS+6 |
ED | EXIT+1, ABRT+1 |
ENV | ENV2+1 |
ET | ENV+6, ENV+8, ENV+12, ENV+32, 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 , IG+9, IG+10, IG+11, IG+12, IGT+1 |
GBLS | ENV+50 |
IG | ENV+35 |
IGT | IG+2, IG+3, IG+4, IG+5, IG+6, IG+7 |
IMP | ENV+2, ENV+14, RGNF+1, GOK+1, CS+1, VC+2, CM+1, CW+1, CU+1, CF+1 , CO+1, CKO+1, IG+1, IG+9, OK+2, MAIL+2 |
KILL | MAILQ+1 |
M | ENV+31, ENV+34, ENV+35, GBLS+3, GBLS+4, GBLS+6, GBLS+7, GBLS+12, GBLS+13, GBLS+14 , CS+5, VC+8, ED+1, ED+2, OK+3 |
MAILQ | MAIL+4, MAIL+5, MAIL+10, MAIL+11 |
OK | QUIT+1 |
QUIT | ENV+36, ENV+41, ENV+48 |
RGNF | GBLS+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CT | IG+1~*, IGT+1* |
DA | NOTDEF+1~*, INSD+1~, INSD+7!, INSD+15! |
DA(1 | INSD+7*, INSD+15* |
DA(2 | INSD+15* |
DIC | NOTDEF+1~*, ADR+1~*, ADR+2* |
DIC(0 | ADR+1*, ADR+2* |
DIFROM | MAIL+1~ |
DIQ | NOTDEF+1~* |
DR | NOTDEF+1~* |
DTOUT | ADR+1~ |
DUOUT | ADR+1~ |
DUZ | UR+2, MAIL+5 |
DUZ(0 | UR+1 |
IEN | NOTDEF~, NOTDEF+1 |
IO | SY+1 |
IOF | SY+1 |
IOM | SY+1 |
ION | SY+1 |
IOSL | SY+1 |
IOST | SY+1 |
LEX | ENV+15~, NOTDEF+1~, ADR~, ADR+1*, ADR+2*, INS+1~*, INS+2, INSD+1~*, INSD+2 |
LEXADR | MAIL+1~, MAIL+5*, MAIL+11 |
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+2~, RGNF+1~, GOK+1, GOK+3, CS+1, VC+1~, VC+2, VC+3, CM+1~, CW+1~ , CW+2, CU+1~, CF+1~, CO+1~, CO+3, CKO+1~, CKO+5, IG+1, IG+9~, OK+1~ , OK+2, MAIL+2~, MAIL+4, IMP+18* |
LEXC | ENV+15~, ENV+16*, ENV+18*, ENV+33, VC+4~, VC+9*, VC+10 |
LEXC1 | ENV+15~, ENV+16*, ENV+25 |
LEXC2 | ENV+15~, ENV+16*, ENV+19, ENV+24, ENV+26 |
LEXC3 | ENV+15~, ENV+16*, ENV+19*, ENV+28, ENV+30 |
LEXC4 | ENV+15~, ENV+16*, ENV+19*, ENV+30 |
LEXCK | CS+3~*, CS+4, VC+4~, VC+5*, VC+6, VC+18 |
LEXCNT | VC+4~, VC+7*, VC+13*, VC+14* |
LEXCOM | ENV+21~, ENV+22*, ENV+30 |
LEXD | VC+4~, VC+15* |
LEXDA | INSD+1~, INSD+7*, INSD+8, INSD+15*, INSD+17, INSD+19 |
LEXE | ENV+2~, ENV+9, ENV+34, ENV+35, ENV+37, ENV+39, ENV+40, ENV+50, ENV+52, EXIT+1! , ABRT+1, ABRT+2!, GBLS+1~, GBLS+9*, CS+1!, IG+8, ED+2!, INSD+1~, INSD+21*, INSD+22 |
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+36, ENV+41, ENV+48, QUIT+1!, EXIT+1!, ABRT+2! |
LEXFY | ENV+2~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, IG+9~ , OK+1~, MAIL+2~, IMP+18* |
LEXG | ENV+2~, ENV+38*, ENV+39, ENV+40 |
LEXGBL | GBLS+1~, GBLS+10*, GBLS+12, GBLS+13, RGBL+1~, RGBL+4*, RGBL+6, RGNF+2, RGNF+3 |
LEXGCS | VC+4~, VC+9*, VC+16*, VC+18 |
LEXI | ENV+15~, ENV+17*, ENV+18, ENV+20*, ENV+21, ENV+24, GBLS+1~, GBLS+8*, GBLS+9, RGBL+1~ , RGBL+2*, RGBL+3, ET+1~*, ED+1~*, MAIL+1~, MAIL+6*, MAIL+8, INS+1~, INS+2*, INS+3 , INSD+1~, INSD+18*, INSD+20*, INSD+21, INSD+22 |
LEXIGHF | ENV+2~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CO+3, CKO+1~ , CKO+4, IG+9~, IG+11, OK+1~, MAIL+2~, IMP+18* |
LEXINE | ENV+21~, ENV+23*, ENV+29 |
LEXINS | ENV+21~, ENV+23* |
LEXIT | ENV+48~* |
LEXL | VC+4~, VC+7*, VC+14 |
LEXLC | VC+4~, VC+7*, VC+14* |
LEXLREV | ENV+2~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, IG+9~ , OK+1~, MAIL+2~, IMP+17* |
LEXM | MAIL+1~, MAIL+7*, MAIL+8, MAIL+9 |
LEXMSG | INSD+1~, INSD+6!, INSD+13! |
LEXN | VC+4~, VC+9*, VC+10*, VC+11, VC+12, VC+15 |
LEXNC | VC+4~, VC+9*, VC+15*, VC+17 |
LEXND | CS+3~, CS+4*, VC+4~, VC+5*, VC+6, VC+7, VC+17 |
LEXNS | INSD+1~, INSD+2*, INSD+3, INSD+5 |
LEXO | ENV+15~, ENV+28*, ENV+33 |
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+15~, VC+4~, VC+16*, INS+1~, INS+2* |
LEXPAT | ENV+15~, ENV+18*, ENV+19, ENV+21~, ENV+22*, ENV+23, ENV+25, ENV+32 |
LEXPI | INSD+1~, INSD+6*, INSD+7, INSD+14, INSD+15, INSD+16 |
LEXPN | ENV+15~, ENV+23*, ENV+27, ENV+32, INSD+1~, INSD+2*, INSD+3*, INSD+9, INSD+11, INSD+13 , INSD+17, INSD+19 |
LEXPRI | MAIL+1~, MAIL+4*, MAIL+5*, MAIL+11 |
LEXPTYPE | ENV+2~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, IG+9~ , OK+1~, MAIL+2~, IMP+17* |
LEXQTR | ENV+2~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, IG+9~ , OK+1~, MAIL+2~, IMP+18* |
LEXR | ENV+15~, ENV+16*, ENV+19*, ENV+24 |
LEXREL | ENV+21~, ENV+22*, ENV+26 |
LEXREQ | ENV+21~*, ENV+22 |
LEXREQP | ENV+2~, RGNF+1~, VC+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+1~, CKO+1~, IG+9~ , OK+1~, MAIL+2~ |
LEXREQP( | ENV+17, ENV+18, ENV+20, ENV+21 |
LEXREQP(0 | ENV+14 |
LEXREQP(1 | IMP+1* |
LEXREQP(2 | IMP+2* |
LEXREQP(3 | IMP+3* |
LEXREQP(4 | IMP+4* |
LEXREQP(5 | IMP+8* |
LEXREQP(6 | IMP+11* |
LEXREQP(7 | IMP+16* |
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+4~ , VC+7*, VC+8*, VC+14 |
LEXSCR | INSD+1~, INSD+4*, INSD+5, INSD+16*, INSD+17, INSD+19* |
LEXSTR | ENV+2~ |
LEXSUB | MAIL+1~, MAIL+3*, MAIL+4*, MAIL+6 |
LEXT | GBLS+1~, GBLS+10*, GBLS+11, GBLS+13, RGBL+1~, RGBL+4*, RGBL+5, VC+4~, VC+15*, VC+16 , OK+1~, OK+2*, OK+3 |
LEXTX | ENV+21~, ENV+25*, ENV+26*, ENV+28*, ENV+29*, ENV+30*, ENV+31 |
LEXV | CS+3~, CS+4*, CS+5, CS+6, INS+1~, INS+2*, INS+3 |
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 |
TXT | IGT+1~* |
U | ENV+4* |
X | GBLS+1~, GBLS+8*, RGBL~, RGBL+2*, RGBL+6*, RGBL+7, RGBL+10, RGBL+11, RGBL+12, UOK~ , UOK+1~*, UOK+2*, GOK~, VC~, VC+5, SY~, UR~, IGT~, IGT+1, ET~ , ET+1, ADR+1~*, ADR+2*, INS~, INS+1*, INSD~, INSD+1, INSD+2, INSD+9, INSD+10* , INSD+11, INSD+12*, INSD+22*, INSD+23, BM~, BM+1, M~, M+1, TRIM~, TRIM+1* , TRIM+2*, TRIM+3 |
XCNP | MAIL+1~, MAILQ+1! |
XMDUZ | MAIL+1~, MAIL+12*, MAILQ+1! |
XMSCR | MAIL+1~, MAILQ+1! |
XMSUB | MAIL+1~, MAIL+6*, MAILQ+1! |
XMTEXT | MAIL+1~, MAIL+12*, MAILQ+1! |
XMY | MAIL+1~, MAILQ+1! |
XMY( | MAIL+11* |
XMZ | MAIL+1~, MAILQ+1! |
>> XPDABORT | ABRT+1* |
>> XPDDIQ("XPI1" | ENV+3!* |
>> XPDDIQ("XPZ1" | ENV+3!* |
XPDENV | ENV+36, ENV+41, ENV+50, ENV+52, ENV2+1~* |
>> XPDNOQUE | ENV+2* |
>> XPDQUIT | EXIT+1*, ABRT+1* |
>> XPDQUIT("ICD*18.0*57" | ABRT+1* |
>> XPDQUIT("LEX*2.0*80" | ABRT+1* |
Y | UOK+1~, UOK+2, VC~, VC+5, ADR+1~, ADR+2 |