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

Package: Kernel

Routine: XQ74


Information

XQ74 ;SEA/MJM - Phantom Jump processor ; ;4/26/91 3:18 PM

Source Information

Source file <XQ74.m>

Entry Points

Name Comments DBIA/ICR reference
LEGAL ;See if this a legal option for this user
SET ;Save the "XQ" stack in XQMM("OLD")
SETJ ;Set up the variables for a jump
CONVERT ;Convert option names to their internal #'s an add -1 for return
MESS1
ERR ;Error message for locks, out-of-order, etc.
RESET ;Reset ^XUTL to what it was before we started
OUT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** WARNING ***",!!,"Background jump requested to option '",$P(^DIC(19,+XQMMK,0),U,2),"'",!,"You do not have access to this option. Notify your computer",!,"representative."
  • Line Location: LEGAL+6
Function Call: WRITE
  • Prompt: !!,"*** WARNING ***",!!,"Background jump to option '",X,"'",!," requested, but this option does not exist on this system."
  • Line Location: MESS1+0
Function Call: WRITE
  • Prompt: !!?10,"*** WARNING ***",!!,"Illegal jump requested to option '",$P(^DIC(19,+XQY,0),U,2),"'",!,XQNO,!,XQNO1
  • Line Location: ERR+2
Info |  Source |  Entry Points |  Interaction Calls