VPRDMDC ;SLC/MKB,DP -- CLiO extract ;8/2/11 15:29
Source file <VPRDMDC.m>
| 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
 | 
| 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 |