Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LEX2019

Package: Lexicon Utility

Routine: LEX2019


Information

LEX2019 ;ISA/FJF-Environment Check/Pre/Post Install;10-01-01

Source Information

Source file <LEX2019.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 ($$PATCH,$$VERSION)^XPDUTL  
VA FileMan 1 EN^DIQ1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lexicon Utility 1 LEX2019P  

Entry Points

Name Comments DBIA/ICR reference
CKO ; Kill and Obtain new global
GBLS ; Check Write access on globals
ET(X)
CO ; Obtain new global
CM ; Missing ^LEXM
ED ; Error Display
CHK
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*19 Environment Check
;
; General
CS ; Checksum for import global
RGBL(X) ; Look for require globals
CW ; Wrong ^LEXM
CU ; Unable to verify
QUIT ; Quit Passed Environment Check
ABRT ; Abort Failed Environment Check, KILL the distribution
VC(X,Y) ; Verify Checksum for import global
SY(X) ; Check System variables
EXIT ; Exit Failed Environment Check
CPD(X) ; Check Current Patched Data is installed

External References

Name Field # of Occurrence
EN^DIQ1 NOTDEF+6
$$PATCH^XPDUTL ENV+18
$$VERSION^XPDUTL ENV+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Environment is ok",!
  • Line Location: QUIT+1
Function Call: WRITE
  • Prompt: !!,"I will now check the protection on ^LEX, ^LEXT and ^LEXM Globals. If you"
  • Line Location: GBLS+1
Function Call: WRITE
  • Prompt: !,"get an ERROR, you will need to change the protection on these globals to"
  • Line Location: GBLS+2
Function Call: WRITE
  • Prompt: !,"allow read/write as indicated for the appropriate M system:"
  • Line Location: GBLS+3
Function Call: WRITE
  • Prompt: !!," SYSTEM PROTECTION FOR FILE ACCESS ATTRIBUTES"
  • Line Location: GBLS+4
Function Call: WRITE
  • Prompt: !," ------ ---------- ----------------------------"
  • Line Location: GBLS+5
Function Call: WRITE
  • Prompt: !," DSM RW System World Group UCI"
  • Line Location: GBLS+6
Function Call: WRITE
  • Prompt: !," Open M RW Network Owner (default)"
  • Line Location: GBLS+7
Function Call: WRITE
  • Prompt: !!,"Checking:"
  • Line Location: GBLS+8
Function Call: WRITE
  • Prompt: " <",$P(LEXGL,"(",1)," not found>"
  • Line Location: GBLS+10
Function Call: WRITE
  • Prompt: " ",$P(LEXGL,"(",1)
  • Line Location: GBLS+11
Function Call: WRITE
  • Prompt: !!," OK",!
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: !!,"Running checksum routine on the ^LEXM import global, please wait"
  • Line Location: CS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CS+7
Function Call: WRITE
  • Prompt: " ok",!
  • Condition for execution: LEXVER>0
  • Line Location: CS+7
