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

Package: Virtual Patient Record

Routine: VPRP20


Information

VPRP20 ;SLC/MKB -- Patch 20 postinit ;3/4/20 12:07

Source Information

Source file <VPRP20.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Virtual Patient Record 3 SORT^VPRDJ09  IDT^VPRDVSIT  $$VALID^VPRHS  
Registration 2 ADM^VADPT2  $$SITE^VASITE  
VA FileMan 2 CREIXN^DDMOD  $$GET1^DIQ  
Kernel 1 $$FMADD^XLFDT  
Lab Service 1 RR^LR7OR1  
Master Patient Index VistA 1 $$GETICN^MPIF001  
Radiology Nuclear Medicine 1 EN1^RAO7PC1  
Scheduling 1 $$SDAPI^SDAMA301  
Surgery 1 LIST^SROESTV  
Text Integration Utility 1 LIST^TIUVPR  

Entry Points

Name Comments DBIA/ICR reference
PSTINT ; -- post-init [add AVPR index to #230]
EN(START,STOP,PAT) ; -- entry point to test CTP
POST(TYPE,ID,ACT,VST,EXT) ; -- post an update to
; @VPRY@(SEQ) = ICN ^ TYPE ^ ID ^ U/D ^ VISIT# ^ DFN ^ EXTID
CTP ; -- application loops [called from VPRZCTP on HealthShare]
VSIT ; -- Encounters via #9000010
; Admissions and EDIS only
SDAM ; -- Appointments via #2.98/44
; Re-send non-cancelled appts for new properties,
; only send past appointments with an Outpt Encounter
; Remove cancelled appts since SD*5.3*722
DGS ; check Sch Admissions #41.1
TIU ; -- Documents via #8925
RAD ; -- Documents via #74
LRAP ; -- Documents via #63.0*
LRMI ; -- Documents via #63.05
ORD ; -- Lab Orders via #100
NMSP(X) ; -- return pkg namespace (if non-PS order in group)
SRF ; -- Procedures via #130
IMM ; -- Vaccinations via #9000010.11

External References

Name Field # of Occurrence
CREIXN^DDMOD PSTINT+16
$$GET1^DIQ TIU+5, SRF+8, IMM+6
RR^LR7OR1 LRAP+2, LRMI+2
$$GETICN^MPIF001 CTP+5
EN1^RAO7PC1 RAD+2
$$SDAPI^SDAMA301 SDAM+7
LIST^SROESTV SRF+2
LIST^TIUVPR TIU+2
ADM^VADPT2 VSIT+8
$$SITE^VASITE CTP+2
SORT^VPRDJ09 IMM+3
IDT^VPRDVSIT VSIT+3
$$VALID^VPRHS CTP+4
$$FMADD^XLFDT EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Total results returned: "_VPRN
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !," #updates: "_$G(VPRN("U"))
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !," #deletes: "_$G(VPRN("D"))
  • Line Location: EN+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] GET1^DIQ
