VPRDPXED ;SLC/MKB -- PCE V Patient Education ;8/2/11 15:29
Source file <VPRDPXED.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(DFN,BEG,END,MAX,IFN) | ; -- find a patient's education
|
|
SORT(DFN,START,STOP) | ; -- build ^TMP("VPRPX",$J,9999999-DATE,DA)=ITM^DATE in range
; from ^PXRMINDX(9000010.16,"PI",DFN,ITM,DATE,DA) |
|
EN1(IEN,PCE) | ; -- return education in PCE("attribute")=value
; from EN: expects ^TMP("VPRPX",$J,VPRIDT,IEN)=ITM^DATE |
|
XML(PCE) | ; -- Return patient data as XML in @VPR@(n)
; as <element code='123' displayName='ABC' /> |
|
ADD(X) | ; Add a line @VPR@(n)=X
|
FileNo | Call Tags |
---|---|
^AUPNVPED - [#9000010.16] | EXTERNAL^DILFD |