Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: XUP

Package: Kernel

Routine: XUP


Information

XUP ;SFISC/RWF - Setup environment for programmers ;09/02/15 06:36

Source Information

Source file <XUP.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Kernel 12 ^%ZIS  GETENV^%ZOSV  (,UNWIND)^%ZTER  ($$DT,$$NOW)^XLFDT  $$UP^XLFSTR  ^XQ1  $$PROD^XUPROD  $$ACCEPT^XUS  
(ENQ,SAVE)^XUS1  TT^XUS3  KILL1^XUSCLEAN  ^XUSHSH  
Toolkit 1 $$GET^XPAR  
VA FileMan 1 ^DIC  

Caller Graph

Caller Graph Total: 178

Package Total Caller Graph
Scheduling 109 SDES2APPTCKNSTEP  SDES2APPTCLNLST  SDES2APPTYPES  SDES2APTLETTER  SDES2APTLETTERSV  SDES2ARCLOSE  SDES2BLCKANDMOV2  SDES2BLOCKANDMOV  
SDES2BLOCKPBSP  SDES2CANCELAPPT  SDES2CANCELAPPT2  SDES2CANCLNAVAIL  SDES2CHECKIN  SDES2CHKCAVAIL  SDES2CKNSTEP  SDES2CLINICLIST  
SDES2CLININFO  SDES2CLINPRECAN  SDES2CLNSEARCH  SDES2CLONESLOTS  SDES2CONTACTS  SDES2CREATEAPPT  SDES2CREATEAPPT2  SDES2CREATECLIN  
SDES2CREATESNAPS  SDES2CRTAPREQ  SDES2CRTAPREQ2  SDES2CRTCLNAVAL2  SDES2CRTPRVRES  SDES2CRTVETAPPT  SDES2CRTWALKIN  SDES2CRTWALKIN2  
SDES2DISPRECALL  SDES2EDITAPPT  SDES2EDITAPPT2  SDES2EDITAPREQ  SDES2EDITAPREQ2  SDES2EDITCLIN  SDES2EDITPATDEMO  SDES2EDITPREREG  
SDES2EDITPRVRES  SDES2EDITSNAPS  SDES2EDITTEMPADD  SDES2ENTERLETTER  SDES2ENTERLETTR2  SDES2EPT  SDES2GETAPPTREQ  SDES2GETAPPTRPCS  
SDES2GETCANSLOTS  SDES2GETCLINAVL  SDES2GETCLINST  SDES2GETCLINSVC  SDES2GETCLNSLOT  SDES2GETCLNSTA  SDES2GETCONSULTS  SDES2GETDEMOS  
SDES2GETDEVICES  SDES2GETDISPCONS  SDES2GETDIVLIST  SDES2GETELIGCD  SDES2GETEXPENTRY  SDES2GETHOLIDAYS  SDES2GETLETRTYPE  SDES2GETLINKS  
SDES2GETMEDLIST  SDES2GETNEXTSLOT  SDES2GETPATDEMO  SDES2GETPATINFO  SDES2GETPATSTAT  SDES2GETRECALL  SDES2GETREGS  SDES2GETREQS  
SDES2GETRESGROUP  SDES2GETRESIEN  SDES2GETSCDUSRS  SDES2GETSNAPS  SDES2GETSTORDPAT  SDES2GETURGENCY  SDES2GETUSRPROF  SDES2GETVVCCODES  
SDES2GETXPENTRY2  SDES2GRECAPTYPE  SDES2GREQSINST  SDES2INACTCLIN  SDES2NOSHOW  SDES2NOSHOW2  SDES2PATSEARCH  SDES2PROVSEARCH  
SDES2PRVCLINSRC  SDES2QRYAPREQS  SDES2REACTTCLIN  SDES2REACTTCLIN2  SDES2RECLDIPREAS  SDES2RECLLREQ  SDES2RECLLREQ2  SDES2RECPRVSRCH  
SDES2REMAP  SDES2RSTCAVAIL  SDES2SEARCHRCLN  SDES2SEARCHSLOTS  SDES2SETCHECKOUT  SDES2SPACEBAR  SDES2SRCHCLNBYSC  SDES2STOREPAT  
SDES2UNBLOCKPBSP  SDES2UNDOCHECKIN  SDES2UNDOCHKOUT  SDES2UNDONOSHOW  SDES2VVSJSON  
Lab Service 10 LR7OAPKM  LR7OAPMG  LRAPT  LRDPA  LRHYPH2  LRHYU  LRVRARU  LRVRPOCU  
LRWU6  LRWU7  
Integrated Billing 9 IBAMTS  IBCAPP  IBCE837ACC  IBCE837ACC2  IBCE837ACC4  IBCESRV3  IBCNBES  IBCNEBF  
IBNCPDP6  
MailMan 9 XMA2  XMB  XMD  XMRMSM  XMRONT  XMRTCP  XMRUCX  XMTDO  
XMUCXPOP  
Automated Lab Instruments 6 LA7QRY  LA7VHL  LA7VIN  LA7VIN1A  LA7VIN1B  LAKDIFF  
Kernel 6 XQ1  XQ12  XQSMD  XUSBSE1  XUSRB  XUVERIFY  
Mental Health 5 YSASFUR  YSASU1  YSGAFTR  YSKFMAIL  YTQREST  
Health Level Seven 4 HLCSMM  HLCSTCP4  HLOFILER  HLOQUE  
Lexicon Utility 4 LEX2049P  LEX2052P  LEX2055P  LEXXFI  
National Online Information Sharing 2 FSCNAR  FSCOP  
Order Entry Results Reporting 2 ORMHLREC  ORVCO  
Toolkit 2 XTBASE  XTRCMP  
Capacity Management 1 KMPOPS  
Clinical Case Registries 1 RORRP024  
Emergency Department Integration Software 1 EDPFAA  
IFCAP 1 PRCVIBF  
Imaging 1 MAGXCVS  
Outpatient Pharmacy 1 PSOHLDS6  
RPC Broker 1 XWBTCPMT  
Radiology Nuclear Medicine 1 RAIPS160  
Registration 1 DGRRLU1  
VistALink Security 1 XOBSRA  

