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

Package: Virtual Patient Record

Routine: VPRENC


Information

VPRENC ;SLC/MKB -- VistA Encounter updates ;10/25/18 15:29

Source Information

Source file <VPRENC.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 2 ^%ZTLOAD  ($$FMADD,$$NOW)^XLFDT  
VA FileMan 2 FIND^DIC  $$GET1^DIQ  
Registration 1 ADM^VADPT2  
Text Integration Utility 1 EXTRACT^TIULQ  
Virtual Patient Record 1 POST^VPRHS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Virtual Patient Record 3 VPR PCE EVENTS  VPREVNT  VPRSDAV  

Entry Points

Name Comments DBIA/ICR reference
PX ; -- PXK VISIT DATA EVENT protocol listener
PXQ ; done
DIFF(ACT) ; -- returns 1 or 0 if changed, ACT=1 if new
EDP(IEN) ; -- EDP Log file #230 AVPR index
QUE(M) ; -- begin tasking to post encounters, documents
TIU(IEN,ACT) ; -- TIU Document file #8925 [from TIU^VPREVNT]
; add to ^XTMP("VPRPX") list w/encounters
TASK ; -- post an encounter update
TV
TVD
TD ; look for waiting documents w/o visit
TQ ; re-task if more data
DELALL ; -- delete visit + vfiles from HS [from TASK]
KILL ; clean up
PROC ; -- look for consult/procedure [from TASK]
NAME(X,DA) ; -- return container name for V-files
FHX(X) ; -- return 1 or 0, if HF name is for FamilyHistory
SHX(X) ; -- return 1 or 0, if HF name is for SocialHistory
ZERO(X,DA) ; -- return zero node

External References

