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: LEXNDX4

Package: Lexicon Utility

Routine: LEXNDX4


Information

LEXNDX4 ;ISL/KER - Set/kill indexes (Part 4) Link ;04/21/2014

Source Information

Source file <LEXNDX4.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lexicon Utility 2 (KSF,SSF)^LEXNDX6  PTX^LEXTOKN  
Kernel 1 $$UP^XLFSTR  
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lexicon Utility 1 LEXNDX3  

Entry Points

Name Comments DBIA/ICR reference
OK1 ; Prompt "Is this correct"
SUB ; Index linked words in sub-file before UNLINK and RELINK
VERIFY ; Display linkages made for user verification
MOK
LINK ; Link a Keyword to an expression
RELINK ; Relink Keywords to expressions
UNLINK ; Unlink a Keyword from an expression
OK(LEXOK) ; Get user response

External References

Name Field # of Occurrence
YN^DICN MOK+1, OK1+1
KSF^LEXNDX6 UNLINK+15
SSF^LEXNDX6 RELINK+17
PTX^LEXTOKN LINK+2
$$UP^XLFSTR LINK+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"LINK"
  • Line Location: LINK+2
Function Call: WRITE
  • Prompt: !!,"Map ",^LEX(757.01,LEXREC,0),!,"To ",LEXREP,!,"OK"
  • Line Location: MOK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: MOK+1
Function Call: WRITE
  • Prompt: !!,"By answering ""Yes"", an index reference will be made to link the",!,"term to the key word ",LEXREP
  • Line Location: MOK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: MOK+7
Function Call: WRITE
  • Prompt: !,"No Word Linkages Created",!
  • Line Location: VERIFY+2
Function Call: WRITE
  • Prompt: !!,$P(^LEX(757.05,DA,0),"^",1)," has been linked to: ",!
  • Line Location: VERIFY+3
Function Call: WRITE
  • Prompt: !,?4,$E(^LEX(757.01,^LEX(757.05,DA,1,LEXSREC,0),0),1,75)
  • Line Location: VERIFY+6
Function Call: WRITE
  • Prompt: !
  • Line Location: VERIFY+7
Function Call: WRITE
  • Prompt: !,"Is this correct"
  • Line Location: OK1+1
Function Call: WRITE
  • Prompt: !,"By confirming the word linkages displayed above, a look-up"
  • Line Location: OK1+5
Function Call: WRITE
  • Prompt: !,"conducted on ",$P(^LEX(757.05,DA,0),"^",1)
  • Line Location: OK1+6