Function Call: WRITE
  • Prompt: !,LEXE(LEXI)
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LEX(757.21 - [#757.21] CPD+1
^LEXM VC+1
^LEXM(0 CS+4, CS+5, VC+1, VC+5, CW+3

Label References

Name Line Occurrences
$$CPD ENV+30
$$NOTDEF UR+2
$$RGBL ENV+22
$$SY ENV+8
$$UR ENV+6
$$VC CS+6
ABRT ENV+13, ENV+15, ENV+20, ENV+24
CF CS+11
CKO CW+7, CW+9, CU+5, CF+5
CM RGBL+20, RGNF+3, CS+8
CO CM+5
CS ENV+36, CHK
CU CS+10
CW CS+9
ED EXIT+1, ABRT+1, CHK
ET ENV+6, ENV+8, ENV+14, ENV+19, RGBL+18, RGBL+19, RGNF+2, CM+3, CM+4, CW+4
, CW+6, CW+8, CU+3, CU+4, CF+3, CF+4, CO+1, CO+2, CO+3, CO+4
, CKO+1, CKO+2, CKO+3, CKO+4
EXIT ENV+8, ENV+23, ENV+34, ENV+37
GBLS ENV+33
IMP ENV+4, ENV+17, RGBL+16, RGNF+1, VC+1, CM+2, CW+2, CU+2, CF+2
QUIT ENV+25, ENV+31
RGNF GBLS+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA NOTDEF+1~, NOTDEF+2*
DIC NOTDEF+1~, NOTDEF+4*
DIQ NOTDEF+1~, NOTDEF+5*
DR NOTDEF+1~, NOTDEF+3*
DUZ UR+2
DUZ(0 UR+1
IEN NOTDEF~, NOTDEF+2
IO SY+1
IOF SY+1
IOM SY+1
ION SY+1
IOSL SY+1
IOST SY+1
LEX NOTDEF+1~, NOTDEF+7
LEX0 RGBL+1~, RGBL+7*, RGBL+8
LEXB CW+1~, CW+3*, CW+5, CW+6
LEXBUILD ENV+4~, RGNF+1~, VC+1, CM+1~, CW+1~, CW+5, CU+1~, CF+1~, CO+3, CKO+4
, IMP+2*
LEXC VC+2~, VC+6*, VC+7
LEXCHK CS+3~, CS+4*, CS+6, VC+2~, VC+3*, VC+15
LEXCNT VC+2~, VC+4*, VC+10*, VC+11*
LEXD VC+2~, VC+12*
LEXE ENV+8, ENV+15, ENV+20, ENV+23, ENV+24, ENV+34, ENV+37, EXIT+1!, ABRT+1!, CHK
, CS+1!, ED+2!
LEXE( ET+1*, ED+1
LEXE(0 ET+1*
LEXFULL ENV+25, ENV+31, QUIT+1!, EXIT+1!, ABRT+1!
LEXG ENV+4~, ENV+22*, ENV+23, ENV+24
LEXGCS VC+2~, VC+6*, VC+13*, VC+15
LEXGL GBLS+8~, GBLS+9*, GBLS+10, GBLS+11, RGBL+1~, RGBL+3*, RGBL+4, RGBL+5, RGBL+6, RGBL+7
, RGBL+9, RGBL+10, RGNF+2, RGNF+3
LEXI ET+1~*, ED+1~*
LEXIGHF ENV+4~, RGNF+1~, CM+1~, CW+1~, CU+1~, CF+1~, CO+3, CKO+4, IMP+3*
LEXIT ENV+30~*, ENV+31
LEXL VC+2~, VC+4*, VC+11
LEXLAST ENV+4~, ENV+17, ENV+18, ENV+19, RGBL+17, IMP+2*
LEXLC VC+2~, VC+4*, VC+11*
LEXLN RGBL+17~*, RGBL+19
LEXLREV ENV+4~, IMP+2*
LEXN VC+2~, VC+6*, VC+7*, VC+8, VC+9, VC+12
LEXNC VC+2~, VC+6*, VC+12*, VC+14
LEXNDS CS+3~, CS+5*, CS+6, VC+2~, VC+3*, VC+4, VC+14
LEXOK GBLS+1~*, GBLS+9, GBLS+10*, GBLS+12
LEXP VC+2~, VC+13*
LEXPN ENV+18~*, ENV+19
LEXS RGBL+1~, RGBL+2*, RGBL+5*, RGBL+9*, RGBL+11, RGBL+12*, RGBL+13*, RGBL+14*, RGBL+18, VC+2~
, VC+4*, VC+5*, VC+11
LEXT VC+2~, VC+12*, VC+13
LEXVER CS+3~, CS+6*, CS+7, CS+8, CS+9, CS+10, CS+11
U ENV+4*
X RGBL~, RGBL+2*, RGBL+6*, RGBL+10*, RGBL+11, RGBL+15, RGBL+20, RGBL+21, VC~, VC+3
, SY~, UR~, CPD~, ET~, ET+1
>> XPDENV ENV+25, ENV+33, ENV+36
>> XPDQUIT EXIT+1*, ABRT+1*
Y VC~, VC+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All