^AUPNVIMM - [#9000010.11] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] VSIT+7
^AUPNVSIT("AA" VSIT+4, VSIT+5
^DGS(41.1 - [#41.1] DGS+2, DGS+3
^DIC(9.4 - [#9.4] NMSP+1
^DPT - [#2] LRAP+3, LRMI+3
^EDP(230 - [#230] VSIT+10
^LR - [#63] LRAP+6, LRAP+7, LRMI+5
^OR(100 - [#100] ORD+6, ORD+8
^PXRMINDX(100 ORD+2
^SRO(136 - [#136] SRF+9
^TMP("LRRR" LRAP+4, LRAP+5, LRAP+9!, LRMI+4, LRMI+7!
^TMP("VPRPX" IMM+4, IMM+5, IMM+8!
^TMP($J SDAM+8, SDAM+9, SDAM+14!, RAD+2!, RAD+3, RAD+4, RAD+9!
^VPR(1 CTP+3
^XTMP("VPRP20" EN+6
^XTMP("VPRPX" VSIT+6, TIU+4

Label References

Name Line Occurrences
$$NMSP ORD+7
CTP EN+11
IMM CTP+11
LRAP CTP+8
LRMI CTP+8
ORD CTP+9
POST VSIT+9, VSIT+11, SDAM+13, DGS+7, TIU+6, RAD+7, LRAP+8, LRMI+6, ORD+13, ORD+15
SRF+10, IMM+7
RAD CTP+8
SDAM CTP+7
SRF CTP+10
TIU CTP+8
VSIT CTP+6

Naked Globals

Name Field # of Occurrence
^( RAD+4, LRAP+5, LRMI+4
^(0 VSIT+7
^(3 ORD+6
^(4 ORD+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT POST~, POST+4*, POST+6, POST+8, SDAM+4~, SDAM+9*, SDAM+11*, SDAM+13, DGS+1~, DGS+5*
DGS+6, DGS+7
BEG VSIT+2~, VSIT+3*, VSIT+4
DATE DGS+1~, DGS+3*, DGS+4, DGS+6
DFN POST+8, POST+10, POST+11, CTP+1~, CTP+4*, CTP+5, VSIT+4, VSIT+5, VSIT+6, SDAM+6
SDAM+8, SDAM+9, SDAM+13, SDAM+14, DGS+2, TIU+2, RAD+2, RAD+3, RAD+4, LRAP+2
LRAP+3, LRAP+4, LRAP+5, LRAP+9, LRMI+2, LRMI+3, LRMI+4, LRMI+7, ORD+2, ORD+3
SRF+2
DT EN+7, SDAM+12
END VSIT+2~, VSIT+3*, VSIT+4
EXT POST~, POST+8
FNUM IMM+1~, IMM+2*
I SRF+1~, SRF+4*, SRF+5
ICN POST+8, POST+11, CTP+1~, CTP+5*
ID POST~, POST+3*, POST+8, VSIT+2~, VSIT+5*, VSIT+6, VSIT+7, VSIT+9, VSIT+10, VSIT+11
SRF+1~, SRF+9*, SRF+10, IMM+1~, IMM+5*, IMM+6, IMM+7
IDT VSIT+2~, VSIT+4*, VSIT+5, LRAP+1~, LRAP+5*, LRAP+6, LRAP+7, LRAP+8, LRMI+1~, LRMI+4*
LRMI+5, LRMI+6
IDX ORD+1~, ORD+2*, ORD+3*, ORD+4, ORD+5
LRDFN LRAP+1~, LRAP+3*, LRAP+6, LRAP+7, LRAP+8, LRMI+1~, LRMI+3*, LRMI+5, LRMI+6
ORDAD ORD+1~
ORDAD( ORD+9*, ORD+15
ORIFN ORD+1~, ORD+6*, ORD+8, ORD+9, ORD+13, ORD+15*
PAT EN~, EN+4
PKG ORD+1~, ORD+7*
RARPT RAD+1~, RAD+4*, RAD+6, RAD+7, RAD+8
RARPT( RAD+6, RAD+8*
START EN~, EN+2
STN POST+11, CTP+1~, CTP+2*
STOP EN~, EN+3
STS RAD+1~, RAD+4*, RAD+5
SUB LRAP+1~, LRAP+4*, LRAP+5, LRAP+6, LRAP+7, LRAP+8
TYPE POST~, POST+3*, POST+8
U EN+7, EN+16, POST+8, POST+11, CTP+2, VSIT+7, SDAM+11, SDAM+12, DGS+3, DGS+5
RAD+4, LRAP+7, LRMI+5, ORD+7, ORD+10, ORD+11, NMSP+1, SRF+6, SRF+7
VADMVT VSIT+2~, VSIT+8!, VSIT+9
VAERR VSIT+2~
VAINDT VSIT+2~, VSIT+7*
VPRBDT EN+1~, EN+2*, VSIT+3, SDAM+6, DGS+4, TIU+2, RAD+2, LRAP+2, LRMI+2, ORD+4
SRF+2, IMM+2
VPRD TIU+1~, TIU+2, TIU+3, TIU+7
VPRDA DGS+1~, DGS+2*, DGS+3, DGS+7, TIU+1~, TIU+3*, TIU+4, TIU+5, TIU+6, ORD+1~
ORD+5*, ORD+6
VPRDT SDAM+4~, SDAM+7*, SDAM+8*, SDAM+9, SDAM+11, SDAM+12, SDAM+13, ORD+1~, ORD+4*, ORD+9
VPREDT EN+1~, EN+3*, VSIT+3, SDAM+6, DGS+4, TIU+2, RAD+2, LRAP+2, LRMI+2, ORD+4
SRF+2, IMM+2
VPRFMT EN+1~, EN+9*, POST+6, POST+9
VPRI SRF+1~, SRF+3*, SRF+4, SRF+5, SRF+9
VPRIDT IMM+1~, IMM+4*, IMM+5
VPRII EN+1~, EN+9*, EN+16, POST+7*, POST+8, POST+11*
VPRN EN+1~, EN+8*, EN+13, EN+16, POST+7*, POST+10*
VPRN( POST+6*
VPRN("D" EN+8*, EN+15, EN+16
VPRN("U" EN+8*, EN+14, EN+16
VPRNUM SDAM+4~, SDAM+7*
VPRPLIST CTP+1~, CTP+3*, CTP+4
VPRPT EN+1~, POST+9, POST+10*, CTP+3, CTP+5*
VPRPT( EN+4*
VPRS SRF+1~, SRF+2, SRF+3, SRF+4, SRF+5, SRF+9, SRF+11
VPRSTART IMM+1~, IMM+2*
VPRSTOP IMM+1~, IMM+2*
VPRX PSTINT+1~, PSTINT+16, SDAM+4~, SDAM+7
VPRX("ACTIVITY" PSTINT+7*
VPRX("DESCR" PSTINT+9*, PSTINT+10*, PSTINT+11*
VPRX("EXECUTION" PSTINT+6*
VPRX("FILE" PSTINT+2*
VPRX("FLDS" SDAM+5*
VPRX("KILL" PSTINT+13*
VPRX("NAME" PSTINT+3*
VPRX("SET" PSTINT+12*
VPRX("SHORT D ESCR" , PSTINT+8*
VPRX("SORT" SDAM+5*
VPRX("TYPE" PSTINT+4*
VPRX("USE" PSTINT+5*
VPRX("VAL" PSTINT+15*
VPRX("WHOLE K ILL" , PSTINT+14*
VPRX(1 SDAM+6*
VPRX(4 SDAM+6*
VPRXID RAD+1~, RAD+3*, RAD+4
VPRY PSTINT+1~, PSTINT+16, EN+1~, EN+6*, EN+7, EN+16, POST+8, POST+11
VST POST~, POST+8, TIU+1~, TIU+5*, TIU+6, SRF+8*, SRF+10, IMM+1~, IMM+6*, IMM+7
X NMSP~, NMSP+1, SRF+1~, SRF+5*, SRF+6, SRF+7, SRF+8
X0 SDAM+4~, SDAM+9*, SDAM+11, SDAM+12, DGS+1~, DGS+3*, DGS+5, ORD+1~, ORD+6*, ORD+7
X3 ORD+1~, ORD+6*, ORD+10, ORD+11
X4 ORD+1~, ORD+6*, ORD+12
Y NMSP+1~*, NMSP+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All