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

Package: Kernel

Routine: XUSER


Information

XUSER ;ISP/RFR - A common set of user functions ;06/09/15 10:51

Source Information

Source file <XUSER.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 $$FMTE^XLFDT  ($$HLNAME,$$NAMEFMT)^XLFNAME  ($$REPLACE,$$STRIP)^XLFSTR  PARENT^XUAF4  
VA FileMan 3 (,$$FIND1)^DIC  $$GET1^DID  ^DIR  

Caller Graph

Caller Graph Total: 213

Package Total Caller Graph
Kernel 44 XQ55  XQ55SPEC  XQ82  XQ84  XQALBUTL  XQALSET  XQALSET1  XQALSURO  
XQCHK3  XQSMD5  XU EPCS PSDRPH  XU EPCS SET PARMS  XU8P377D  XU8P480  XU8P497  XU8P497A  
XUA4A72  XUBA  XUEPCSRT  XUESSO1  XUESSO3  XUESSO4  XUFILESINGLEADD  XUINPCH2  
XUP468  XUPSCLR  XUPSQRY  XUSAP PROXY LIST  XUSAP1  XUSBSE1  XUSEC ISO ACTIVE USER SORT  XUSEC ISO VISITED  
XUSECBUL  XUSERNEW  XUSERP  XUSMGR  XUSNPI1  XUSNPIE1  XUSNPIE2  XUSRB2  
XUSRB4  XUTMTP  ^DIC(19  ^VA(200  
Lab Service 30 LR232  LR278  LR309  LR315  LR325  LR328  LR329  LR331  
LR334  LR343  LR346  LR462A  LR479  LR482  LR7OB63  LR7OGG  
LR7OR2  LR7ORB3  LR7OSUM2  LR7OV5  LRAPBR1  LRAPRES1  LRAPUTL  LRDIQ  
LRERT1  LRLIST  LRSCTX1  LRUTIL2  LRVRAR  LRVRPOC  
Order Entry Results Reporting 26 ORALWORD  ORAREN  ORB3U2  ORCACT01  ORCMENU1  ORCSAVE1  ORDEA  ORDEA01  
ORDEA01A  ORDEA01B  ORLPREM  ORNEWPERS  ORPARMG1  ORPDMP  ORPDMPNT  ORQOREP  
ORQPTQ2  ORQQPL2  ORUTL  ORWDPS1  ORWDRA32  ORWOR1  ORWORR  ORWU1  
ORWU2  ORY218  
Outpatient Pharmacy 17 PSO EPCS PSDRPH  PSOASAP0  PSOCLUTL  PSODEARP  PSODEART  PSODIR  PSOERX1A  PSOERX1G  
PSOERXA1  PSOERXH1  PSOERXI1  PSOERXUT  PSOORFI5  PSOPKIV1  PSOPKIV2  PSORMRXD  
PSOUTIL  
Scheduling 17 SCMCNPER  SD53P566  SDESPRIVUSRSRCH  SDRR1  SDRR5  SDRRCLR2  SDRRCRR  SDRRCRR1  
SDRRINQ  SDRRINQ1  SDRRISRL  SDRRISRX  SDRRSEG3  SDSCEDT  SDSCPRV  SDSCRPT2  
SDSCUSR  
Automated Lab Instruments 12 LA66  LA68  LA72  LA74  LA7PCFG  LA7UCFG  LA7VHLU9  LA7VOBX1  
LA7VOBX2  LA7VOBX4  LA7VORUA  ^LAHM(62.485  
Health Summary 6 GMTSORPD  GMTSXA  GMTSXAO  GMTSXAP  GMTSXAP2  ^GMT(142.98  
Text Integration Utility 5 TIUALRT  TIUDTBP0  TIUHL7U1  TIULA3  TIURA1  
Integrated Billing 4 IBCEP9B  IBCNAU  IBCNEUT7  IBJPI2  
Registration 4 DGENU  DGOTHD1  DGOTHMG2  DGQPTQ2  
Surgery 4 SROATCM2  SROATM4  SROQ30D  SRTPTMIT  
Accounts Receivable 3 RCDPEM3  RCDPEM41  RCDPEM6  
Capacity Management 3 KMPDSSD1  KMPDUTL1  KMPSUTL1  
DSS Extracts 3 ECXPURG1  ECXPUTL  ECXTRANS  
Event Capture 3 ECDEAL2  ECPRVDR  ECUMRPC2  
Imaging 3 MAGGA03  MAGQBUT5  MAGSIXG2  
Mental Health 3 YSBRPC  YSCLSRV3  YTQRIS  
Shift Handoff Tool 3 CRHD5  CRHD9  CRHDUD  
VBECS 3 VBECLU3  VBECRPCE  VBECRPCM  
Consult Request Tracking 2 GMRCADC  GMRCAFRD  
Inpatient Medications 2 PSJCLOZ  PSJPDCLU  
Toolkit 2 XTVSLNA1  ^XTV(8989.51  
VistA Integration Adapter 2 VIABRPC  VIABRPC4  
Advanced Medication Platform 1 PREAPO3  
Care Management 1 ORRCLNP  
Controlled Substances 1 PSDDSOR2  
Emergency Department Integration Software 1 EDPFPER  
Fee Basis 1 FBXIP154  
HealtheVet Desktop 1 XHDAUTH  
My HealtheVet 1 MHV7B9A  
Radiology Nuclear Medicine 1 RABWORD  
Remote Order Entry System 1 RMPFRPC0  
VistALink 1 XOBVSYSI  
VistALink Security 1 XOBSRA  
Womens Health 1 ^WV(790.011  

Entry Points

Name Comments DBIA/ICR reference
LOOKUP(XUF) ;Do a user lookup
  • ICR #2343
    • Status: Active
    • Usage: Supported
    LK1
    LKX
    ACTIVE(XUDA) ;Get if a user is active.
  • ICR #2343
    • Status: Active
    • Usage: Supported
    BULL ;Called from bulletin in DD of file #200 for 'Sub Alt Name' fld.
    PROVIDER(XUDA,XUF) ;See if user qualifies as a CPRS provider
  • ICR #2343
    • Status: Active
    • Usage: Supported
    DEA(FG,IEN,DATE) ;sr. ef. Return users DEA # or Facility DEA_"-"_user VA# or null
  • ICR #2343
    • Status: Active
    • Usage: Supported
    DETOX(IEN,DATE) ;Return the Detox/Maintenance ID in file 200 - p580,p739
  • ICR #2343
    • Status: Active
    • Usage: Supported
    SDEA(FG,IEN,PSDEA,DATE) ;validation for new DEA regulations p580-JC(CPRS)
  • ICR #2343
    • Status: Active
    • Usage: Supported
    VDEA(RETURN,IEN)
  • ICR #2343
    • Status: Active
    • Usage: Supported
    DIV4(XUROOT,XUDUZ) ;Return the Divisions that this user is assigned to.
  • ICR #2533
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #5139
    • Status: Pending
    • Usage: Private
    NAME(IEN,FL) ;Return the full name from Name Components file
  • ICR #2343
    • Status: Active
    • Usage: Supported
    HL7(IEN) ;Return a HL7 name from the components file
    SCR200() ;Whole File Screen logic for file 200
    ; ZEXCEPT: DIC,DINDEX - Kernel exemption

    External References

    Name Field # of Occurrence
    ^DIC LK1
    $$FIND1^DIC BULL+5
    $$GET1^DID VDEA+42
    ^DIR LK1+3
    $$FMTE^XLFDT LK1+1
    $$HLNAME^XLFNAME HL7+2
    $$NAMEFMT^XLFNAME NAME+4
    $$REPLACE^XLFSTR VDEA+42
    $$STRIP^XLFSTR VDEA+33
    PARENT^XUAF4 DEA+18

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !?15,"This user was terminated on ",$$FMTE^XLFDT(Y)
    • Line Location: LK1+1
    Routine Call
    • DIC
    • Line Location:
      • LK1
    Routine Call
    • DIC
    • Line Location:
      • BULL+5
    Routine Call
    • DIR
    • Line Location:
      • LK1+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD("DD" SDEA+14
    ^DIC(4 - [#4] DEA+16, DEA+19, DEA+21
    ^VA(200 - [#200] ACTIVE+2, ACTIVE+3, ACTIVE+5, BULL+6, PROVIDER+10, PROVIDER+26, PROVIDER+27, DEA+9, DETOX+9, SDEA+12
    , SDEA+17, VDEA+16, VDEA+18, VDEA+20, VDEA+23, VDEA+25, VDEA+27, VDEA+28, VDEA+31, VDEA+33
    , VDEA+40, VDEA+45, VDEA+56, DIV4+4
    ^XUSEC("ORES" VDEA+14
    ^XUSEC("XUORES" PROVIDER+13
    ^XUSEC("XUSHOWSSN" SCR200+10

    Label References

    Name Line Occurrences
    $$ACTIVE VDEA+9
    $$DEA SDEA+10
    LK1 LK1+1, LK1+4
    LKX LK1, LK1+2

    Naked Globals

    Name Field # of Occurrence
    ^( DIV4+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % ACTIVE+1~, ACTIVE+6*, PROVIDER+5~, PROVIDER+20*, DIV4+3~*, DIV4+4*
    %1 DIV4+3~*, DIV4+4*, DIV4+5
    A SDEA+7~
    A( SDEA+18*
    A(1 SDEA+22
    A(2 SDEA+23
    A(3 SDEA+24
    A(4 SDEA+25
    A(5 SDEA+26
    A(6 SDEA+27
    ASCHED VDEA+36~, VDEA+38*, VDEA+45*, VDEA+46, VDEA+47
    DA SDEA+7~, SDEA+13*, SDEA+14
    DATE DEA~, DEA+8*, DEA+13, DETOX~, DETOX+8*, DETOX+11, DETOX+12, SDEA~, SDEA+8*, SDEA+10
    , SDEA+14, VDEA+8~, VDEA+19~, VDEA+20*, VDEA+21, VDEA+22, VDEA+28*, VDEA+29
    DEA DEA+6~, DEA+10*, DEA+13, SDEA+7~, SDEA+10*, SDEA+22, SDEA+23, SDEA+24, SDEA+25, SDEA+26
    , SDEA+27, SDEA+28, VDEA+8~
    DELIMIT VDEA+48~, VDEA+49*, VDEA+51*, VDEA+52
    DET DETOX+7~, DETOX+10*, DETOX+11, DETOX+12
    DIC LOOKUP+4~, LK1*
    DIC(0 LK1*, SCR200+4
    >> DINDEX SCR200+7
    DIR LOOKUP+4~
    DIR("A" LK1+3*
    DIR("B" LK1+3*
    DIR(0 LK1+3*
    >> DIRUT LK1+4
    DT LK1+1, ACTIVE+6, PROVIDER+20, DEA+8, DEA+23, DETOX+8, SDEA+8, VDEA+22, VDEA+29
    DUZ DEA+7, DIV4+3, SCR200+10
    DUZ(2 DEA+7
    E SDEA+7~, SDEA+10, SDEA+11*, SDEA+14*
    ERROR VDEA+41~
    FB DEA+6~, DEA+11*, DEA+14
    FG DEA~, DEA+15, SDEA~, SDEA+9*, SDEA+10
    FL NAME~, NAME+2*, NAME+3*, NAME+4
    I BULL+4~, BULL+6*, SDEA+7~, SDEA+18*
    IEN DEA~, DEA+7*, DEA+9, DETOX~, DETOX+9, SDEA~, SDEA+9*, SDEA+10, SDEA+12, SDEA+17
    , VDEA~, VDEA+9, VDEA+14, VDEA+16, VDEA+18, VDEA+20, VDEA+23, VDEA+25, VDEA+27, VDEA+28
    , VDEA+31, VDEA+33, VDEA+40, VDEA+45, VDEA+56, NAME~, NAME+1, HL7~, HL7+1
    IN DEA+6~, DEA+16*, DEA+17, DEA+19*, DEA+23
    INDEX VDEA+48~, VDEA+50*, VDEA+51, VDEA+52
    INN DEA+6~, DEA+7*, DEA+16, DEA+18, DEA+19*, DEA+21
    LABEL VDEA+41~, VDEA+42*, VDEA+43*, VDEA+44
    N DEA+6~, DEA+9*, DEA+10, DEA+11, DETOX+7~, DETOX+9*, DETOX+10, SDEA+7~, SDEA+12*, SDEA+13
    N1 DEA+6~, DEA+9*, DEA+10, DETOX+7~, DETOX+9*, DETOX+10, SDEA+7~, SDEA+12*, SDEA+13
    N3 SDEA+7~, SDEA+17*, SDEA+18
    NA NAME+1~, NAME+4, HL7+1~, HL7+2
    NA("FIELD" NAME+1*, HL7+1*
    NA("FILE" NAME+1*, HL7+1*
    NA("IENS" NAME+1*, HL7+1*
    NALL SDEA+7~, SDEA+18*, SDEA+19
    NODE VDEA+32~, VDEA+33*, VDEA+34, VDEA+35
    NODEA VDEA+8~, VDEA+21*, VDEA+22*, VDEA+24*, VDEA+27
    PIECE VDEA+36~, VDEA+39*, VDEA+40, VDEA+42, VDEA+43, VDEA+45
    PSD BULL+4~, BULL+5*, BULL+6
    PSDEA SDEA~, SDEA+9*, SDEA+15, SDEA+22, SDEA+23, SDEA+24, SDEA+25, SDEA+26, SDEA+27
    RETURN VDEA~
    RETURN("Does not hold the ORES security key." , VDEA+15*
    RETURN("Has a DEA number with no expiration date." , VDEA+21*, n expired DEA number." , VDEA+22*
    RETURN("Has n either a DEA number nor a VA number." , VDEA+26*
    RETURN("Is no longer able to write medication orders (inactive date)." , VDEA+30*, t authorized to write medication orders." , VDEA+17*, t permitted to prescribe any schedules." , VDEA+34*, VDEA+56*
    RETURN("Is pe rmitted to prescribe all schedules." , VDEA+46*, rmitted to prescribe schedule" , VDEA+53*
    RETURN("User account does not exist." , VDEA+10*, account status: " , VDEA+12*, cannot sign on." , VDEA+11*
    RETVAL VDEA+8~, VDEA+9*, VDEA+10*, VDEA+11*, VDEA+12*, VDEA+13, VDEA+15*, VDEA+17*, VDEA+21*, VDEA+22*
    , VDEA+26*, VDEA+27*, VDEA+30*, VDEA+34*, VDEA+56*, VDEA+57
    SCHED VDEA+36~, VDEA+44*, VDEA+50, VDEA+51, VDEA+52, VDEA+53
    SPEC VDEA+36~, VDEA+42
    SPEC("SCHEDUL E " , VDEA+37*
    STATUS VDEA+8~, VDEA+9*, VDEA+10, VDEA+11, VDEA+12, VDEA+13
    TEXT VDEA+48~, VDEA+52*, VDEA+53
    U LK1+3, ACTIVE+3, ACTIVE+4, ACTIVE+5, ACTIVE+6, PROVIDER+16, PROVIDER+20, DEA+10, DEA+11, DEA+16
    , DEA+19, DEA+21, DETOX+10, SDEA+13, VDEA+12, VDEA+16, VDEA+18, VDEA+20, VDEA+23, VDEA+25
    , VDEA+27, VDEA+28, VDEA+33, VDEA+40, VDEA+44, VDEA+45, VDEA+50, VDEA+51, VDEA+52, VDEA+53
    , DIV4+4
    VA DEA+6~, DEA+10*, DEA+15, DEA+23
    X1 ACTIVE+1~, ACTIVE+2*, ACTIVE+3, ACTIVE+4, ACTIVE+6, PROVIDER+5~, PROVIDER+10*, PROVIDER+16, PROVIDER+20
    X2 ACTIVE+1~, ACTIVE+2*, ACTIVE+3*, ACTIVE+4*, ACTIVE+5*, ACTIVE+6*, ACTIVE+7, PROVIDER+5~, PROVIDER+10*
    XD SDEA+7~, SDEA+13*, SDEA+14
    XDT DEA+6~, DEA+10*, DEA+13, DETOX+7~, DETOX+10*, DETOX+11, DETOX+12
    >> XMY( BULL+6*
    XU1 DEA+18~
    XU1("P" DEA+19
    XUDA LOOKUP+4~, LK1*, LK1+1*, LK1+3, LK1+4*, LKX, ACTIVE~, ACTIVE+2, ACTIVE+3, ACTIVE+5
    , PROVIDER~, PROVIDER+7, PROVIDER+10, PROVIDER+13, PROVIDER+26, PROVIDER+27
    XUDUZ DIV4~, DIV4+3*, DIV4+4
    XUEXDT DEA+21~*, DEA+22*, DEA+23
    XUF LOOKUP~, LK1+1, LK1+2, PROVIDER~, PROVIDER+26
    XUORES PROVIDER+5~, PROVIDER+13*, PROVIDER+20, PROVIDER+23
    XUROOT DIV4~
    XUROOT( DIV4+4*
    Y LOOKUP+4~, LK1, LK1+1*, LK1+4, SDEA+7~, SDEA+14*
    Y(0 LK1+1
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All