VPRDPXSK ;SLC/MKB -- PCE V Skin Tests ;8/2/11 15:29
Source file <VPRDPXSK.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,BEG,END,MAX,IFN) | ; -- find a patient's skin tests
|
|
| SORT(DFN,START,STOP) | ; -- build ^TMP("VPRPX",$J,9999999-DATE,DA)=ITM^DATE in range
; from ^PXRMINDX(9000010.12,"PI",DFN,ITM,DATE,DA) |
|
| EN1(IEN,PCE) | ; -- return a skin test 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 |
|---|---|
| ^AUPNVSK - [#9000010.12] | EXTERNAL^DILFD |
