Routine: VPR1P36

Package	Total	Call Graph
Kernel	4	^%ZTLOAD ($$FMADD,$$NOW)^XLFDT $$UP^XLFSTR ($$INSTALDT,BMES,MES)^XPDUTL
General Medical Record - Vitals	1	EN1^GMRVUT0
MailMan	1	^XMD
Master Patient Index VistA	1	$$GETICN^MPIF001
Registration	1	$$SITE^VASITE
Virtual Patient Record	1	$$MERGED^VPRHS

Entry Points

Name	Comments	DBIA/ICR reference
ENV	;Main entry point for Environment check point.
PROGCHK(XPDABORT)	;checks for necessary programmer variables
EN(START,STOP,TYPE,FMT,PAT,VPRY)	; -- entry point to test CTP
PATCH(P)	; -- return patch P installation date
CTP	; -- main loops,called from VPRZCTP on HealthShare ; Expects VPRBDT,VPREDT,VPRTYPE,VPRPAT,VPRN
ICN(DFN)	; -- return ICN or -1^invalid
ICQ	;exit
POST(TYPE,ID,ACT,VST)	; -- post an update to ; @VPRY@(SEQ) = ICN ^ TYPE ^ ID ^ U/D ^ VISIT# ^ DFN
OBS	; -- Vital Observations missing Unit of Measure ; Expects DFN,VPRBDT,VPREDT,VPRN
PO	;Main entry point for Post-init items. ; Queue off predictor to run after 10:00pm
PREDICTOR	;-- capture CTP predictor as Post Init on patch install (optional)
MSG	; add post message and send to VPR developers in Outlook

External References

Name	Field # of Occurrence
^%ZTLOAD	PO+11
EN1^GMRVUT0	OBS+6
$$GETICN^MPIF001	ICN+5
$$SITE^VASITE	CTP+3, MSG+2
$$MERGED^VPRHS	ICN+4
$$FMADD^XLFDT	EN+10
$$NOW^XLFDT	PO+6, PO+8
$$UP^XLFSTR	CTP+8
^XMD	MSG+21
$$INSTALDT^XPDUTL	PATCH+2
BMES^XPDUTL	PROGCHK+3, EN+17, PO+2
MES^XPDUTL	PROGCHK+4, PROGCHK+5, PROGCHK+6, EN+18, EN+19, EN+23, PO+12, PO+13

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	ICN+2
^UTILITY($J	OBS+7, OBS+8, OBS+9, OBS+10, OBS+14!
^VPR(1	EN+5, CTP+4, ICN+3
^XTMP("VPRP36"	EN+9

Label References

Name	Line Occurrences
$$ICN	CTP+6
$$PATCH	EN+3
@(	CTP+8
CTP	EN+15
EN	PREDICTOR+2
ICQ	ICN+1, ICN+2, ICN+3, ICN+4
POST	OBS+13
PROGCHK	ENV+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACT	POST~, POST+4*, POST+7, POST+10
DAY	PO+3~, PO+6*, PO+7
DFN	CTP+2~, CTP+5*, CTP+6, ICN~, ICN+1, ICN+2, ICN+3, ICN+4, ICN+5, POST+10 , POST+11, POST+12
DMAX	OBS+2~, OBS+4*, OBS+5, OBS+7
DONE	PO+3~
DRANGE	OBS+2~
DT	PROGCHK+2, EN+4, EN+10
DUZ	PROGCHK+2, MSG+18
DUZ(0	PROGCHK+2
FMT	EN~, EN+12
GMRVSTR	OBS+2~, OBS+3*
GMRVSTR(0	OBS+5*
GUID	OBS+2~
ICN	CTP+2~, CTP+6*, POST+10
ID	POST~, POST+3, POST+10, OBS+2~, OBS+9, OBS+10, OBS+13
LINE	MSG+1~, MSG+5, MSG+6, MSG+7, MSG+8, MSG+9, MSG+10, MSG+12, MSG+13*
P	PATCH~, PATCH+1*, PATCH+2
PAT	EN~, EN+5, EN+6, EN+7
QQ	PO+3~, PO+6*
SCH	PO+6!, PO+7, PO+8, PO+9
START	EN~, EN+2
STN	CTP+2~, CTP+3*
STOP	EN~, EN+4
TAG	CTP+2~, CTP+7, CTP+8, POST+6
TIME	PO+3~, PO+6*, PO+7, PO+8
TYP	OBS+2~, OBS+11*, OBS+12
TYPE	EN~, EN+14, POST~, POST+3*, POST+10, POST+12
U	PROGCHK+2, EN+10, EN+21, CTP+3, POST+10, OBS+5, OBS+11, MSG+8, MSG+9, MSG+10
VPR36	EN+1~, EN+3*, EN+4
VPRBDT	EN+1~, EN+2*, OBS+5
VPREDT	EN+1~, EN+4*, OBS+5
VPRFMT	EN+1~, EN+12*, POST+9
VPRI	PATCH+1~, PATCH+2
VPRI(0	PATCH+3
VPRIDT	OBS+2~, OBS+7*, OBS+8, OBS+9, OBS+10
VPRII	EN+1~, EN+12, EN+21, POST+8, POST+10, POST+11, POST+12
>> VPRMSG(	MSG+6, MSG+7, MSG+8, MSG+9, MSG+10, MSG+12, MSG+13*
VPRN	EN+1~, EN+11, EN+17, EN+20, EN+21, POST+8, OBS+7, MSG+1~, MSG+3*, MSG+8 , MSG+9, MSG+10
VPRN(	POST+6, POST+7
VPRN("D"	EN+11*, EN+19, EN+21
VPRN("U"	EN+11*, EN+18, EN+21
VPRPAT	EN+1~, EN+5, EN+6, EN+7, CTP+4, CTP+5
VPRPRED	PREDICTOR+1~, PREDICTOR+2, MSG+3, MSG+11, MSG+12
VPRPT	EN+1~, CTP+4
VPRPT(	EN+6*
VPRSITE	MSG+1~, MSG+2*, MSG+6, MSG+15
VPRT	CTP+2~, CTP+7*
VPRTYP	OBS+2~, OBS+8*, OBS+9, OBS+10
VPRTYPE	EN+1~, EN+14*, CTP+3, CTP+7
VPRY	EN~, EN+9*, EN+10, EN+20, EN+21, EN+22, EN+23, POST+10, POST+11, POST+12
VST	POST~, POST+10
X0	OBS+2~, OBS+10*, OBS+11
XMDUN	MSG+14~
XMDUZ	MSG+14~, MSG+16*
XMSUB	MSG+14~, MSG+15*
XMTEXT	MSG+14~, MSG+21*
XMY	MSG+14~, MSG+17!
XMY(	MSG+18*
XMY("liana.buciuman@domain.ext"	MSG+19*
XMY("m.robert.yorty@domain.ext"	MSG+20*
XPDABORT	ENV+2, ENV+3, ENV+4!, PROGCHK~, PROGCHK+7
Y	PATCH+1~, PATCH+2, PATCH+3, PATCH+4, ICN+1~, ICN+2, ICN+3, ICN+4, ICN+5*, ICQ+1 , PO+3~
ZTDESC	PO+3~, PO+10*
ZTDTH	PO+3~, PO+9*
ZTIO	PO+3~, PO+4*
ZTRTN	PO+3~, PO+4*
ZTSAVE	PO+3~
ZTSK	PO+3~, PO+12, PO+13

Marked Items

Name	Field # of Occurrence
$T(@TAG	CTP+8

Customize PDF page

Package: Virtual Patient Record

Routine: VPR1P36

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items