VPRSDAOB ;SLC/MKB/CMF -- SDA Observation utilities ;7/28/23 14:11
Source file <VPRSDAOB.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| VA FileMan | 2 | ^DDE ITEM |
| Kernel | 1 | ^ORD(101 |
| Virtual Patient Record | 1 | VPR OBSERVATION UPDATE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VITALS | ; -- GMR Vital Measurements query [main]
; Expects DSTRT, DSTOP, DMAX from DDEGET and returns DLIST(#)=ien |
|
| VIT1(IEN) | ; -- get info for one Vital measurement
; Accepts IEN = #120.5 ien or #704.117 GUID ; Returns VPRV array, VPRGMV=VPRV(0), VPRANGE, VPRTYPE to entity |
|
| VITQUAL | ; -- build DLIST(#)=Qualifiers [code^name]
|
|
| VITCODE(IEN,SFN) | ; -- return [first] code for vital type
; SubFileNumber = 120.518 for Vital Type ; 120.522 for Vital Qualifier |
|
| MDC(OBS) | ; -- MDC OBSERVATION UPDATE protocol listener
|
|
| NOOBS | ; -- called if OBS array was not created by MDCPROTD
; MDC event called from ASTATUS index, so expects FM variables (DA, X1, X2) |
|
| ISGUID(MDX) | ; Returns true if MDX is in the format of a GUID. Copied from MDCLIO1
|
|
| MAP | ;Contains the CLiO terms paired with a vital sign - vital;term_guid. Copied from MDCLIO1
|
| FileNo | Call Tags |
|---|---|
| ^MDC(704.117 - [#704.117] | GET1^DIQ, GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXRMINDX(120.5 | VITALS+11 |
| ^TMP("VPRGMV" | VITALS+13*, VIT1+9 |
| ^TMP("VPROBS" | NOOBS+7! |
| ^UTILITY($J | VITALS+6, VITALS+7, VITALS+8, VITALS+10, VITALS+13, VITALS+14! |
| Name | Line Occurrences |
|---|---|
| $$ISGUID | VIT1+6 |
| NOOBS | MDC+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | VIT1+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | MDC+1~, MDC+8*, MDC+9 |
| >> DA | NOOBS+3 |
| >> DDEOUT | VIT1+3*, VIT1+5*, VIT1+6* |
| DFN | VITALS+11, VIT1+11~, VIT1+12*, MDC+1~, MDC+6*, MDC+9 |
| >> DLIST( | VITALS+12*, VITQUAL+3* |
| >> DMAX | VITALS+4, VITALS+6 |
| >> DSTOP | VITALS+4 |
| >> DSTRT | VITALS+4 |
| GMRVSTR | VITALS+2~, VITALS+3* |
| GMRVSTR(0 | VITALS+4* |
| GUID | VITALS+2~, VITALS+11*, VITALS+12, VITALS+13 |
| I | VITQUAL+1~, VITQUAL+3* |
| ID | VITALS+2~, VITALS+8*, VITALS+10, VITALS+11, VITALS+13, MDC+1~, MDC+7*, MDC+9 |
| IEN | VIT1~, VIT1+3*, VIT1+4, VIT1+9, VITCODE~, VITCODE+4, NOOBS+2~, NOOBS+3*, NOOBS+4, NOOBS+7 , NOOBS+9 |
| IENS | VITCODE+3~, VITCODE+5*, VITCODE+6 |
| MDX | ISGUID~, ISGUID+2, ISGUID+3, ISGUID+5 |
| OBS | MDC~, MDC+2 |
| QUALS | VITQUAL+1~, VITQUAL+2*, VITQUAL+3 |
| SFN | VITCODE~, VITCODE+4, VITCODE+5, VITCODE+6 |
| TYP | VITALS+2~, VITALS+10*, VITALS+11 |
| U | VITALS+4, VITALS+10, VIT1+6, VIT1+7, VIT1+9, VIT1+12, VIT1+14, VITQUAL+3, NOOBS+6 |
| >> VPRANGE | VIT1+15* |
| VPRBMI | VIT1+11~, VIT1+13, VIT1+14 |
| VPRBMI(1 | VIT1+12* |
| VPRBMI(2 | VIT1+12* |
| VPRC | VITCODE+3~ |
| VPRC( | VITCODE+5, VITCODE+6 |
| VPRERR | NOOBS+2~, NOOBS+5 |
| VPRERR("DIERR" | NOOBS+6 |
| >> VPRGMV | VIT1+5*, VIT1+6, VIT1+7, VIT1+9*, VIT1+12, VIT1+14* |
| VPRGUID | NOOBS+2~, NOOBS+9*, NOOBS+10 |
| VPRIDT | VITALS+2~, VITALS+6*, VITALS+7, VITALS+8, VITALS+10, VITALS+13 |
| VPRN | VITALS+2~, VITALS+5*, VITALS+6, VITALS+12* |
| VPROBS | MDC+1~, MDC+2*, MDC+3, NOOBS+7* |
| VPROBS("DOMAIN" | MDC+5, NOOBS+8*, NOOBS+10* |
| VPROBS("ERROR" | MDC+4, NOOBS+3*, NOOBS+6* |
| VPROBS("OBS_ID" | MDC+7 |
| VPROBS("PATIENT_ID" | MDC+6 |
| VPROBS("STATUS" | MDC+8 |
| VPRTYP | VITALS+2~, VITALS+7*, VITALS+8, VITALS+10, VITALS+13 |
| >> VPRTYPE | VIT1+7*, VIT1+8, VIT1+15 |
| >> VPRV | VIT1+4 |
| >> VPRV(0 | VIT1+5 |
| >> VPRV(5 | VITQUAL+2 |
| X | VITQUAL+1~, VITQUAL+3*, ISGUID+1~, ISGUID+5*, ISGUID+6 |
| X0 | VITALS+2~, VITALS+10*, VITALS+11 |
| Y | VITCODE+3~, VITCODE+6*, VITCODE+7, NOOBS+2~, NOOBS+10*, ISGUID+1~, ISGUID+5* |
| Name | Field # of Occurrence |
|---|---|
| $T(MAP+Y | NOOBS+10 |
