MAGDHL7 ;WOIFO/PMK,MLH - Routine to copy HL7 data from HLSDATA to ^MAGDHL7 ;30 Mar 2017 9:33 AM
Source file <MAGDHL7.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 |
---|---|---|
Imaging | 2 | MAGD SEND ORM MAGD SEND ORU |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Entry point for HL7 1.6. Called from the MAGD SEND ORU/ORM protocols.
; Executed after the RA protocols setup the HL7 message segments. |
|
NEWMSG(DATE) | ; Add a stub for a new message
|
HL7 Protocol Name | Call Tags |
---|---|
MAGD SEND ORM | EN |
MAGD SEND ORU | EN |
Name | Line Occurrences |
---|---|
$$NEWMSG | EN+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
D0 | NEWMSG+1~, NEWMSG+4*, NEWMSG+5, NEWMSG+6, NEWMSG+8, NEWMSG+10 |
DA | EN+2~ |
DATE | NEWMSG~, NEWMSG+2*, NEWMSG+5, NEWMSG+6 |
DIC | EN+2~ |
DIE | EN+2~ |
DR | EN+2~ |
DT | EN+21 |
HDR | NEWMSG+1~, NEWMSG+7*, NEWMSG+8 |
>> HL("MTN" | EN+10 |
>> HL("RAN" | EN+10 |
>> HL("SAN" | EN+10 |
>> HLNEXT | EN+5 |
>> HLNODE | EN+6 |
>> HLNODE( | EN+7 |
>> HLQUIT | EN+3, EN+5 |
I | EN+2~, EN+5*, EN+6, EN+7 |
J | EN+2~, EN+6*, EN+7*, EN+20* |
K | EN+2~, EN+17*, EN+20 |
L | EN+2~, EN+17*, EN+20*, EN+21 |
MAGRAD | EN+2~, EN+4* |
MAGRAD( | EN+6*, EN+7*, EN+17, EN+20 |
MAGRAN | EN+2~, EN+10* |
MAGSAN | EN+2~, EN+10* |
MAGTYPE | EN+2~, EN+10*, EN+15 |
X | EN+2~, EN+22*, EN+23, EN+24*, EN+25, EN+26 |
Y | EN+2~, EN+13*, EN+14, EN+15, EN+17, EN+20, EN+21, EN+22, EN+23, EN+25 , EN+26 |