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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LEXERI

Package: Lexicon Utility

Routine: LEXERI


Information

LEXERI ;ISL/KER - Exc/Rep Word Input Transformations ;04/21/2014

Source Information

Source file <LEXERI.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 HOME^%ZIS  ^%ZTLOAD  $$UP^XLFSTR  
Lexicon Utility 1 $$EXIST^LEXERF  
VA FileMan 1 ^DIK  

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

Package Total Caller Graph
Lexicon Utility 2 ^LEX(757.04  ^LEX(757.05  

Entry Points

Name Comments DBIA/ICR reference
EXC ; Input transformation for ^LEX(757.04, - .01
REP ; Input Transformation for ^LEX(757.05, - .01
REP2
CVT(LEXX) ; Convert Text
DEXC ; Delete entry from Excluded Words file #757.04
REPBY ; Input Transformation for ^LEX(757.05, - 1

External References

Name Field # of Occurrence
HOME^%ZIS REP2+8
^%ZTLOAD REP2+8
^DIK DEXC+1
$$EXIST^LEXERF REPBY+3
$$UP^XLFSTR EXC+12, CVT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(34),X,$C(34)," contains a space"
  • Line Location: EXC+3
Function Call: WRITE
  • Prompt: !,$C(34),LEXX,$C(34)," is already defined as an excluded word"
  • Line Location: EXC+7
Function Call: WRITE
  • Prompt: !,$C(34),LEXX,$C(34)," has been defined as a replacement word (file #757.05)"
  • Line Location: EXC+9
Function Call: WRITE
  • Prompt: !!,"You can not exclude a word from a search which is to be replaced"
  • Line Location: EXC+10
Function Call: WRITE
  • Prompt: !,"by another expression prior to performing the search"
  • Line Location: EXC+11
Function Call: WRITE
  • Prompt: !,$C(34),LEXX,$C(34)," has been defined as a replacement word (file #757.05)"
  • Line Location: EXC+13
Function Call: WRITE
  • Prompt: !!,"You can not exclude a word from a search which is to be inserted"
  • Line Location: EXC+14
Function Call: WRITE
  • Prompt: !,"as replacement text prior to performing the search"
  • Line Location: EXC+15
Function Call: WRITE
  • Prompt: !,"Alpha-numeric expression. The only punctuation allowed is the slash ""/"""
  • Line Location: REP+5
Function Call: WRITE
  • Prompt: !!,$C(7),$C(34),LEXX,$C(34)," already exist in the Excluded Words file."
  • Line Location: REP+8
Function Call: WRITE
  • Prompt: !,"Do you want to delete it from the Excluded Words file"
  • Line Location: REP+9
Function Call: WRITE
  • Prompt: !,"and continue to add it as a replacement word? No// "
  • Line Location: REP+10
Function Call: READ
  • Timeout: 300
  • Variable: LEX
  • Line Location: REP2+0
Function Call: WRITE
  • Prompt: !!,"Yes",!,"Add ",LEXX," to the Replacement Words file and delete it",!,"from the Excluded Words file"
  • Line Location: REP2+2
Function Call: WRITE
  • Prompt: !!,"No",!,"Do not add ",LEXX," to the Replacement Words file and ",!,"retain it in the Excluded Words file"
  • Line Location: REP2+3
Function Call: WRITE
  • Prompt: !!,"",!,"Delete? No// "
  • Line Location: REP2+4
Function Call: WRITE
  • Prompt: !!,"",!,"Delete? No// "
  • Line Location: REP2+5
Function Call: WRITE
  • Prompt: !!,$C(34),LEXX,$C(34)," already exist in the Replacement Words file (#757.05)"
  • Line Location: REP2+14
Function Call: WRITE
  • Prompt: !,"as a (R)eplaced word. You may alter the original entry to be a"
  • Line Location: REP2+15
Function Call: WRITE
  • Prompt: !,"(L)inked word, but you can not (R)eplace ",$C(34),LEXX,$C(34)," with multiple"
  • Line Location: REP2+16
Function Call: WRITE
  • Prompt: !,"expressions/concepts",!!
  • Line Location: REP2+17
Function Call: WRITE
  • Prompt: !!,$C(34),LEXX,$C(34)," does not exist in the Lexicon. You"
  • Line Location: REPBY+4
Function Call: WRITE
  • Prompt: !,"may not replace a word with text not found in the Lexicon,"
  • Line Location: REPBY+5
Function Call: WRITE
  • Prompt: !,"resulting in unsuccessful searches."
  • Line Location: REPBY+6
Function Call: WRITE
  • Prompt: !,LEXI
  • Line Location: REPBY+10
Function Call: WRITE
  • Prompt: !!,"WARNING: Your input contains the word ",$C(34),LEXI,$C(34)," which is"
  • Line Location: REPBY+13
Function Call: WRITE
  • Prompt: !,"already defined in the Replacement Words file (#757.05) as a (R)eplaced"
  • Line Location: REPBY+14
Function Call: WRITE
  • Prompt: !,"word. This may cause problems (i.e., circular definition of a word) "
  • Line Location: REPBY+15
Function Call: WRITE
  • Prompt: !,"resulting in an unsuccessful search in the Lexicon."
  • Line Location: REPBY+16
Function Call: WRITE
  • Prompt: !!," Example of a circular definition:"
  • Line Location: REPBY+17
Function Call: WRITE
  • Prompt: !!," Replace: CA with CANCER and"
  • Line Location: REPBY+18
Function Call: WRITE
  • Prompt: !," Replace: CALCIUM with CA ",!!
  • Line Location: REPBY+19
Function Call: WRITE
  • Prompt: !!," Searching for ",$C(34),"CALCIUM",$C(34)," may result in a listing of CANCER's,"
  • Line Location: REPBY+20
Function Call: WRITE
  • Prompt: !," depending on the order of replacement."
  • Line Location: REPBY+21
Routine Call
  • %ZIS
  • Line Location:
    • REP2+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LEX(757.04 - [#757.04] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LEX(757.04 - [#757.04] EXC+5, EXC+6, REP+7, DEXC+1
^LEX(757.05 - [#757.05] EXC+8, EXC+12, REP2+10, REP2+11, REP2+12, REP2+13, REPBY+2, REPBY+9, REPBY+11, REPBY+12

Label References

Name Line Occurrences
$$CVT EXC+4, REP+6, REPBY+1
REP2 REP2+1, REP2+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EXC+6, REP2+11, DEXC+1*!, REPBY+2
DIK DEXC+1*!
LEX REP+7~*, REP2*, REP2+1, REP2+5, REP2+6*, REP2+9*, REP2+10!, REP2+12*, REP2+18*
LEXDA EXC+6~*
LEXI REPBY+7~*, REPBY+8*, REPBY+9, REPBY+10, REPBY+11, REPBY+13, REPBY+23!, CVT+1~*, CVT+2, CVT+4!
LEXJ REPBY+7~*, REPBY+8*, REPBY+23!, CVT+1~*, CVT+2*, CVT+3*, CVT+4!
LEXOK REP+2~*, REP+3*, REP+4, REPBY+7~*, REPBY+8, REPBY+22*, REPBY+23!
LEXPSN REP+2~*, REP+3
LEXR REP2+10!, REP2+12*, REP2+13*, REPBY+10~*, REPBY+11*, REPBY+12*, REPBY+23!
LEXX EXC+1*, EXC+2, EXC+4*, EXC+5, EXC+6, EXC+7, EXC+8, EXC+9, EXC+12, EXC+13
, EXC+16, REP+1*, REP+2, REP+3, REP+6*, REP+8, REP2+2, REP2+3, REP2+14, REP2+16
, REP2+19, REPBY+1~*, REPBY+2, REPBY+3!, REPBY+4, REPBY+8, REPBY+23!, CVT~, CVT+1*, CVT+2
, CVT+4*
U REP2
X EXC+1, EXC+2!, EXC+3, EXC+7!, EXC+12!, EXC+16*, REP+1, REP+4!, REP+7!, REP2+7
, REP2+8, REP2+10, REP2+11, REP2+12, REP2+19*, DEXC+1, REPBY+1, REPBY+3!, REPBY+23*!
Y REP2+8!
ZTDESC REP2+7*, REP2+8!
ZTDTH REP2+8*!
ZTIO REP2+8*!
>> ZTQUEUED DEXC+1
>> ZTREQ DEXC+1*
ZTRTN REP2+7*, REP2+8!
>> ZTSAVE("X" REP2+7*
ZTSK REP2+8!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All