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

Package: Kernel

Routine: XUS9


Information

XUS9 ;SF/RWF,ISD/HGW - Find a user ; 1/18/12 8:20am

Source Information

Source file <XUS9.m>

Entry Points

Name Comments DBIA/ICR reference
1
A
EXIT ;K %,%H,DA,DIC,I,Y,X
EX2 ;K XU1,XU2,XU3,XU4,XU5,XU6,XUSER,XUJOB,XUVOL,XUCI,XUDT
B ;Find
REMOVE ;Questionable entry removed
INQ ;Entry from print template used by "User Inquiry" [XUSERINQ]

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"User: ",XUSER,$S($D(^XUSEC(0,"CUR",DA))=10:" is found on;",1:" isn't currently on the system")
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !,"DONE"
  • Line Location: A+3
Function Call: WRITE
  • Prompt: !,"Job: ",XU6," on ",XUCI,",",XUVOL," node: ",XUNODE," from ",XUDT
  • Line Location: B+10
Function Call: WRITE
  • Prompt: !,"Device: ",$P(XU3,"^",2)
  • Line Location: B+11
Function Call: WRITE
  • Prompt: " (",$P(XU3,"^",9),")"
  • Condition for execution: $P(XU3,"^",9)]""
  • Line Location: B+11
Function Call: WRITE
  • Prompt: !?3,"Menu path:"
  • Line Location: B+13
Function Call: WRITE
  • Prompt: !,?I*3+2,$P(Y,"^",3)
  • Line Location: B+15
Function Call: WRITE
  • Prompt: !?3,"You must sign-on to node ",XUNODE," to see this menu path."
  • Line Location: B+16
Function Call: WRITE
  • Prompt: !,?I*3+2,$P(Y,"^",3)
  • Line Location: B+17
Function Call: WRITE
  • Prompt: !
  • Line Location: B+18
Info |  Source |  Entry Points |  Interaction Calls