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

Package: Kernel

Routine: XQ71


Information

XQ71 ;SEA/AMF,MJM - Lookup response to menu prompt ;04/16/2002 13:47

Source Information

Source file <XQ71.m>

Entry Points

Name Comments DBIA/ICR reference
CHK ;See if this option is locked, out of order, etc.
NO ;Space bar option no longer in the Option File
OUT ;Exit point: return to XQ
U
UP
XBLK
DIC ;Entry point from XQ
W
X
C

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " "
  • Line Location: DIC+11
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $E($P(XQY0,U,2),$L(XQUR)+1,99)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $E($P(XQ(1),U,2),$L(XQUR)+1,99),$C(7),!,$P(XQ(1),U,4)
  • Line Location: X+3
Function Call: WRITE
  • Prompt: !?4,XQS*20+XQY,?9,$P(XQ(XQY),U,2),?43,$P(XQ(XQY),U,4)
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,"TYPE '^' TO STOP, OR"
  • Condition for execution: XQ>19
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !,"CHOOSE ",(XQS*20+1),"-",(XQS*20+XQY),": "
  • Line Location: C+1
Function Call: READ
  • Variable: XQJ
  • Timeout: DTIME
  • Line Location: C+2
Function Call: WRITE
  • Prompt: " "
  • Line Location: C+2
Function Call: WRITE
  • Prompt: $C(7),$P(XQ(XQJ-1#20+1),U,4),!
  • Line Location: C+3
Info |  Source |  Entry Points |  Interaction Calls