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

Package: Lexicon Utility

Routine: LEXDCXS


Information

LEXDCXS ;ISL/KER - Default Context - Select ;04/21/2014

Source Information

Source file <LEXDCXS.m>

Entry Points

Name Comments DBIA/ICR reference
EN(LEXX) ; Entry: S X=$$EN^LEXDCXS
ASK ; Ask for user input
SEL ; Select from list
ONE ;
UOUT ; Up Arrow detected
VAL ; No Un Arrow (value)
SH ; Show help
SO ; Show one help
STD ; Standard Help
STDO ; Standard Help - One
DES ; Description Help
NODES ; No Description Available
RD ; Re-Display List (MULTIPLE)
RDO ; Re-Display List (ONE)
W(LEXC,LEXR) ; Write entry
WO(LEXR) ; Write one entry
TOT ; Total Context
CNT(X) ; Count

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+1
Function Call: WRITE
  • Prompt: !!,"Enter 1-",LEXC," to select a Shortcut Context, "
  • Line Location: STD+1
Function Call: WRITE
  • Prompt: "or ""?"" for help, or ""?#"" for descriptive"
  • Line Location: STD+2
Function Call: WRITE
  • Prompt: !,"help on an entry flagged with an ""*"", or ""^"" "
  • Line Location: STD+3
Function Call: WRITE
  • Prompt: "to exit or <Return> for more."
  • Line Location: STD+4
Function Call: WRITE
  • Prompt: !!,"One Shortcut Context available to edit, "
  • Line Location: STDO+1
Function Call: WRITE
  • Prompt: "enter ""Yes"" to select, or ""^"" to exit."
  • Line Location: STDO+2
Function Call: WRITE
  • Prompt: !!,?2,$P(^LEX(757.41,LEXR,0),"^",1),!
  • Line Location: DES+1
Function Call: WRITE
  • Prompt: !,?4,^LEX(757.41,LEXR,1,LEXI,0)
  • Line Location: DES+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DES+4
Function Call: WRITE
  • Prompt: !!,?2,$P(^LEX(757.41,LEXR,0),"^",1)
  • Line Location: NODES+1
Function Call: WRITE
  • Prompt: " does not have a description",!
  • Line Location: NODES+2
Function Call: WRITE
  • Prompt: !
  • Line Location: RDO+1
Function Call: WRITE
  • Prompt: !,$J(LEXC,4),". ",$P(^LEX(757.41,LEXR,0),"^",1)
  • Line Location: W+1
Function Call: WRITE
  • Prompt: $S($D(^LEX(757.41,LEXR,1)):" *",1:"")
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !,$P(^LEX(757.41,LEXR,0),"^",1)
  • Line Location: WO+1
Function Call: WRITE
  • Prompt: $S($D(^LEX(757.41,LEXR,1)):" *",1:"")
  • Line Location: WO+1
Info |  Source |  Entry Points |  Interaction Calls