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 |  Local Variables |  All
Print Page as PDF
Routine: VPRDGMPL

Package: Virtual Patient Record

Routine: VPRDGMPL


Information

VPRDGMPL ;SLC/MKB -- Problem extract ;8/2/11 15:29

Source Information

Source file <VPRDGMPL.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 $$FMADD^XLFDT  $$LOW^XLFSTR  ($$NS,$$STA)^XUAF4  
VA FileMan 2 ^%DT  $$GET1^DIQ  
Problem List 1 (DETAIL,LIST)^GMPLUTL2  
Scheduling 1 $$OUTPTPR^SDUTL3  
Virtual Patient Record 1 ($$ESC,$$FAC)^VPRD  

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

Package Total Caller Graph
Virtual Patient Record 1 VPRDJ02  

Entry Points

Name Comments DBIA/ICR reference
VA200(X) ; -- Return ien of New Person X
EN1(ID,PROB) ; -- return a problem in PROB("attribute")=value
DATE(X) ; -- Return internal form of date X
EN(DFN,BEG,END,MAX,IFN) ; -- find patient's problems
XML(PROB) ; -- Return patient problem as XML in @VPR@(I)
ADD(X) ; Add a line @VPR@(n)=X
EXP(X) ; -- Return code for exposure name X
WV(PROB,UPD) ; -- return a pregnancy log entry in PROB("attribute")=value
CMT ; comments

External References

Name Field # of Occurrence
^%DT DATE+2
$$GET1^DIQ EN1+11, EN1+12, EN1+13, EN1+14, EN1+24
DETAIL^GMPLUTL2 EN1+3
LIST^GMPLUTL2 EN+11
$$OUTPTPR^SDUTL3 WV+16
$$ESC^VPRD XML+13, XML+14, XML+18, XML+21
$$FAC^VPRD EN1+29, WV+17
$$FMADD^XLFDT WV+5
$$LOW^XLFSTR EN1+6
$$NS^XUAF4 EN1+28
$$STA^XUAF4 EN1+28

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPROB - [#9000011] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN+17
^VA(200 - [#200] VA200+1
^WV(790.05 - [#790.05] WV+2, WV+3

Label References

Name Line Occurrences
$$DATE CMT+4
$$EXP EN1+23
ADD XML+2, XML+3, XML+5, XML+6, XML+7, XML+9, XML+15, XML+16, XML+22, XML+23
EN1 EN+5, EN+15
WV EN+4, EN+17
XML EN+4, EN+5, EN+15, EN+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATE+1~, DATE+2*
ATT XML+1~, XML+3*, XML+4, XML+6, XML+8, XML+10, XML+17, XML+18, XML+20
BEG EN~, EN+9*, EN+13
DFN EN~, EN+8*, EN+11, EN+17, WV+2, WV+16
DT WV+5
END EN~, EN+9*, EN+13
>> FILTER("status" EN+10
I EN1+1~, EN1+6*, EN1+21*, EN1+22, EN1+23, CMT+2*, CMT+3, CMT+4, WV+1~, WV+2*
, WV+3, XML+1~, XML+6*, XML+10*, XML+11
ID EN1~, EN1+2*, EN1+3, EN1+4, EN1+11, EN1+12, EN1+13, EN1+14, EN1+24
IFN EN~, EN+4, EN+5
J EN1+1~
MAX EN~, EN+9*, EN+12
P XML+1~, XML+21*
PROB EN1~, EN1+1!, WV~, WV+1!, XML~
PROB( EN1+6*, XML+3, XML+6, XML+10, XML+17
PROB("acuity" EN1+9*
PROB("codingSystem" EN1+5*, WV+11*
PROB("comment" CMT+4*
PROB("entered" EN1+12*, WV+8*
PROB("exposure" EN1+23*
PROB("facility" EN1+28*, EN1+29*, WV+17*
PROB("history" EN1+8*
PROB("icd" EN1+5*, WV+9*
PROB("icdd" WV+10*
PROB("id" EN1+4*, WV+8*
PROB("location" EN1+26*
PROB("name" EN1+4*, WV+9*
PROB("onset" EN1+13*
PROB("provider" EN1+24*, WV+16*
PROB("removed" EN1+16*, EN1+17*, EN1+18*
PROB("resolved" EN1+14*, WV+15*
PROB("sc" EN1+20*
PROB("sctc" WV+12*
PROB("sctt" WV+12*
PROB("service" EN1+25*
PROB("status" EN1+7*, WV+14*
PROB("unverified" EN1+16*, EN1+17*, EN1+18*
PROB("updated" EN1+11*
TAG XML+1~, XML+21*
U EN+13, EN+17, EN1+7, EN1+8, EN1+9, EN1+24, EN1+28, CMT+4, WV+5, WV+15
, XML+12, XML+13, XML+14, XML+21
UPD WV~, WV+6
>> VPR ADD+2
VPRCNT EN+1~, EN+9*, EN+12, EN+16*
>> VPRI ADD+1*, ADD+2
VPRITM EN+1~, EN+4, EN+5, EN+14!, EN+15, EN+17
VPRL EN1+1~, EN1+3
VPRL( EN1+6
VPRL("CLINIC" EN1+26
VPRL("COMMENT" CMT+1, CMT+2, CMT+3
VPRL("CONDITION" EN1+15
VPRL("CSYS" EN1+5
VPRL("DIAGNOSIS" EN1+5
VPRL("EXPOSURE" EN1+20, EN1+21, EN1+22
VPRL("FACILITY" EN1+27
VPRL("HISTORY" EN1+8
VPRL("NARRATIVE" EN1+4
VPRL("PRIORITY" EN1+9
VPRL("PROVIDER" EN1+24
VPRL("SC" EN1+19
VPRL("SERVICE" EN1+25
VPRL("STATUS" EN1+7
VPRN EN+1~, EN+12*, EN+13, EN+14
VPRPROB EN+1~, EN+11
VPRPROB( EN+12, EN+13, EN+14
VPRSTS EN+1~, EN+10*, EN+11
>> VPRTOTL XML+2*
X EN+1~, EN+13*, EN+14*, EN+15, EN1+1~, EN1+6*, EN1+7*, EN1+8*, EN1+9*, EN1+11*
, EN1+12*, EN1+13*, EN1+14*, EN1+15*, EN1+16, EN1+17, EN1+18, EN1+19*, EN1+20, EN1+22*
, EN1+23, EN1+24*, EN1+25*, EN1+26*, EN1+27*, EN1+28, EN1+29, CMT+3*, CMT+4, DATE~
, DATE+2, VA200~, VA200+1, EXP~, EXP+1*, EXP+2, EXP+3, EXP+4, EXP+5, EXP+6
, EXP+7, EXP+8, XML+1~, XML+6*, XML+10*, XML+12, XML+13, XML+14, XML+17*, XML+18
, XML+19, XML+21, ADD~, ADD+2
X0 WV+1~, WV+3*, WV+5, WV+8, WV+15
Y WV+1~, WV+3*, WV+5*, WV+6, WV+14, DATE+1~, DATE+2*, DATE+3, VA200+1~*, VA200+2
, EXP+1~*, EXP+2*, EXP+3*, EXP+4*, EXP+5*, EXP+6*, EXP+7*, EXP+8*, EXP+9, XML+1~
, XML+3, XML+4*, XML+5*, XML+6*, XML+8*, XML+11*, XML+12*, XML+13*, XML+14*, XML+15*
, XML+17*, XML+18*, XML+19*, XML+20*, XML+21*, XML+22*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All