Entry Points

Name Comments DBIA/ICR reference
ZIS
ZIS2
EXIT ;Clean-up and exit
ASKDUZ ;Ask for Access Code
  • ICR #4596
    • Status: Active
    • Usage: Private
    DUZ(DA) ;Build DUZ for a user. Used by Mailman.
  • ICR #4129
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #7487
    • Status: Active
    • Usage: Private
    DTIME(E,D) ;Return DTIME value for user E, device D.
  • ICR #4409
    • Status: Active
    • Usage: Supported
    ERR ;

    External References

    Name Field # of Occurrence
    ^%ZIS ZIS2
    GETENV^%ZOSV XUP+12
    ^%ZTER ERR+4
    UNWIND^%ZTER ERR+5
    ^DIC ZIS+1
    $$DT^XLFDT XUP+10
    $$NOW^XLFDT ZIS2+4
    $$UP^XLFSTR ASKDUZ+5
    $$GET^XPAR ZIS2+8, EXIT+2
    ^XQ1 ZIS2+9
    $$PROD^XUPROD XUP+7
    $$ACCEPT^XUS ASKDUZ+3
    ENQ^XUS1 ZIS
    SAVE^XUS1 ZIS2+4
    TT^XUS3 ZIS
    KILL1^XUSCLEAN XUP+9, ZIS2+9, EXIT+1
    ^XUSHSH ASKDUZ+6

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Setting up programmer environment"
    • Line Location: XUP+3
    Function Call: WRITE
    • Prompt: !,"This is a "_$S($$PROD^XUPROD(1):"PRODUCTION",1:"TEST")_" account.",!
    • Line Location: XUP+7
    Function Call: WRITE
    • Prompt: !,"DUZ Must point to a real user."
    • Line Location: XUP+16
    Function Call: WRITE
    • Prompt: !,"Terminal Type set to: ",IOST,!
    • Line Location: ZIS2+0
    Function Call: WRITE
    • Prompt: !!,"Your VERIFY code will expire in "_%_" days",!!
    • Line Location: ZIS2+2
    Function Call: WRITE
    • Prompt: !,"You have "_Y_" new message"_$S(Y=1:"",1:"s")_"."
    • Line Location: ZIS2+6
    Function Call: WRITE
    • Prompt: !
    • Line Location: ASKDUZ+2
    Function Call: WRITE
    • Prompt: !,"Access Code: "
    • Line Location: ASKDUZ+3
    Function Call: WRITE
    • Prompt: !,"$ECODE=",$ECODE," $STACK=",$STACK
    • Line Location: ERR+2
    Function Call: WRITE
    • Prompt: !,"Location: ",$STACK($STACK-1,"PLACE")
    • Line Location: ERR+3
    Function Call: READ
    • Formatting: !!
    • Prompt: "Want to record the error: No// "
    • Variable: %XUP
    • Timeout: 600
    • Line Location: ERR+4
    Routine Call
    • %ZIS
    • Line Location:
      • ZIS2
    Routine Call
    • DIC
    • Line Location:
      • ZIS+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZIS(1 - [#3.5] DTIME+2
    ^%ZOSF("EOFF" XUP+11
    ^%ZOSF("EON" XUP+11
    ^%ZOSF("TYPE-AHEAD" XUP+5
    ^%ZVEMS EXIT+2
    ^DD("DILOCKTM" XUP+21
    ^UTILITY($J XUP+9!
    ^VA(200 - [#200] XUP+16, XUP+19, ZIS+1, ZIS+2*, ZIS2+2, ZIS2+4*, ASKDUZ+6, DUZ+3, DUZ+7, DTIME+2
    ^XMB(3.7 - [#3.7] ZIS2+6
    ^XTV(8989.3 - [#8989.3] ZIS2+2, DUZ+3, DUZ+6, DTIME+2
    ^XUTL("XQ" XUP+9!

    Label References

    Name Line Occurrences
    $$DTIME ZIS2+1
    ASKDUZ XUP+18
    DUZ XUP+17, ASKDUZ+7
    EXIT XUP+16, XUP+18, ZIS+1, ZIS2
    ZIS2 ZIS

    Naked Globals

    Name Field # of Occurrence
    ^(20 XUP+19

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % ZIS2+2*
    %XUP ERR+1~, ERR+4*
    >> %ZIS ZIS2*
    D DTIME~, DTIME+2
    DA DUZ~, DUZ+3, DUZ+4
    >> DIC ZIS+1*
    >> DIC(0 ZIS+1*, ZIS+2
    >> DILOCKTM XUP+21*
    DT XUP+10*
    DTIME XUP+20*, ZIS2+1*
    DUZ XUP+14*, XUP+16!, XUP+17, XUP+18, XUP+19, ZIS+1, ZIS+2, ZIS2+1, ZIS2+2, ZIS2+4
    , ZIS2+6, EXIT+2, ASKDUZ+7!, DUZ+4*, DUZ+7
    DUZ("AG" DUZ+6*
    DUZ("AUTHENTICATION" XUP+23*
    DUZ("BUF" ZIS2+1*
    DUZ("LANG" DUZ+9*
    DUZ("LOA" XUP+22*
    DUZ("SAV" XUP+14!
    DUZ(0 XUP+14*, XUP+18, DUZ+5*
    DUZ(1 DUZ+6*
    DUZ(2 DUZ+7*, DUZ+8*
    E DTIME~, DTIME+2
    >> IOP ZIS2*
    >> IOS ZIS2+1
    IOST ZIS2
    P DTIME+1~, DTIME+2*, DTIME+3
    >> POP ZIS2
    U XUP+4*, XUP+10*, XUP+11*, XUP+12, XUP+14, ZIS+2, ZIS2+2, ZIS2+6, ZIS2+9
    X ZIS+1*, ASKDUZ+1~, ASKDUZ+3*, ASKDUZ+4, ASKDUZ+5*, ASKDUZ+6
    >> XQUSER XUP+19*
    >> XQXFLG ZIS2+9*
    XQY EXIT+1!
    XQY0 EXIT+1!
    >> XUCI XUP+12*
    >> XUDEV ZIS2+1*
    >> XUENV XUP+12*
    >> XUEOFF XUP+11*, ASKDUZ+3
    >> XUEON XUP+11*, ASKDUZ+3
    >> XUIOP XUP+11*, ZIS
    >> XUIOP(1 ZIS*, ZIS+2*, ZIS2
    >> XUTT XUP+11*, ZIS, ASKDUZ+5*
    >> XUVOL XUP+12*
    Y XUP+12, XUP+18, ZIS*, ZIS+1, ZIS+2, ZIS2+6*, ASKDUZ+4*, ASKDUZ+6*, ASKDUZ+7, DUZ+2~
    Y("XUS" DUZ+3*, DUZ+8, DUZ+9
    Y(0 DUZ+3*, DUZ+5
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All