ORMBLDVB ;SLC/MKB - Build outgoing Blood Bank ORM msgs ;2/11/08 11:04
Source file <ORMBLDVB.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 4 | $$GETAPP^HLCS2 $$HLNAME^HLFNC INIT^HLFNC2 (DIRECT,GENERATE)^HLMA |
VA FileMan | 3 | ^%DT ^DIE $$GET1^DIQ |
MailMan | 2 | XMZ^XMA2 EN1^XMD |
Registration | 2 | IN5^VADPT $$SITE^VASITE |
Kernel | 1 | ($$FMTHL7,$$NOW)^XLFDT |
Master Patient Index VistA | 1 | $$GETICN^MPIF001 |
Order Entry Results Reporting | 1 | ACK^ORMVBEC |
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 |
---|---|---|
Order Entry Results Reporting | 2 | ORCSEND2 ORMBLD |
Name | Comments | DBIA/ICR reference |
---|---|---|
HL7DATE(DATE) | ; -- FM -> HL7 format
|
|
NW(ORIFN) | ; -- Send new VBECS orders [from ORCSEND2]
; Uses ORNOW if defined |
|
GETVALS(IFN) | ; -- Return ORVAL(ID)=value for child order IFN
|
|
RESULTS(ORDER) | ; -- Send PR messages with Lab results [from EN]
; where ORDER = parent# |
|
CA(ORDER,REASON) | ; -- Cancel VBEC orders (ORDER=child)
; [from DC^ORCSEND/MSG^ORMBLD - Uses ORNOW if defined] |
|
SNDERR(MSG) | ; -- Send Error message to VBECS Mail Group
; Input - MSG = Error message string |
|
PID(DFN) | ; -- PID segment
|
|
PV1() | ; -- PV1 segment (expects OR0)
|
|
ORC(CODE,FILLER,REASON) | ; -- ORC segment (expects OR0, OR3, ORDT)
|
|
OBR(FILLER) | ; -- OBR segment
|
|
USID(IFN) | ; -- Return USID for order IFN
|
|
NTE() | ; -- NTE segment
|
|
DG1(DFN) | ; -- DG1 segment
|
|
QT() | ; -- Build and return Quantity/Timing field
|
|
DIV() | ; -- Return Institution file #4 ptr for LOC
|
|
ZDIV(LOC) | ; -- Return Institution file #4 ptr for LOC
|
|
TYPE(X) | ; -- Expands collection type code into text
|
Name | Field # of Occurrence |
---|---|
^%DT | QT+4 |
^DIE | SNDERR+8 |
$$GET1^DIQ | PV1+5 |
$$GETAPP^HLCS2 | SNDERR+6 |
$$HLNAME^HLFNC | PID+4, PV1+8, ORC+4 |
INIT^HLFNC2 | NW+4, CA+7 |
DIRECT^HLMA | NW+13, RESULTS+13, CA+11 |
GENERATE^HLMA | NW+14, RESULTS+14, CA+14 |
$$GETICN^MPIF001 | PID+3 |
ACK^ORMVBEC | NW+16, CA+15 |
IN5^VADPT | DG1+2 |
$$SITE^VASITE | ZDIV+2 |
$$FMTHL7^XLFDT | HL7DATE+1 |
$$NOW^XLFDT | NW+5, CA+3 |
XMZ^XMA2 | SNDERR+7 |
EN1^XMD | SNDERR+9 |
FileNo | Call Tags |
---|---|
^DIC(45.7 - [#45.7] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | DIV+2, ZDIV+3 |
^DPT - [#2] | PID+2, PV1+4, PV1+6 |
^LAB(60 - [#60] | RESULTS+7 |
^OR(100 - [#100] | NW+3, GETVALS+2, RESULTS+3, RESULTS+4, RESULTS+5, CA+5, CA+13*, USID+2 |
^ORD(100.03 - [#100.03] | CA+6 |
^ORD(101.42 - [#101.42] | QT+6 |
^ORD(101.43 - [#101.43] | USID+3 |
^SC - [#44] | PV1+3, ZDIV+1 |
^VA(200 - [#200] | PV1+7, ORC+2, ORC+4 |
Name | Line Occurrences |
---|---|
$$DG1 | NW+11 |
$$DIV | ORC+6 |
$$HL7DATE | NW+6, RESULTS+11, CA+4, PID+4, QT+5 |
$$NTE | NW+10 |
$$OBR | NW+9, CA+10 |
$$ORC | NW+9, CA+10 |
$$PID | NW+8, RESULTS+8, CA+9 |
$$PV1 | NW+8, RESULTS+8, CA+9 |
$$QT | OBR+7 |
$$TYPE | OBR+4 |
$$USID | OBR+2 |
GETVALS | NW+4, CA+7 |
SNDERR | NW+14, RESULTS+14, CA+14 |
Name | Field # of Occurrence |
---|---|
^( | GETVALS+2 |
^(0 | CA+13* |
^(3 | NW+3, CA+5 |
^(4 | CA+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | QT+1~, QT+4* |
ATTD | PV1+1~, PV1+6*, PV1+7, PV1+8*, PV1+9 |
CODE | ORC~, ORC+6 |
>> DA | SNDERR+8* |
DAD | ORC+1~, ORC+5*, ORC+6 |
DATE | HL7DATE~, HL7DATE+1 |
DFN | PID~, PID+1*, PID+2, PID+3, PID+5, PV1+1~, PV1+2*, PV1+4, PV1+6, DG1~ , DG1+2* |
>> DIE | SNDERR+8* |
DOB | PID+1~, PID+4*, PID+5 |
>> DR | SNDERR+8* |
DT | ZDIV+2 |
DUZ(2 | DIV+1, ZDIV+3 |
FILLER | ORC~, ORC+6, OBR~, OBR+7 |
HL | NW+2~, NW+4, CA+2~, CA+7 |
HLA | NW+2~, RESULTS+2~, RESULTS+7!, CA+2~ |
HLA("HLS" | NW+8*, NW+9*, NW+10*, NW+11*, RESULTS+8*, RESULTS+9*, RESULTS+10*, RESULTS+11*, CA+9*, CA+10* |
HLMTIEN | NW+2~, NW+16, CA+2~, CA+15 |
ID | GETVALS+1~*, GETVALS+2* |
IFN | GETVALS~, GETVALS+2, USID~, USID+2 |
ITM | GETVALS+1~, GETVALS+2* |
LOC | PV1+1~, PV1+2*, PV1+3*, PV1+9, ZDIV~, ZDIV+1 |
MOD | OBR+1~, OBR+2*, OBR+3*, OBR+7 |
MSG | SNDERR~, SNDERR+5 |
NAME | PID+1~, PID+4*, PID+5 |
NM | PV1+7~*, PV1+8, ORC+1~, ORC+4* |
OI | OBR+1~, OBR+2*, OBR+7, USID+1~, USID+2*, USID+3 |
OI0 | USID+1~, USID+3*, USID+4 |
OID | USID+1~, USID+3*, USID+5 |
OIX | USID+1~, USID+4*, USID+5 |
OR0 | NW+2~, NW+3*, NW+8, NW+11, RESULTS+3*, RESULTS+8, CA+2~, CA+5*, CA+9, PV1+2 , ORC+2 |
OR3 | NW+2~, NW+3*, CA+2~, CA+5*, ORC+5 |
ORDA | CA+2~, CA+4*, CA+13 |
ORDER | RESULTS~, RESULTS+3*, RESULTS+4, RESULTS+5, RESULTS+9, CA~, CA+4, CA+15 |
ORDT | NW+2~, NW+5*, NW+6*, CA+2~, CA+3*, CA+4*, ORC+6 |
OREMSG | SNDERR+2~ |
OREMSG(1 | SNDERR+3* |
OREMSG(2 | SNDERR+4* |
OREMSG(3 | SNDERR+5* |
ORI | NW+2~, NW+9*, NW+10*, NW+11*, RESULTS+2~, RESULTS+3*, RESULTS+4*, RESULTS+5, ORC+1~, ORC+4* , QT+1~, QT+3*, QT+4, QT+5 |
ORICN | PID+1~, PID+3*, PID+5 |
ORIFN | NW~, NW+3, NW+4, NW+16, CA+2~, CA+4*, CA+5, CA+7, CA+13, ORC+6 , OBR+2, OBR+7 |
>> ORLAB | OBR+7 |
>> ORNOW | NW+5, CA+3 |
OROK | NW+2~, NW+13, NW+14, RESULTS+2~, RESULTS+7!, RESULTS+13, RESULTS+14, CA+2~, CA+11, CA+12 , CA+13, CA+14 |
ORP | RESULTS+2~ |
ORPT0 | PID+1~, PID+2*, PID+4, PID+5 |
ORR | NW+2~, NW+6*, NW+9 |
ORTDT | RESULTS+2~, RESULTS+5*, RESULTS+11 |
ORTMP | RESULTS+2~ |
ORTST | RESULTS+2~, RESULTS+7*, RESULTS+10, RESULTS+11 |
ORVAL | NW+2~, GETVALS+1!, CA+2~ |
ORVAL( | GETVALS+2*, QT+4 |
ORVAL("COLLECT" | OBR+4 |
ORVAL("COMMENT" | NW+10, NTE+1 |
ORVAL("MISC" | QT+8 |
ORVAL("MODIFIER" | OBR+2 |
ORVAL("QTY" | QT+2 |
ORVAL("REASON" | NW+6 |
ORVAL("SPECSTS" | OBR+5 |
ORVAL("URGENCY" | QT+6 |
ORVAL("YN" | ORC+7 |
ORX | RESULTS+2~, RESULTS+5*, RESULTS+6, RESULTS+7, RESULTS+10, RESULTS+11 |
PHONE | ORC+1~, ORC+3*, ORC+6 |
PKGIFN | CA+2~, CA+5*, CA+10 |
PROV | ORC+1~, ORC+2*, ORC+6 |
RB | PV1+1~, PV1+3*, PV1+4*, PV1+9 |
REASON | CA~, CA+6*, CA+10, ORC~, ORC+6 |
SPCACT | OBR+1~, OBR+5*, OBR+6, OBR+7 |
SPCUID | OBR+1~, OBR+6*, OBR+7 |
SPEC | PV1+1~, PV1+2*, PV1+5*, PV1+9 |
TYPE | PV1+1~, PV1+2*, PV1+4, PV1+9, OBR+1~, OBR+4*, OBR+7 |
U | NW+8, NW+11, NW+14, RESULTS+5, RESULTS+7, RESULTS+8, RESULTS+10, RESULTS+11, RESULTS+14, CA+6 , CA+9, CA+12, CA+13, CA+14, PID+4, PID+5, PV1+2, PV1+3, PV1+4, PV1+7 , PV1+8, PV1+9, ORC+2, ORC+3, ORC+4, ORC+5, OBR+5, OBR+6, USID+3, USID+4 , USID+5, QT+4, QT+5, QT+6, QT+9, DIV+2, ZDIV+2, ZDIV+3 |
USR | ORC+1~, ORC+2*, ORC+6 |
VAERR | DG1+1~ |
VAIP | DG1+1~ |
VAIP(9 | DG1+3 |
X | OBR+1~, OBR+5*, OBR+6, QT+1~, QT+2*, QT+4*, QT+5*, QT+6*, DIV+1~*, DIV+2 , ZDIV+2*, ZDIV+3*, TYPE~, TYPE+1, TYPE+2, TYPE+3*, TYPE+4 |
X0 | ZDIV+1~*, ZDIV+2, ZDIV+3 |
X1 | QT+1~, QT+2*, QT+9 |
X13 | ORC+1~, ORC+2*, ORC+3 |
X4 | QT+1~, QT+3*, QT+9 |
X5 | QT+1~, QT+3*, QT+9 |
X6 | QT+1~, QT+6*, QT+9 |
X8 | QT+1~, QT+8*, QT+9 |
XMDUZ | SNDERR+2~, SNDERR+7* |
XMSUB | SNDERR+2~, SNDERR+7* |
XMTEXT | SNDERR+2~, SNDERR+7* |
XMY | SNDERR+2~ |
XMY("G." | SNDERR+6* |
XMZ | SNDERR+2~, SNDERR+8 |
Y | PID+1~, PID+5*, PID+6, PV1+1~, PV1+9*, PV1+10, ORC+1~, ORC+6*, ORC+8*, ORC+9 , OBR+1~, OBR+7*, OBR+8, USID+1~*, USID+5*, USID+6, NTE+1~*, NTE+2, DG1+1~, DG1+3* , DG1+4, QT+1~, QT+4, QT+5, QT+9*, QT+10, DIV+1~, DIV+2*, DIV+3, ZDIV+1~ , ZDIV+2*, ZDIV+3*, ZDIV+4 |
YN | ORC+1~, ORC+7*, ORC+8 |