Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: LEXEDF2

Package: Lexicon Utility

Routine: LEXEDF2


Information

LEXEDF2 ;ISL/KER - Edit/Display a Definition (Part 2) ;04/21/2014

Source Information

Source file <LEXEDF2.m>

Entry Points

Name Comments DBIA/ICR reference
EXP(LEXX) ; Select an expression
MULTI
ONE
SEL(X) ; Select expression
EXPHLP ; Selection help
TYPE(LEXX) ; Expression type
SNAP(LEXX) ; Picture of definition before edit
SHOT(LEXX) ; Picture of definition after edit
CHANGE(LEXX) ; Detect change in definition before/after edit
RESTORE(LEXX) ; Restore original definition
SAVE(LEXX) ; Save the edit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EXP+8
Function Call: WRITE
  • Prompt: $S(^TMP("LEXE",$J,0)>1:"",1:"Only "),^TMP("LEXE",$J,0)
  • Line Location: EXP+8
Function Call: WRITE
  • Prompt: $S(^TMP("LEXE",$J,0)>1:" expressions were ",1:" expression was ")
  • Line Location: EXP+9
Function Call: WRITE
  • Prompt: "found representing the selected concept:"
  • Line Location: EXP+10
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LEXC#5=1
  • Line Location: MULTI+3
Function Call: WRITE
  • Prompt: !,$J(LEXC,4),": "
  • Line Location: MULTI+3
Function Call: WRITE
  • Prompt: LEXTY
  • Line Location: MULTI+4
Function Call: WRITE
  • Prompt: $E(^LEX(757.01,^TMP("LEXE",$J,LEXC),0),1,64)
  • Line Location: MULTI+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MULTI+9
Function Call: WRITE
  • Prompt: LEXTY
  • Line Location: ONE+2
Function Call: WRITE
  • Prompt: $E(^LEX(757.01,^TMP("LEXE",$J,1),0),1,69)
  • Line Location: ONE+3
Function Call: WRITE
  • Prompt: !," OK"
  • Line Location: ONE+4
Function Call: WRITE
  • Prompt: !!,"There are several types of expressions "
  • Line Location: EXPHLP+1
Function Call: WRITE
  • Prompt: "which can represent a concept:"
  • Line Location: EXPHLP+2
Function Call: WRITE
  • Prompt: !!," Major Concept"
  • Line Location: EXPHLP+3
Function Call: WRITE
  • Prompt: !," Synonym of the Concept"
  • Line Location: EXPHLP+4
Function Call: WRITE
  • Prompt: !," Lexical Variant of the Concept"
  • Line Location: EXPHLP+5
Function Call: WRITE
  • Prompt: !," Lexical Variant of a Synonym of the Concept"
  • Line Location: EXPHLP+6
Function Call: WRITE
  • Prompt: !!,"You may edit any of these forms of expressions.",!
  • Line Location: EXPHLP+8
Function Call: WRITE
  • Prompt: !,$J(LEXI,4),": "
  • Line Location: EXPHLP+12
Function Call: WRITE
  • Prompt: LEXTY
  • Line Location: EXPHLP+13
Function Call: WRITE
  • Prompt: $E(^LEX(757.01,^TMP("LEXE",$J,LEXI),0),1,64)
  • Line Location: EXPHLP+14
Function Call: WRITE
  • Prompt: !!,"In this case, there are no Synonyms or "
  • Line Location: EXPHLP+16
Function Call: WRITE
  • Prompt: "Lexical Variants to select from,"
  • Line Location: EXPHLP+17
Function Call: WRITE
  • Prompt: !,"you can only edit the Concept",!
  • Line Location: EXPHLP+18
Info |  Source |  Entry Points |  Interaction Calls