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

Package: Virtual Patient Record

Routine: VPRDMDC


Information

VPRDMDC ;SLC/MKB,DP -- CLiO extract ;8/2/11 15:29

Source Information

Source file <VPRDMDC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 $$FMADD^XLFDT  $$LOW^XLFSTR  
VA FileMan 2 $$FIND1^DIC  ($$GET1,GETS)^DIQ  
Toolkit 1 $$GET^XPAR  
Virtual Patient Record 1 ($$ESC,$$FAC)^VPRD  

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

Package Total Caller Graph
Virtual Patient Record 2 VPRDJ0  VPRDJ03  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID) ; -- find patient's observations
EN1(GUID,CLIO) ; -- return an observation in CLIO("attribute")=value
XML(OBS) ; -- Return observation as XML in @VPR@(#)
LOOP() ; -- build sub-items string from NAMES and X
ADD(X) ; Add a line @VPR@(n)=X
QRYPT(VPRRET,VPRDFN,VPRFR,VPRTO,VPRSTAT) ; List of observations by pt, datetime, status
QRYOBS(VPRRET,VPRID) ; Return a single observation
QRYQUAL(VPRRET,VPRIEN) ; Returns the qualifiers for obs in VPRIEN
; We do NOT want to kill VPRRET here because it points at the parent node of the return
QRYCTX(VPRRET,VPRID) ; We need a terminology based context observation relationship here
QRYSET(VPRRET,VPRIEN) ; Return the Obs Set/View information
QRYTYPES(VPRRET) ; Return the terminology Term Types

External References

Name Field # of Occurrence
$$FIND1^DIC QRYOBS+3, QRYOBS+12, QRYCTX+2
$$GET1^DIQ QRYOBS+7, QRYOBS+8, QRYOBS+9, QRYOBS+10, QRYOBS+11, QRYOBS+13, QRYQUAL+4, QRYQUAL+5, QRYQUAL+6, QRYQUAL+7
, QRYQUAL+8, QRYCTX+3, QRYCTX+6, QRYCTX+7, QRYCTX+13, QRYCTX+14, QRYCTX+16, QRYCTX+22, QRYCTX+23, QRYCTX+24
, QRYCTX+25, QRYSET+4, QRYSET+5, QRYSET+10, QRYSET+11, QRYSET+12, QRYSET+13, QRYSET+14
GETS^DIQ QRYOBS+5
$$ESC^VPRD XML+5, XML+8, LOOP+2
$$FAC^VPRD EN1+19
$$FMADD^XLFDT QRYCTX+8, QRYCTX+9
$$LOW^XLFSTR EN1+15
$$GET^XPAR QRYSET+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MDC(704.101 - [#704.101] FIND1^DIC,  GET1^DIQ
^MDC(704.1122 - [#704.1122] GET1^DIQ
^MDC(704.116 - [#704.116] GET1^DIQ
^MDC(704.117 - [#704.117] FIND1^DIC,  GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MDC(704.102 - [#704.102] QRYTYPES+3, QRYTYPES+4, QRYTYPES+5, QRYTYPES+6
^MDC(704.1122 - [#704.1122] QRYSET+7, QRYSET+8, QRYSET+9
^MDC(704.1161 - [#704.1161] QRYSET+3
^MDC(704.117 - [#704.117] QRYPT+4, QRYPT+5, QRYPT+6, QRYCTX+11, QRYCTX+12
^MDC(704.118 - [#704.118] QRYQUAL+3

Label References

Name Line Occurrences
ADD XML+2, XML+5, XML+9, XML+10
EN1 EN+4, EN+13
QRYCTX QRYOBS+15
QRYOBS EN1+4
QRYPT EN+10
QRYQUAL QRYOBS+14, QRYCTX+26
QRYSET QRYOBS+16
QRYTYPES EN1+13
XML EN+4, EN+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ATT XML+1~, XML+3*, XML+4, XML+5, XML+7
BEG EN~, EN+8*, EN+10
CLIO EN1~, EN1+1!
CLIO( EN1+16*
CLIO("comment" EN1+21*
CLIO("entered" EN1+10*
CLIO("facility" EN1+19*
CLIO("id" EN1+6*
CLIO("location" EN1+20*
CLIO("name" EN1+7*
CLIO("observed" EN1+11*
CLIO("range" EN1+17*
CLIO("status" EN1+18*
CLIO("units" EN1+9*
CLIO("value" EN1+8*
CLIO("vuid" EN1+6*
DFN EN~, EN+7*, EN+10
END EN~, EN+8*, EN+10
GUID EN1~, EN1+2*, EN1+4, EN1+6
I EN1+1~, EN1+14*, EN1+15, XML+1~
ID EN~, EN+4, EN+12*, EN+13
J XML+1~
LOC EN1+1~, EN1+19*, EN1+20
MAX EN~, EN+8*, EN+11
NAMES XML+1~, LOOP+2
OBS XML~
OBS( XML+3, XML+4
P XML+1~, XML+8*, LOOP+1~, LOOP+2*
STR LOOP+1~*, LOOP+2*, LOOP+3
TAG XML+1~, XML+8*, LOOP+1~, LOOP+2*
U EN1+16, EN1+20, XML+8, LOOP+2, QRYPT+6, QRYSET+9, QRYTYPES+4, QRYTYPES+5, QRYTYPES+6
>> VPR ADD+2
VPRC EN1+1~, EN1+4
VPRC( EN1+14, EN1+16
VPRC("COMMENT" EN1+21
VPRC("ENTERED_DATE_TIME" EN1+10
VPRC("HOSPITAL_LOCATION_ID" EN1+19, EN1+20
VPRC("OBSERVED_DATE_TIME" EN1+11
VPRC("PARENT_ID" EN1+5
VPRC("RANGE" EN1+17
VPRC("STATUS" EN1+18
VPRC("SVALUE" EN1+8
VPRC("TERM_ID" EN1+6, EN1+7
VPRC("UNIT_ID" EN1+9
VPRCLIO EN+1~
VPRCLIO( EN+11, EN+12
VPRCNT EN+1~, EN+8*, EN+11, EN+14*, QRYCTX+1~, QRYCTX+19*, QRYCTX+20, QRYCTX+21, QRYCTX+22, QRYCTX+23
, QRYCTX+24, QRYCTX+25, QRYCTX+26
VPRCTX QRYCTX+1~, QRYCTX+3*, QRYCTX+5
VPRDFN QRYPT~, QRYPT+4, QRYPT+5, QRYCTX+1~, QRYCTX+6*, QRYCTX+11, QRYCTX+12, QRYSET+1~, QRYSET+2*, QRYSET+7
, QRYSET+8
VPRDT QRYPT+2~, QRYPT+4*, QRYPT+5, QRYCTX+1~, QRYCTX+7*, QRYCTX+8, QRYCTX+9, QRYCTX+11*, QRYCTX+12, QRYSET+1~
, QRYSET+5*, QRYSET+7*, QRYSET+8
VPRFR QRYPT~, QRYPT+4, QRYCTX+1~, QRYCTX+8*, QRYCTX+11
>> VPRI ADD+1*, ADD+2
VPRID QRYOBS~, QRYOBS+3, QRYOBS+4, QRYOBS+15, QRYCTX~, QRYCTX+2, QRYCTX+15
VPRIEN QRYPT+2~, QRYPT+5*, QRYPT+6, QRYOBS+2~, QRYOBS+3*, QRYOBS+4, QRYOBS+5, QRYOBS+6, QRYOBS+7, QRYOBS+8
, QRYOBS+9, QRYOBS+10, QRYOBS+11, QRYOBS+14, QRYOBS+16, QRYQUAL~, QRYQUAL+3, QRYCTX+1~, QRYCTX+2*, QRYCTX+3
, QRYCTX+6, QRYCTX+7, QRYSET~, QRYSET+3
VPRITM EN+1~, EN+4, EN+12!, EN+13, EN+14
VPRN EN+1~, EN+11*, EN+12
VPROBS QRYCTX+1~, QRYCTX+12*, QRYCTX+13, QRYCTX+14, QRYCTX+16, QRYCTX+22, QRYCTX+23, QRYCTX+24, QRYCTX+25, QRYCTX+26
VPRPG QRYSET+1~, QRYSET+7, QRYSET+8*, QRYSET+9*, QRYSET+10, QRYSET+11, QRYSET+12, QRYSET+13, QRYSET+14
VPRQUAL QRYQUAL+2~, QRYQUAL+4*, QRYQUAL+5, QRYQUAL+6, QRYQUAL+7, QRYQUAL+8
VPRRET QRYPT~, QRYPT+1, QRYPT+6, QRYOBS~, QRYOBS+1, QRYOBS+4, QRYOBS+6, QRYOBS+7, QRYOBS+8, QRYOBS+9
, QRYOBS+10, QRYOBS+12, QRYOBS+13, QRYOBS+14, QRYOBS+15, QRYOBS+16, QRYQUAL~, QRYQUAL+5, QRYQUAL+6, QRYQUAL+7
, QRYQUAL+8, QRYCTX~, QRYCTX+19, QRYCTX+20, QRYCTX+21, QRYCTX+22, QRYCTX+23, QRYCTX+24, QRYCTX+25, QRYCTX+26
, QRYSET~, QRYSET+2, QRYSET+4, QRYSET+10, QRYSET+11, QRYSET+12, QRYSET+13, QRYSET+15, QRYTYPES~, QRYTYPES+1
, QRYTYPES+4, QRYTYPES+5, QRYTYPES+6
VPRSET QRYSET+1~, QRYSET+3*, QRYSET+4, QRYSET+5, QRYSET+9
VPRSTAT QRYPT~, QRYPT+3*, QRYPT+4, QRYPT+5, QRYPT+6
VPRT EN1+1~
VPRT( EN1+14, EN1+15
VPRTERM QRYCTX+1~, QRYCTX+16*, QRYCTX+18
VPRTMP QRYOBS+2~, QRYOBS+6!, QRYOBS+12*, QRYOBS+13
VPRTMP( QRYOBS+6
VPRTO QRYPT~, QRYPT+4, QRYCTX+1~, QRYCTX+9*, QRYCTX+11
>> VPRTOTL XML+2*
VPRVW QRYSET+1~, QRYSET+14*
VPRXID QRYCTX+1~, QRYCTX+14*, QRYCTX+15, QRYCTX+20, QRYCTX+21
X EN+1~, EN1+1~, EN1+14*, EN1+16, XML+1~, XML+4*, XML+5, XML+6, XML+8, LOOP+2
, ADD~, ADD+2, QRYSET+1~, QRYSET+14*, QRYSET+15, QRYTYPES+2~, QRYTYPES+3*, QRYTYPES+4, QRYTYPES+5, QRYTYPES+6
Y EN1+1~, EN1+15*, EN1+16, XML+1~, XML+4*, XML+5*, XML+7*, XML+8*, XML+9*, QRYQUAL+3*
, QRYQUAL+4, QRYQUAL+5, QRYQUAL+6, QRYQUAL+7, QRYQUAL+8
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