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

Package: Kernel

Routine: XQTOC


Information

XQTOC ;SEA/MJM - Time Out/Continue/Jump Start ;01/10/13 13:42

Source Information

Source file <XQTOC.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
SET ;Set up variables to GO JUMP^XQ72. Enter from ASK1+1^XQ
LOOK ;Look up the Jump Start Entry
NOGO ;Continue fails: reset to primary menu
CON ;Continue option logic. Enter from ASK^XQ on timeout.
SS ;Search Secondaries for a particular option.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"You were last executing the '",$P(XQOPTN,U,3),"' menu option."
  • Line Location: XQTOC+17
Function Call: WRITE
  • Prompt: !!,"If you wish to continue at the last option you were executing, enter 'Y',",!
  • Line Location: ASK+0
Function Call: READ
  • Variable: XQUR
  • Timeout: 20
  • Line Location: CON+1
Function Call: WRITE
  • Prompt: !!," If you enter 'Y' or 'RETURN' you will halt and continue here next time",!," you logon to the computer.",!," If you enter 'N' you will resume processing where you were."
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CON+3
Function Call: WRITE
  • Prompt: !!,$P("Great^OK^All right^Well certainly^Fine","^",$R(5)+1),". ",$P("See you later.^I'll be ready when you are.^Hurry back!^Have a nice lunch.","^",$R(3)+X+1)
  • Line Location: CON+6
Info |  Source |  Entry Points |  Interaction Calls