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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXUTL1

Package: PCE Patient Care Encounter

Routine: PXUTL1


Information

PXUTL1 ;ISL/dee - Utility routines used by PCE ;4/3/97

Source Information

Source file <PXUTL1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
DRG Grouper 1 ($$ICDDATA,$$ICDDESC)^ICDXCODE  
VA FileMan 1 EN^DIQ1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 25

Package Total Caller Graph
PCE Patient Care Encounter 21 PX10118P  PXAIPOV  PXAPI  PXBAPI1  PXBGPOV  PXBGVST  PXBSTOR  PXCA0  
PXCEHLOC  PXCEINTR  PXCEPAT  PXCEPOV1  PXCEPRV  PXCESDAM  PXCEVFI4  PXCEVFI5  
PXCEVFIL  PXCEVSIT  PXKFPOV1  PXQGVST  PXUTLVST  
Scheduling 3 SDSCAPI  SDSCNSCP  SDSCOMP  
Text Integration Utility 1 TIUPXAP2  

Entry Points

Name Comments DBIA/ICR reference
PRIMSEC(PXUTVST,PXUTAUPN,PXUTNODE,PXUPIECE) ;Returns ien of the primary one
; if there is one for the passed visit otherwise returns 0.
; Parameters:
; PXUTVST Pointer to the visit
; PXUTAUPN V-File global e.g. "^AUPNVPRV"
; PXUTNODE The node that the Primary/Secondary field is on
; PXUPIECE The piece of the Primary/Secondary field
DXNARR(PXDXCDE,PXUTLDT) ;Returns the versioned full text from file #80, field #68
APPT2VST(PXUTLPAT,PXUTLDT,HLOC) ;Returns ien of visit that the related
PRIMVPOV(PXUTVST) ;Returns the primary diagnosis if there is one
; for the passed visit otherwise returns 0.
VST2APPT(VISIT) ;Is this visit related to an appointment
PRIMVPRV(PXUTVST) ;Returns the primary provider if there is one
; for the passed visit otherwise returns 0.
  • ICR #4991
    • Status: Active
    • Usage: Private
    APPOINT(PXUTLDFN,PXUTLDT,HLOC) ;Returns 1 if the patient has an appointment
  • ICR #3146
    • Status: Active
    • Usage: Private
    VSTAPPT(PXUTLPAT,PXUTLDT,PXUTLLOC,PXUTLVST) ;Returns 1 if the visit is being pointed to by an
    ; appointment otherwise 0.
    EXTTEXT(IEN,REQUIRED,FILE,FIELD1,FIELD2) ;Returns the external form.
    DISPOSIT(PXUTLDFN,PXUTLDT,PXUTVIEN) ;Checks to see if a visit is a disposition

    External References

    Name Field # of Occurrence
    EN^DIQ1 EXTTEXT+26
    $$ICDDATA^ICDXCODE DXNARR+4
    $$ICDDESC^ICDXCODE DXNARR+5

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNVPOV - [#9000010.07] PRIMVPOV+4
    ^AUPNVPRV - [#9000010.06] PRIMVPRV+4
    ^AUPNVSIT - [#9000010] VST2APPT+7
    ^DPT - [#2] DISPOSIT+1, APPOINT+2, VSTAPPT+2, APPT2VST+2
    ^SCE - [#409.68] DISPOSIT+1, VSTAPPT+2, APPT2VST+2

    Label References

    Name Line Occurrences
    $$PRIMSEC PRIMVPRV+3, PRIMVPOV+3
    $$VSTAPPT VST2APPT+9

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA EXTTEXT+18~, EXTTEXT+23*, EXTTEXT+27, EXTTEXT+28
    DIC EXTTEXT+18~, EXTTEXT+20*
    DIQ EXTTEXT+18~, EXTTEXT+24*
    DIQ(0 EXTTEXT+25*
    DR EXTTEXT+18~, EXTTEXT+21*, EXTTEXT+22*
    DT DXNARR+3
    FIELD1 EXTTEXT~, EXTTEXT+19, EXTTEXT+21, EXTTEXT+27
    FIELD2 EXTTEXT~, EXTTEXT+22, EXTTEXT+28
    FILE EXTTEXT~, EXTTEXT+19, EXTTEXT+20, EXTTEXT+27, EXTTEXT+28
    HLOC APPOINT~, APPOINT+2, APPT2VST~, APPT2VST+2
    IEN EXTTEXT~, EXTTEXT+23
    PXCATEMP PRIMVPRV+2~, PRIMVPRV+3*, PRIMVPRV+4, PRIMVPOV+2~, PRIMVPOV+3*, PRIMVPOV+4
    PXCOD DXNARR+1~, DXNARR+4*, DXNARR+5
    PXDXCDE DXNARR~, DXNARR+2, DXNARR+4
    PXLDX DXNARR+1~, DXNARR+5
    PXLDX(1 DXNARR+6
    PXNO DXNARR+1~, DXNARR+5*, DXNARR+6
    PXTEXT EXTTEXT+18~, EXTTEXT+27*, EXTTEXT+28*, EXTTEXT+29*, EXTTEXT+30*, EXTTEXT+31
    PXUPIECE PRIMSEC~, PRIMSEC+10
    PXUTAUPN PRIMSEC~, PRIMSEC+10
    PXUTDIQ1 EXTTEXT+18~
    PXUTDIQ1( EXTTEXT+27, EXTTEXT+28
    PXUTLDFN DISPOSIT~, DISPOSIT+1, APPOINT~, APPOINT+2
    PXUTLDT DISPOSIT~, DISPOSIT+1, APPOINT~, APPOINT+2, VSTAPPT~, VSTAPPT+2, APPT2VST~, APPT2VST+2, DXNARR~, DXNARR+3*
    , DXNARR+4, DXNARR+5
    PXUTLLOC VSTAPPT~, VSTAPPT+2
    PXUTLPAT VSTAPPT~, VSTAPPT+2, APPT2VST~, APPT2VST+2
    PXUTLVST VSTAPPT~, VSTAPPT+2
    PXUTNODE PRIMSEC~
    PXUTPRIM PRIMSEC+8~, PRIMSEC+9*, PRIMSEC+10*, PRIMSEC+11
    PXUTVIEN DISPOSIT~, DISPOSIT+1
    PXUTVST PRIMVPRV~, PRIMVPRV+3, PRIMVPOV~, PRIMVPOV+3, PRIMSEC~
    REQUIRED EXTTEXT~, EXTTEXT+29, EXTTEXT+30
    U DXNARR+4
    VISIT VST2APPT~, VST2APPT+7, VST2APPT+9
    VISIT0 VST2APPT+6~, VST2APPT+7*, VST2APPT+8, VST2APPT+9
    X EXTTEXT+18~
    Y EXTTEXT+18~
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All