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

Package: Lexicon Utility

Routine: LEXDVOS


Information

LEXDVOS ;ISL/KER - Default Vocabulary - Select ;04/21/2014

Source Information

Source file <LEXDVOS.m>

Entry Points

Name Comments DBIA/ICR reference
EN(LEXX) ; Select a Vocabulary/Subset
ASK ; Ask for user input
SEL ; Select from list
UOUT ; Up Arrow detected
VAL ; No Un Arrow (value)
SH ; Show help
STD ; Standard Help
DES ; Description Help
NODES ; No Description Help Available
RD ; Re-Display List
W(LEXC,LEXR) ; Write entry
TOT ; Total Subsets
EOP ; End of Page

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !!,"Enter 1-",LEXC," to select a subset, or ""?"" for help, or ""?#"" for descriptive"
  • Line Location: STD+1
Function Call: WRITE
  • Prompt: !,"help on an entry flagged with an ""*"", or ""^"" to exit or <Return> for more."
  • Line Location: STD+2
Function Call: WRITE
  • Prompt: !!,?2,$P(^LEXT(757.2,LEXR,0),"^",1),!
  • Line Location: DES+2
Function Call: WRITE
  • Prompt: !,?4,^LEXT(757.2,LEXR,100,LEXI,0)
  • Line Location: DES+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DES+5
Function Call: WRITE
  • Prompt: !!,?2,$P(^LEXT(757.2,LEXR,0),"^",1)," does not have a description",!
  • Line Location: NODES+1
Function Call: WRITE
  • Prompt: !,$J(LEXC,4),". ",$P(^LEXT(757.2,LEXR,0),"^",1)
  • Line Location: W+1
Function Call: WRITE
  • Prompt: $S($D(^LEXT(757.2,LEXR,100,1)):" *",1:"")
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !!,LEXC," Subsets found",!
  • Line Location: TOT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+1
Info |  Source |  Entry Points |  Interaction Calls