Name Field # of Occurrence
^%ZTLOAD QUE+5
FIND^DIC PROC+6
$$GET1^DIQ PROC+5, NAME+3
EXTRACT^TIULQ TD+6, PROC+2
ADM^VADPT2 PX+18
POST^VPRHS TASK+15, TV+6, TV+9, TVD+4, TD+12, DELALL+6, DELALL+7, PROC+4, PROC+9
$$FMADD^XLFDT QUE+2, QUE+4, TASK+3
$$NOW^XLFDT PX+20, EDP+16, QUE+2, TIU+9, TASK+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] GET1^DIQ
^MDD(702 - [#702] FIND^DIC
^AUPNVHF - [#9000010.23] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] TASK+10
^EDP(230 - [#230] EDP+4
^TIU(8925 - [#8925] TVD+1
^TMP("PXKCO" PX+3, PX+4, PX+26, DIFF+4
^VPR(1 PX+1, EDP+1, TASK+2
^XTMP("VPRPX" PX+10, EDP+9, QUE+4*, QUE+6*, TIU+3, TASK+3

Label References

Name Line Occurrences
$$DIFF PX+27
$$FHX NAME+4
$$NAME PX+28, TV+3, DELALL+3
$$SHX NAME+5
$$ZERO TV+4
DELALL TASK+13
KILL TASK+12, TV+10
PROC TVD+6, TD+15
QUE PXQ+2, EDP+20, TIU+12, TQ+1

Naked Globals

Name Field # of Occurrence
^("BEFORE" PX+4, DIFF+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT DIFF~, DIFF+2*, DIFF+5*, TIU~, TIU+3*, TIU+7, TIU+10, TASK+1~, TD+5*, TD+11
TD+12, TD+15
AFTER DIFF+1~, DIFF+4*, DIFF+5
BEFORE DIFF+1~, DIFF+4*, DIFF+5
DA PX+2~, PX+26*, PX+28, PX+29, DIFF+2, DIFF+4, NAME~, NAME+3, ZERO~, ZERO+2
DFN PX+2~, PX+5*, PX+6, PX+7, EDP+2~, EDP+5*, EDP+6, TASK+1~, TASK+9*, TASK+11
TASK+15, TV+6, TV+9, TVD+4, TD+7*, TD+9, TD+12, DELALL+6, DELALL+7, PROC+4
PROC+9
DIFF DIFF+1~, DIFF+2*, DIFF+3, DIFF+5*, DIFF+6
DT QUE+4
EDP0 EDP+2~, EDP+4*, EDP+5
GBL ZERO+1~, ZERO+2*
I PROC+1~, PROC+7*, PROC+8
ID PX+2~, PX+14*, PX+16, PX+19*, PX+22, EDP+2~, EDP+13*, EDP+15*, EDP+17, PROC+6~
PROC+8*, PROC+9
IEN EDP~, EDP+3*, EDP+4, TIU~, TIU+3*, TIU+4, TIU+6, TIU+7, TIU+9, TIU+10
, TIU+11
M QUE~, QUE+2
NEW PX+2~, PX+14*, PX+21*, PX+22, PX+27, PX+29, EDP+2~, EDP+13*, EDP+17
NM NAME+3~*, NAME+4, NAME+5
NODE DIFF+1~, DIFF+3*, DIFF+4, DIFF+5
NOW PX+2~, PX+14*, PX+15, PX+20*, PX+22, EDP+2~, EDP+13*, EDP+14, EDP+16*, EDP+17
, TIU+2~, TIU+6*, TIU+7, TIU+9*, TIU+10
PROC PROC+1~, PROC+3*, PROC+4, PROC+5, PROC+6
PX0A PX+2~, PX+4*, PX+5, PX+17, PX+18
PX0B PX+2~, PX+4*, PX+5, PX+21
SUB PX+2~, PX+25*, PX+26, PX+28, PX+29, DIFF+2, DIFF+4
U PX+1, PX+5, PX+14, PX+17, PX+22, EDP+1, EDP+4, EDP+5, EDP+13, EDP+17
, QUE+4, TIU+10, TASK+2, TASK+11, TASK+12, TASK+14, TV+4, TV+6, TV+8, TV+9
TVD+3, TVD+4, TVD+6, TD+11, TD+12, TD+15, DELALL+5, DELALL+6
V0 TASK+1~, TASK+10*, TASK+11, TV+4*, TV+6
VADMVT PX+2~, PX+19
VAINDT PX+18~*
VDA TASK+1~, TV+2*, TV+3, TV+4, TV+7, TV+8, TVD+1*, TVD+2, TVD+3, TVD+5
TD+2*, TD+3, TD+4, TD+5, TD+6, TD+7, TD+9, TD+11, TD+13, TD+14
DELALL+2*, DELALL+3, DELALL+4, DELALL+5, PROC+2, PROC+3
VFL TASK+1~, TV+1*, TV+2, TV+3, TV+4, TV+7, DELALL+1*, DELALL+2, DELALL+3, DELALL+4
VID TASK+1~, TASK+14*, TASK+15, TV+4*, TV+6, TV+8*, TV+9, TVD+3*, TVD+4, TD+11*
TD+12, DELALL+5*, DELALL+6
VNM TASK+1~, TV+3*, TV+4, TV+6, TV+8, TV+9, DELALL+3*, DELALL+5, DELALL+6
VPRC PROC+6~
VPRC("DILIST" PROC+7, PROC+8
VPRDT TASK+1~, TASK+3*, TASK+5, TD+1
VPRI TASK+1~, TASK+5*, TASK+6, TASK+7, TD+1*, TD+2, TD+3, TD+13, KILL+1
VPRPX PX+10*, PX+11, PX+14, PX+15, PX+20, PX+22, PX+29, PXQ+1, PXQ+2, DIFF+2
, EDP+2~, EDP+9*, EDP+10, EDP+13, EDP+14, EDP+16, EDP+17, EDP+19, EDP+20, TIU+2~
, TIU+3*, TIU+4, TIU+6, TIU+7, TIU+9, TIU+10, TIU+11, TIU+12, TASK+1~, TASK+3*
TASK+5, TASK+6, TASK+7, TASK+8, TASK+9, TV+1, TV+2, TV+7, TVD+2, TVD+5
TD+1, TD+2, TD+3, TD+4, TD+5, TD+9, TD+13, TD+14, TQ+1, TQ+2
DELALL+1, DELALL+2, DELALL+4, KILL+1, KILL+2
VPRTIU TD+5~
VPRTIU( TD+7, PROC+3
VST PX+2~, PX+3*, PX+4, PX+7, PX+19, PX+26, DIFF+4, EDP+2~, EDP+4*, EDP+6
, EDP+15, TASK+1~, TASK+9*, TASK+10, TASK+14, TV+6, TV+8, TV+9, TVD+1, TVD+4
TD+7*, TD+9, TD+12, TD+15, DELALL+5, DELALL+6, DELALL+7, PROC+3, PROC+4, PROC+9
VSTX PX+2~, PX+7*, PX+11, PX+14, PX+15, PX+20, PX+22, PX+29, PXQ+1, DIFF+2
, EDP+2~, EDP+6*, EDP+10, EDP+13, EDP+14, EDP+16, EDP+17, EDP+19, TASK+1~, TASK+6*
TASK+7, TASK+8, TASK+9, TV+1, TV+2, TV+7, DELALL+1, DELALL+2, DELALL+4, KILL+1
KILL+2
X PX+2~, PX+14*, EDP+2~, EDP+13*, TQ+1*, NAME~, NAME+2, NAME+7, NAME+8, NAME+9
, NAME+13, FHX~, FHX+1, FHX+2, SHX~, SHX+1, ZERO~, ZERO+2
X0 TASK+1~, TASK+9*, TASK+12, TASK+14, TVD+2*, TVD+3, TVD+4, TVD+5, TVD+6
Y NAME+1~*, NAME+4*, NAME+5*, NAME+7*, NAME+8*, NAME+9*, NAME+13*, NAME+14, ZERO+1~*, ZERO+2*
, ZERO+3
ZTCPU QUE+1~
ZTDESC QUE+1~, QUE+3*
ZTDTH QUE+1~, QUE+2*
ZTIO QUE+1~, QUE+3*
ZTKIL QUE+1~
ZTPRI QUE+1~
>> ZTREQ TASK+2*
ZTRTN QUE+1~, QUE+2*
ZTSAVE QUE+1~
ZTSK QUE+1~, QUE+6
ZTSYNC QUE+1~
ZTUCI QUE+1~
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