Routine: VPRDJ05

Package	Total	Call Graph
Virtual Patient Record	5	($$FAC,$$VUID)^VPRD ADD^VPRDJ ($$ISIV,$$MEDSTAT,$$TYPE,BCMA,IV1,SCH)^VPRDJ05V ($$STATUS,RESP)^VPRDPSOR ($$JSONDT,$$SETUID,FACILITY)^VPRUTILS
Pharmacy Data Management	4	NDF^PSS50 ZERO^PSS50P7 ALL^PSS51P2 EN^PSSDI
Outpatient Pharmacy	3	$$GET1^PSODI EN^PSOORDER OEL^PSOORRL
Kernel	2	($$FMADD,$$FMDIFF)^XLFDT $$UP^XLFSTR
Order Entry Results Reporting	1	($$OI,$$PKGID,EN)^ORX8
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Virtual Patient Record	1	VPRDJ0

Name	Comments	DBIA/ICR reference
PS1(ID)	; -- med order
A	; - Get order responses
B	; - Get dosages
C	; - Get OP data
PSQ	; finish
DOSE(Y,N)	; -- return dosage data from VPRESP(ID,N) to Y("name")
STOP(BEG,X)	; -- Return date after adding X to BEG
NDF(DRUG,VPI,ORD)	; -- Set NDF data for dispense DRUG ien ; code ^ name ^ vuid [^ role ^ concentration ^ order]
RELTIME(START,STOP,DUR,MIN)	; -- Return #min for dose
TOMIN(DUR)	;
GETCLS()	; p18 added package check

Name	Field # of Occurrence
$$GET1^DIQ	PS1+10, PS1+11, C+29, GETCLS+1, GETCLS+4
$$OI^ORX8	A+1
$$PKGID^ORX8	PS1+2, B+32
EN^ORX8	PS1+13
$$GET1^PSODI	C+27
EN^PSOORDER	C+9
OEL^PSOORRL	PS1+28, B+32
NDF^PSS50	NDF+6
ZERO^PSS50P7	A+4
ALL^PSS51P2	DOSE+5
EN^PSSDI	NDF+4
$$FAC^VPRD	PS1+16
$$VUID^VPRD	NDF+14, NDF+18
ADD^VPRDJ	PSQ+6
$$ISIV^VPRDJ05V	PS1+32
$$MEDSTAT^VPRDJ05V	PS1+24
$$TYPE^VPRDJ05V	PS1+29
BCMA^VPRDJ05V	C+31
IV1^VPRDJ05V	PS1+32
SCH^VPRDJ05V	DOSE+7
$$STATUS^VPRDPSOR	PS1+23
RESP^VPRDPSOR	A+7, B+18
$$JSONDT^VPRUTILS	PS1+14, PS1+20, PS1+21, B+10, B+11, B+25, B+26, B+33, C+13, C+19 , C+20, C+27, C+30
$$SETUID^VPRUTILS	PS1+8, PS1+9, PS1+10, PS1+11, PS1+15, PS1+17, PSQ+4
FACILITY^VPRUTILS	PS1+19
$$FMADD^XLFDT	STOP+9
$$FMDIFF^XLFDT	RELTIME+2
$$UP^XLFSTR	TOMIN+2