Function Call: WRITE
  • Prompt: " will retrieve the linked terms."
  • Line Location: OK1+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LEX(757.01 - [#757.01] LINK+7, LINK+12, MOK+1, MOK+5, MOK+7*, VERIFY+6, RELINK+9, RELINK+12*, UNLINK+5!
^LEX(757.011 - [#757.011] MOK+6, RELINK+10
^LEX(757.05 - [#757.05] LINK+1, LINK+15, MOK+4*, MOK+8, MOK+9, MOK+10*, MOK+11, MOK+12, MOK+13*, MOK+14*
, MOK+15*, MOK+16*, VERIFY+2, VERIFY+3, VERIFY+5, VERIFY+6, VERIFY+8, VERIFY+9*, VERIFY+10*, VERIFY+11*
, OK1+6, RELINK+1, RELINK+2, RELINK+3, RELINK+5*, RELINK+6*, RELINK+7, RELINK+8, RELINK+18*, UNLINK+1
, UNLINK+2, UNLINK+3, UNLINK+4, UNLINK+8!, UNLINK+9!, UNLINK+10!, UNLINK+16!, SUB+1*
^TMP("LEXTKN" LINK+4, LINK+5, LINK+6, LINK+8, LINK+9, LINK+10, LINK+11, MOK+17!

Label References

Name Line Occurrences
$$OK VERIFY+7
MOK MOK+2
OK1 OK1+4
SUB RELINK+2
UNLINK VERIFY+12
VERIFY MOK+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% MOK+1*, MOK+2, OK1+1*, OK1+2!, OK1+3!, OK1+4
%Y OK1+2!, OK1+3!
>> DA LINK+1, LINK+15, MOK+4, MOK+8, MOK+9, MOK+10, MOK+11, MOK+12, MOK+13, MOK+14
, MOK+15, MOK+16, VERIFY+1, VERIFY+2, VERIFY+3, VERIFY+5, VERIFY+6, VERIFY+8, VERIFY+9, VERIFY+10
, VERIFY+11, OK1+6, RELINK+1, RELINK+2, RELINK+3, RELINK+5, RELINK+6, RELINK+7, RELINK+8, RELINK+18
, UNLINK+1, UNLINK+2, UNLINK+3, UNLINK+4, UNLINK+8, UNLINK+9, UNLINK+10, UNLINK+16, SUB+1
DCNT RELINK+14, RELINK+15, RELINK+16, RELINK+19~, UNLINK+12, UNLINK+13, UNLINK+14, UNLINK+17~
>> DIK(1 RELINK+15, RELINK+16, UNLINK+13, UNLINK+14
DIKSAVE RELINK+19~, UNLINK+17~
DIKSAVE(1 RELINK+14, UNLINK+12
LEXA LINK+10*, LINK+11, MOK+17!
LEXAKEY LINK+11*, LINK+13, MOK+17!
LEXASK LINK+8*, LINK+9*, LINK+13*, LINK+14, MOK+17!
>> LEXBY LINK+2
LEXCTR RELINK+2~*, RELINK+4*, RELINK+5
LEXERM RELINK+2~*, RELINK+12, RELINK+13, RELINK+19!
LEXKEY LINK+3*, LINK+6*, LINK+7, MOK+17!
LEXLINK LINK+3*, LINK+7, LINK+14*, MOK+1*, MOK+3, MOK+17!
LEXLNK MOK+12*, MOK+13, MOK+14, MOK+15!, VERIFY+7!, VERIFY+8*, VERIFY+9, VERIFY+11!, UNLINK+1~, UNLINK+3*
, UNLINK+8, UNLINK+9, UNLINK+17!
LEXMC RELINK+2~, RELINK+8*, RELINK+9, RELINK+12, RELINK+18, UNLINK+1~, UNLINK+2*, UNLINK+3, UNLINK+5, UNLINK+9
, UNLINK+16, UNLINK+17!, SUB+1~
LEXOK OK~
LEXREC LINK+7*, LINK+12, LINK+15, MOK+1, MOK+4, MOK+5, MOK+7, MOK+11, MOK+13, MOK+14
, MOK+16, MOK+17!
>> LEXREP MOK+1, MOK+2, MOK+7
LEXSRC LINK+12*, LINK+13, MOK+17!
LEXSREC MOK+9*, MOK+10, MOK+12*, MOK+13!, VERIFY+4~*, VERIFY+5*, VERIFY+6, VERIFY+7!, VERIFY+8*, VERIFY+9!
, RELINK+2~*, RELINK+3*, RELINK+6, RELINK+7, RELINK+8, RELINK+19!, SUB+1~*
LEXT MOK+4~, MOK+6*, MOK+7, RELINK+9~, RELINK+10*, RELINK+11
LEXTMP LINK+2~, LINK+3*, LINK+5~*, LINK+6
>> LEXWRD UNLINK+4*, UNLINK+5, UNLINK+6
LEXYPE MOK+4~, MOK+5*, MOK+6, RELINK+9~*, RELINK+10
U LINK+7, MOK+1, MOK+5, MOK+6, MOK+14, MOK+15, VERIFY+10, VERIFY+11, RELINK+9, RELINK+10
, UNLINK+4
X LINK+2*, RELINK+13~*, UNLINK+6~*, UNLINK+7, UNLINK+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All