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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: VPREVNT

Package: Virtual Patient Record

Routine: VPREVNT


Information

VPREVNT ;SLC/MKB -- VistA event listeners ;10/25/18 15:29

Source Information

Source file <VPREVNT.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Text Integration Utility 2 EXTRACT^TIULQ  $$ISA^TIULX  
VA FileMan 2 FIND^DIC  $$GET1^DIQ  
Registration 1 ADM^VADPT2  
Virtual Patient Record 1 ($$ON,$$SUBS,NEW,POST,QUE)^VPRHS  

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

Package Total Caller Graph
Virtual Patient Record 14 VPR APPT EVENTS  VPR DG UPDATES  VPR GMPL EVENT  VPR GMRA ERROR EVENTS  VPR GMRA EVENTS  VPR IBCN EVENTS  VPR INPT EVENTS  VPR LRAP EVENTS  
VPR NA EVENTS  VPR PCE EVENTS  VPR PCMM TEAM  VPR PCMM TEAM POSITION  VPR XQOR EVENTS  VPRPROC  
Kernel 1 ^ORD(101  
Text Integration Utility 1 TIUDDX  

Entry Points

Name Comments DBIA/ICR reference
FLD(X) ; -- Return 1 or 0, if X is a field tracked by VPR
; via DG FIELD MONITOR
GMPL(DFN,IEN) ; -- GMPL EVENT protocol listener
DG ; -- DG FIELD MONITOR protocol listener
XQOR(MSG,FD) ; -- CPRS protocol event listener
; FD = frontdoor msg from CPRS (get ORIFN for new backdoor orders)
; else = backdoor msg/ack from Pharmacy, Lab, Radiology, etc.
LR() ; -- Return ien of Lab class
FHX() ; -- return 1 or 0, if HF name is for FamilyHistory
GMRV(DFN,IEN,ERR) ; -- Vital Measurement file #120.5 AVPR index
  • ICR #6078
    • Status: Active
    • Usage: Controlled Subscription
    MDC(OBS) ; -- MDC OBSERVATION UPDATE protocol listener
    DGPM ; -- DGPM MOVEMENT EVENTS protocol listener
    ; [expects DFN,DGPM* variables]
    ORDCONT(NMSP) ; -- Returns SDA Order container name
    NAME(X) ; -- return container name for V-files
    DOCITM(DAD) ; -- TIU Document Def'n Items subfile #8925.14 AVPR1 index
  • ICR #6078
    • Status: Active
    • Usage: Controlled Subscription
    RAD ; -- Radiology documents
    DOCDEF(IEN) ; -- TIU Document Definition file #8925.1 AVPR index
  • ICR #6078
    • Status: Active
    • Usage: Controlled Subscription
    NEWINPT() ; -- is DFN newly admitted?
    SDAM ; -- SDAM APPOINTMENT EVENTS protocol listener
    LRAP(MSG) ; -- LR7O AP EVSEND OR protocol listener
    CP(DFN,ID,ACT) ; -- CP Transaction file #702 AVPR index (via VPRPROC)
    PCMMTP ; -- SCMC PATIENT TEAM POSITION CHANGES protocol listener
    PCE ; -- PXK VISIT DATA EVENT protocol listener
    PCMMT ; -- SCMC PATIENT TEAM CHANGES protocol listener
    PID() ; -- Returns patient from PID segment in current msg
    GMRC ; -- Referrals
    XU(IEN,ACT) ; -- XU USER ADD/CHANGE/TERMINATE option listener
    IBCN ; -- IBCN NEW INSURANCE EVENTS listener
    TIU(DFN,IEN) ; -- TIU Document file #8925 AVPR index
  • ICR #6078
    • Status: Active
    • Usage: Controlled Subscription
    LRD ; -- AP/MI documents [from XQOR, LRAP: expects PKGIFN]
    PSB ; -- VPR PSB EVENTS protocol listener (BCMA)
    NMSP(IFN) ; -- Returns package namespace from pointer
    GMRASMT(DFN) ; -- GMRAHDR Allergy Assessment listener
    USR(IEN) ; -- USR Authorization/Subscription file #8930.1 AVPR index
  • ICR #6078
    • Status: Active
    • Usage: Controlled Subscription
    GMRA(ACT) ; -- GMRA SIGN-OFF ON DATA protocol listener
    ; also GMRA ENTERED IN ERROR [ACT=@]
    SHX() ; -- return 1 or 0, if HF name is for SocialHistory

    External References

    Name Field # of Occurrence
    FIND^DIC GMRC+5
    $$GET1^DIQ NMSP+2, GMRC+1, GMRC+4, RAD+6, CP+2, PCMMTP+4
    EXTRACT^TIULQ TIU+10
    $$ISA^TIULX TIU+18, TIU+19, TIU+20
    ADM^VADPT2 PCE+9
    $$ON^VPRHS DGPM+2
    $$SUBS^VPRHS DGPM+2
    NEW^VPRHS DGPM+2
    POST^VPRHS DG+6, DGPM+11, DGPM+12, DGPM+13, SDAM+8, PCE+7, PCE+10, PCE+20, PCE+22, XQOR+20
    , XQOR+23, GMRC+2, GMRC+8, RAD+10, LRD+8, PSB+6, GMRA+4, GMRASMT+1, GMPL+3, GMRV+3
    , MDC+5, CP+3, TIU+12, TIU+15, TIU+16, TIU+18, TIU+19, TIU+20, IBCN+1, PCMMT+3
    , PCMMTP+5
    QUE^VPRHS DG+5

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^GMR(123 - [#123] GET1^DIQ
    ^SCPT(404.42 - [#404.42] GET1^DIQ
    ^MDD(702 - [#702] FIND^DIC,  GET1^DIQ
    ^RARPT - [#74] GET1^DIQ
    ^DIC(9.4 - [#9.4] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNPROB - [#9000011] GMPL+2
    ^AUPNVSIT("AAH" DGPM+9
    ^AUTTHF - [#9999999.64] FHX+1, SHX+1
    ^DGPM - [#405] DGPM+8
    ^DPT - [#2] NEWINPT+2, LRD+4
    ^LR - [#63] LRD+5, LRD+6
    ^OR(100 - [#100] XQOR+17, XQOR+18, XQOR+22, NMSP+1
    ^PSB(53.79 - [#53.79] PSB+3
    ^RADPT - [#70] RAD+5
    ^RADPT("AO" RAD+2, RAD+4
    ^TIU(8925.1 - [#8925.1] LR+1, LR+2
    ^TMP("PXKCO" PCE+2, PCE+3, PCE+13, PCE+16

    Label References

    Name Line Occurrences
    $$FHX NAME+1
    $$FLD DG+5
    $$NAME PCE+19
    $$NEWINPT DGPM+2
    $$NMSP XQOR+19
    $$ORDCONT XQOR+19
    $$PID XQOR+6, LRAP+5
    $$SHX NAME+2
    GMRC XQOR+25
    LRD XQOR+28, LRAP+10
    RAD XQOR+27

    Naked Globals

    Name Field # of Occurrence
    ^( PSB+3
    ^("BEFORE" PCE+3, PCE+16
    ^(0 RAD+5, LR+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ACT SDAM+2~, SDAM+6*, SDAM+8, PCE+1~, PCE+6*, PCE+7, PCE+18*, PCE+20, XQOR+3~, XQOR+15*
    , XQOR+20, RAD+1~, RAD+6*, RAD+7*, RAD+10, GMRA~, GMPL+2~*, GMPL+3, GMRV+2~*, GMRV+3
    , MDC+1~, MDC+4*, MDC+5, CP~, CP+3, TIU+1~, TIU+2*, TIU+8*, TIU+9*, TIU+12
    , TIU+19, TIU+20, XU~
    ADM DGPM+3~*, DGPM+4*, DGPM+8, DGPM+12
    AFTER PCE+14~, PCE+16*, PCE+17, PCE+18
    BEFORE PCE+14~, PCE+16*, PCE+17, PCE+18
    DA PCE+1~, PCE+13*, PCE+16, PCE+20
    DAD TIU+1~, TIU+4*, TIU+7, DOCITM~
    DATE SDAM+2~, SDAM+5*, SDAM+8
    DFN DG+3~*, DG+5, DG+6, DGPM+2, DGPM+9, DGPM+11, DGPM+12, DGPM+13, NEWINPT+2, SDAM+2~
    , SDAM+3*, SDAM+8, PCE+1~, PCE+4*, PCE+7, PCE+10, PCE+20, PCE+22, XQOR+3~, XQOR+6*
    , XQOR+20, XQOR+23, GMRC+2, GMRC+8, RAD+2, RAD+4, RAD+5, RAD+10, LRAP+1~, LRAP+5*
    , LRD+4, LRD+8, PSB+1~, PSB+3*, PSB+4, PSB+6, GMRA+2~, GMRA+3*, GMRA+4, GMRASMT~
    , GMRASMT+1, GMPL~, GMPL+1*, GMPL+3, GMRV~, GMRV+1*, GMRV+3, MDC+1~, MDC+2*, MDC+5
    , CP~, CP+1*, CP+3, TIU~, TIU+2*, TIU+12, TIU+15, TIU+16, TIU+18, TIU+19
    , TIU+20, IBCN+1, PCMMT+2~*, PCMMT+3, PCMMTP+2~, PCMMTP+4*, PCMMTP+5
    >> DGDA DG+3
    >> DGFIELD DG+5
    >> DGFILE DG+1
    >> DGPMA DGPM+4, DGPM+11, DGPM+13, NEWINPT+2
    >> DGPMDA DGPM+3, NEWINPT+2
    >> DGPMP DGPM+4, NEWINPT+2
    >> DGPMT DGPM+4, DGPM+11, NEWINPT+2
    DIFF PCE+14~*, PCE+15, PCE+18*, PCE+19
    ERR GMRV~, GMRV+2
    FD XQOR~, XQOR+14
    >> GMRAPA GMRA+3
    >> GMRAPA(0 GMRA+3
    HLOC SDAM+2~, SDAM+5*
    I DGPM+7~, DGPM+9*, DGPM+11, DGPM+12, GMRC+6*, GMRC+7, RAD+1~, RAD+2*, RAD+4*, RAD+5
    , RAD+8, PID+1~*, PID+2*, PID+3
    ID GMRC+5~, GMRC+7*, GMRC+8, MDC+1~, MDC+3*, MDC+5, CP~, CP+1*, CP+2, CP+3
    IDT RAD+1~, RAD+2*, RAD+4, RAD+5, RAD+8, LRD+1~, LRD+2*, LRD+3, LRD+5, LRD+6
    , LRD+7
    IEN PCE+1~, PCE+2*, PCE+3, PCE+7, PCE+10, PCE+13, PCE+16, PCE+20, PCE+22, PSB+1~
    , PSB+2*, PSB+3, GMRA+2~, GMRA+3*, GMRA+4, GMPL~, GMPL+1*, GMPL+2, GMPL+3, GMRV~
    , GMRV+1*, GMRV+3, TIU~, TIU+2*, TIU+7*, TIU+10, TIU+11, TIU+12, TIU+14, TIU+18
    , TIU+19, TIU+20, DOCDEF~, USR~, XU~
    IFN NMSP~, NMSP+1
    LRDFN LRD+1~, LRD+4*, LRD+5, LRD+6, LRD+7
    MSG XQOR~, XQOR+4, LRAP~, LRAP+2
    MSH XQOR+3~, XQOR+5*, XQOR+6, XQOR+9, LRAP+1~, LRAP+3*, LRAP+4, LRAP+6, PID+1
    NMSP ORDCONT~, ORDCONT+1*, ORDCONT+2, ORDCONT+3, ORDCONT+4
    NODE PCE+14~, PCE+15*, PCE+16, PCE+17, PCE+18
    OBS MDC~
    OBS("OBS_ID" MDC+3
    OBS("PATIENT_ID" MDC+2
    OBS("STATUS" MDC+4
    ORC XQOR+3~, XQOR+9*, XQOR+11*, XQOR+17, LRAP+1~, LRAP+6*, LRAP+8*, LRAP+9
    ORDCNTRL XQOR+10~, XQOR+11*, XQOR+13, XQOR+14, XQOR+15, XQOR+26, GMRC+4, LRAP+7~, LRAP+8*, LRAP+9
    ORIFN XQOR+10~, XQOR+17*, XQOR+18, XQOR+19, XQOR+20, XQOR+21, XQOR+22, PSB+1~, PSB+5*, PSB+6
    ORIG XQOR+22~*, XQOR+23
    ORPK PSB+1~, PSB+3*, PSB+4
    PKGIFN XQOR+10~, XQOR+17*, XQOR+25, GMRC+1, GMRC+2, GMRC+4, GMRC+5, RAD+2, RAD+4, LRAP+7~
    , LRAP+9*, LRD+2
    PROC TIU+1~, TIU+14*, TIU+15, TIU+16
    >> PSBIEN PSB+2
    >> PSBIEN(1 PSB+2
    PTF DGPM+7~, DGPM+13*
    PX0A PCE+1~, PCE+3*, PCE+4, PCE+6, PCE+7, PCE+8, PCE+9, PCE+22
    PX0B PCE+1~, PCE+3*, PCE+4, PCE+7, PCE+8, PCE+22
    RPT RAD+1~
    RPT( RAD+8*, RAD+10
    >> SCPCTM PCMMT+1
    >> SCPCTP PCMMTP+1
    >> SCPTTMAF PCMMT+2
    >> SCPTTMB4 PCMMT+2
    >> SCPTTPAF PCMMTP+3
    >> SCPTTPB4 PCMMTP+3
    >> SDAMEVT SDAM+4
    >> SDATA SDAM+1, SDAM+3, SDAM+5
    >> SDATA("AFTER" SDAM+6
    SEG PID+1~, PID+2*
    STS RAD+1~, RAD+6*, RAD+7, TIU+1~, TIU+4*, TIU+5, TIU+6, TIU+8
    SUB PCE+1~, PCE+12*, PCE+13, PCE+16, PCE+19, LRD+1~, LRD+2*, LRD+3, LRD+5, LRD+6
    , LRD+7
    SUB0 PCE+14~, PCE+17*, FHX+1, SHX+1
    TM PCMMTP+2~, PCMMTP+3*, PCMMTP+4
    TYPE PSB+1~, PSB+4*
    U DG+2, FLD+2, DGPM+4, DGPM+13, SDAM+3, SDAM+5, PCE+4, PCE+7, PCE+8, PCE+20
    , FHX+1, SHX+1, XQOR+11, XQOR+17, XQOR+22, NMSP+1, RAD+5, LRAP+8, LRAP+9, LRD+6
    , PSB+3, GMPL+2, LR+2
    >> VADMVT PCE+10
    VAINDT DGPM+7~, DGPM+8*, DGPM+9, PCE+9~*
    VPRC GMRC+5~
    VPRC("DILIST" GMRC+6, GMRC+7
    VPRFN DG+1~*, DG+2, DG+5
    VPRMSG XQOR+3~, XQOR+4*, XQOR+5, XQOR+6, XQOR+9, XQOR+11, LRAP+1~, LRAP+2*, LRAP+3, LRAP+4
    , LRAP+6, LRAP+8, PID+2, PID+3
    VPRPKG XQOR+3~, XQOR+19*, XQOR+25, XQOR+27, XQOR+28
    VPRSDA XQOR+3~, XQOR+19*, XQOR+20, XQOR+23
    VPRTIU TIU+1~
    VPRTIU( TIU+11, TIU+14
    VST GMRC+1~*, GMRC+2, GMRC+8, RAD+1~, RAD+5*, RAD+8, CP+2~*, CP+3, TIU+1~, TIU+11*
    , TIU+12
    VST( RAD+8*, RAD+10
    X FLD~, FLD+2*, FLD+3, FLD+4, FLD+5, FLD+6, FLD+7, FLD+8, DGPM+7~, DGPM+8*
    , PCE+1~, PCE+19*, PCE+20, NAME~, NAME+1, NAME+2, NAME+4, NAME+5, NAME+6, FHX+1~*
    , FHX+2, FHX+3, SHX+1~*, SHX+2, NMSP+1~*, NMSP+2, RAD+1~, RAD+5*, RAD+6, RAD+8
    , RAD+10*, LRD+1~, LRD+7*, LRD+8
    X(2 TIU+4
    X(3 TIU+4
    >> X2(1 TIU+9
    Y NEWINPT+1~*, NEWINPT+2*, NEWINPT+3, NMSP+1~, NMSP+2*, NMSP+3, PID+1~, PID+3*, PID+5, LR+1~*
    , LR+2*, LR+3
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All