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

Package: Kernel

Routine: XQ75


Information

XQ75 ;SEA/AMF,LUKE,JLI,BT - Lookup response for jumps ;6/14/2011

Source Information

Source file <XQ75.m>

Entry Points

Name Comments DBIA/ICR reference
X ;Unless exact match is found, find all possibilities in any XQDIC
C ;Display a screen-load of 19 possibilities and ask for a choice
ASK
S ;Entry from XQ: Search primary, common, and secondary menus for XQUR
W ;Write out remaining text and return to XQ
OUT ;Exit here
FIND(XQDIC) ;The expected 0th node in ^XUTL is not here
P ;Entry point for '"' jump to XUCOMMAND options
CHCKTM(XQIEN) ;check Restriction time/date

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: C+7
Function Call: WRITE
  • Prompt: !?4,XQJ,?9,$P(XQ(XQJ),U,2)
  • Line Location: C+7
Function Call: WRITE
  • Prompt: !?4,XQJ,?9,$P(XQ(XQJ),U,2)
  • Line Location: C+7
Function Call: WRITE
  • Prompt: !!,"Type '^' to stop, or choose a number from 1 to ",XQ," :"
  • Line Location: ASK+0
Function Call: READ
  • Variable: XQJ
  • Timeout: DTIME
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: $C(7)," ??",!
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: " "
  • Line Location: ASK+10
Function Call: WRITE
  • Prompt: $C(7),$P(XQ(XQJ-1#20+1),U,4),!
  • Line Location: ASK+12
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: S+1
Function Call: WRITE
  • Prompt: $E(XQ("S",+XQY),$L(XQUR)+1,99)," ",$P(XQY0,U,2)
  • Line Location: W+2
Function Call: WRITE
  • Prompt: $E($P(XQY0,U,2),$L(XQUR)+1,99)
  • Line Location: W+3
Function Call: WRITE
  • Prompt: " (",XQ("S",+XQY),")"
  • Condition for execution: $D(XQ("S",+XQY))
  • Line Location: W+3
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: OUT+19
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: P+1
Info |  Source |  Entry Points |  Interaction Calls