FileNo	Call Tags
^OR(100 - [#100]	GET1^DIQ
55.06	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	GETCLS+2, GETCLS+3
^OR(100 - [#100]	PS1+27, B+1, B+14, B+17, B+24
^SC - [#44]	PS1+18, PS1+26
^TMP("PS"	A+8, B+32, PSQ+3, PSQ+5!
^TMP("PSOR"	C+9!, C+10, C+15, C+16, PSQ+5!
^TMP($J	A+5, A+6, PSQ+5!, DOSE+6, DOSE+14!, NDF+13, NDF+17, NDF+21, NDF+25!
^VA(200 - [#200]	PSQ+4

Name	Line Occurrences
$$GETCLS	PS1+7
$$RELTIME	B+12, B+28
$$STOP	B+9
$$TOMIN	RELTIME+3
DOSE	B+5, B+18
NDF	B+35, PSQ+1

Name	Field # of Occurrence
^(	C+15, C+16
^(1	C+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BEG	STOP~, STOP+2, STOP+9
CLS	PS1+5~, PS1+7*, PS1+12, PS1+25, PS1+28, PS1+29, PS1+30, A+9, A+10, B+32 , C+1, C+28
CNT	PS1+5~, B+4, B+5, B+7, B+10, B+11, B+12, B+17, B+19, B+20 , B+21, B+22, B+23, B+25, B+26, B+28, B+29, B+35
CONJ	B+2~, B+8, B+13, B+15~, B+16, DOSE+1~, DOSE+10*, DOSE+11
CONJ(	B+21, B+29
D	DOSE+12~, DOSE+13, STOP+1~, STOP+2, STOP+4, STOP+5, STOP+6*, STOP+9
DA	PS1+5~, B+17, B+18, B+23, B+24, B+30, B+32, B+35
DD	B+15~, B+30, B+34, B+35*
DD(	B+30*, B+34, B+35
DD(0	B+34
>> DFN	PS1+8, PS1+9, PS1+10, PS1+11, PS1+28, B+32, C+9, C+29, C+31
DRUG	PS1+5~, A+8, B+30, B+34, PSQ+1, NDF~, NDF+3*, NDF+4, NDF+5, NDF+6 , NDF+13, NDF+17, NDF+21
DUR	B+2~, B+8, B+9, B+12, B+13, B+16, DOSE+1~, DOSE+9*, DOSE+11, RELTIME~ , RELTIME+3, TOMIN~, TOMIN+2, TOMIN+4
DUR(	B+22, B+28
FAC	PS1+5~, PS1+16*, PS1+19
FILL	C+8~
FILL(	C+14, C+15, C+16*, C+17
H	STOP+1~, STOP+2, STOP+7, STOP+9
I	C+14, C+15, C+16, C+17, C+18, C+19, C+20, C+21, C+22, C+23 , C+24, DOSE+12~, NDF+2~
ID	PS1~, PS1+1*, PS1+2, PS1+8, PS1+9, PS1+10, PS1+11, PS1+13, PS1+27, A+1 , A+7, B+1, B+14, B+17, GETCLS+1, GETCLS+4
LEN	NDF+2~
LOC	PS1+5~, PS1+16*, PS1+17, PS1+18, PS1+26
M	STOP+1~, STOP+2, STOP+8, STOP+9
MED	PS1+5~, C+31
MED("IMO"	PS1+26*
MED("comment"	PS1+31*
MED("dosages"	B+5, B+7, B+10, B+11, B+12, B+19, B+20, B+21, B+22, B+23 , B+25, B+26, B+29*
MED("fills"	C+19, C+20, C+21, C+22, C+23, C+24
MED("lastFilled"	C+13*
MED("localId"	PS1+12*
MED("medStatus"	PS1+24*
MED("medStatusName"	PS1+23*, PS1+24
MED("medType"	PS1+29*
MED("name"	A+3*, PSQ+2, NDF+11
MED("orders"	PS1+9, PS1+10, PS1+11, PS1+14, PS1+15, PS1+17, PS1+18, C+2, C+3, C+4 , C+5, C+10, C+11, C+12, C+13, C+26, PSQ+4*
MED("overallStart"	PS1+20*
MED("overallStop"	PS1+21, C+27, C+30*
MED("parent"	PS1+27*
MED("patientInstruction"	C+6*
MED("productFormName"	A+5*
MED("products"	NDF+8, NDF+9, NDF+10, NDF+11, NDF+14, NDF+15, NDF+18, NDF+19, NDF+22, NDF+23
MED("qualifiedName"	PSQ+2*
MED("sig"	A+9, A+10
MED("stopped"	PS1+21, B+33
MED("supply"	A+6*
MED("type"	PS1+30*
MED("uid"	PS1+8*
MED("vaStatus"	PS1+22*
MED("vaType"	PS1+29*
MIN	B+2~, B+3, B+7, B+12, B+13, B+15~, B+16, B+20, B+28, B+29 , RELTIME~, RELTIME+5
MW	C+8~, C+18*, C+21
N	DOSE~, DOSE+1*, DOSE+2, DOSE+5, DOSE+7, DOSE+8, DOSE+9, DOSE+10, DOSE+12
OI	PS1+5~, A+1*, A+2, A+4, A+5, A+6
ORD	NDF~, NDF+9
ORDUZ	PS1+4~
ORL	PS1+4~, PS1+16
ORNP	PS1+4~, PS1+15
ORODT	PS1+4~, PS1+14
ORPCL	PS1+4~
ORPK	PS1+1~, PS1+2, PS1+6, PS1+12, PS1+28, PS1+29, PS1+30, B+32, C+1, C+7 , C+9, C+10, C+15, C+16, C+27, C+29, C+31
ORPV	PS1+4~
ORSTOP	PS1+4~, PS1+21, B+3, B+27*, B+33
ORSTRT	PS1+4~, PS1+20, B+3
ORSTS	PS1+4~, PS1+22, PS1+23
ORTO	PS1+4~
ORTX	PS1+4~
ORUPCHUK	PS1+4~
ORUPCHUK(	PS1+13
ORVP	PS1+4~
PKGIEN	GETCLS+1~*, GETCLS+2, GETCLS+3
REL	C+8~, C+18*, C+20
RESULT	TOMIN+1~, TOMIN+5*, TOMIN+6
RFD	C+8~, C+17*, C+19
RX0	C+8~, C+10*, C+11, C+12, C+13, C+14, C+25
RX1	C+8~, C+10*, C+14
START	B+2~, B+3, B+9, B+10, B+12, B+13, RELTIME~, RELTIME+2
STOP	B+2~, B+3, B+9, B+11, B+12, B+13, RELTIME~, RELTIME+2
STR	NDF+2~, NDF+5*, NDF+10
TIME	TOMIN+1~, TOMIN+4*, TOMIN+5
TYPE	PS1+1~, PS1+2*
U	PS1+15, PS1+18, PS1+22, PS1+26, PS1+27, A+2, A+4, A+5, A+6, B+24 , B+25, B+26, B+27, B+28, C+10, C+11, C+12, C+13, C+14, C+16 , C+18, C+22, C+23, C+24, C+25, C+27, PSQ+3, PSQ+4, NDF+15, NDF+19 , NDF+22, NDF+23, GETCLS+2, GETCLS+3
UNIT	TOMIN+1~, TOMIN+2*, TOMIN+3, TOMIN+5
UNT	STOP+1~, STOP+2, STOP+3, STOP+4, STOP+5, STOP+6, STOP+7, STOP+8
VPI	NDF~, NDF+6*, NDF+8, NDF+9, NDF+10, NDF+11, NDF+14, NDF+15, NDF+18, NDF+19 , NDF+22, NDF+23
VPR	C+8~
VPRESP	PS1+5~, A+7, B+18!
VPRESP("ADMIN"	DOSE+8
VPRESP("COMMENT"	PS1+31, A+10
VPRESP("CONJ"	B+16, DOSE+10
VPRESP("DAYS"	B+16, DOSE+9, DOSE+12
VPRESP("DOSE"	DOSE+2
VPRESP("DRUG"	A+8, B+30
VPRESP("INSTR"	A+10, B+4
VPRESP("PI"	C+6
VPRESP("PICKUP"	C+4
VPRESP("QTY"	C+2, C+11
VPRESP("REFILLS"	C+5
VPRESP("ROUTE"	DOSE+5
VPRESP("SCHEDULE"	DOSE+7
VPRESP("SIG"	A+9, A+10
VPRESP("SUPPLY"	C+3, C+12, RELTIME+4
VPRX	NDF+2~
VPRX(50	NDF+5
VPRY	B+2~, B+5!, B+15~, B+18!, B+19
VPRY("complexConjunction"	B+8
VPRY("complexDuration"	B+8
VUID	NDF+2~
X	PS1+5~, PS1+6, PS1+7, PS1+10, PS1+11, PS1+13, PS1+27, PS1+29, PS1+31, A+2 , A+3, B+12, B+13, B+24, B+25, B+26, B+27, B+28, B+29, C+15 , C+16, C+17, C+18, C+22, C+23, C+24, C+25, C+26, C+27, C+29* , C+30, PSQ+3, PSQ+4, DOSE+1~, DOSE+2, DOSE+3, DOSE+4, DOSE+5, DOSE+6, DOSE+7 , DOSE+8, DOSE+9, DOSE+10, STOP~, STOP+2, STOP+4, STOP+5, STOP+6, STOP+7, STOP+8 , NDF+2~, NDF+11, NDF+13, NDF+14, NDF+15, NDF+17, NDF+18, NDF+19, NDF+21, NDF+22 , NDF+23
Y	DOSE~, DOSE+1!, STOP+1~, STOP+2, STOP+9, STOP+10, RELTIME+1~, RELTIME+2, RELTIME+3, RELTIME+4 , RELTIME+5*, RELTIME+6
Y("adminTimes"	DOSE+8*
Y("complexConjunction"	DOSE+10*
Y("complexDuration"	DOSE+9, DOSE+13
Y("dose"	DOSE+3*
Y("routeName"	DOSE+6*
Y("scheduleName"	DOSE+7*
Y("units"	DOSE+4*

Customize PDF page

Package: Virtual Patient Record

Routine: VPRDJ05

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: