HLTRANS ;AISC/SAW-Create Mail Message and Entry in the HL7 Transmission File ;03/24/2004 16:22
Source file <HLTRANS.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Compile 'MSH' Segment
|
|
EN1 | ;Create Mail Message (Package Supplies MSH Segment(s))
|
|
EN2 | ;Enter Data into HL7 Transmission File/Record Error Messages
|
|
EXIT | ||
INIT | ;Initialize Variables for Creating HL7 Segments
|
|
SET | ||
KILL | ;Delete HL variables created by calls to INIT^HLTRANS and FILE^HLTF
|
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HL(770 - [#770] | INIT+22, INIT+25, INIT+26 |
^HL(771 - [#771] | INIT+22, INIT+28, INIT+31 |
^HL(771.5 - [#771.5] | INIT+30 |
^TMP("HLS" | EN+1*, EN1+6 |
^XMB(3.8 - [#3.8] | EN1+11 |
^XMB(3.9 - [#3.9] | EN1+3*, EN1+6*, EN1+9*, EN1+12!, EN2+2* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DT | EN1+9, EN2+2 |
HLCHAR | EN1+3*, EN1+6*, KILL+1! |
HLDA | EN2+1, SET, KILL+1! |
HLDAN | EN1+1, INIT+22*, INIT+28*, SET+1*, KILL+1! |
HLDAP | INIT+22*, INIT+27*, INIT+28, INIT+31, SET+1*, KILL+1! |
HLDT | EN1+1, EN2+1, SET, KILL+1! |
HLDT1 | SET, KILL+1! |
HLDUZ | KILL+1! |
HLECH | INIT+31*, KILL+1! |
HLERR | EN1+12*, EN2+1, EN2+2, INIT+22*, INIT+25*, INIT+26*, INIT+27*, INIT+28*, SET+1, KILL+1! |
HLERR1 | EN+1, EN1+2, EN1+12*, EN1+14, EN2+1, EXIT!, SET+1* |
>> HLEVN | EN+1* |
HLFS | EN1+5, EN1+8, INIT+31*, SET+1*!, KILL+1! |
HLI | EN1+3*, EN1+6*, EXIT! |
HLI0 | EN1+3*, EN1+6*, EN1+9*, EXIT! |
HLMID | SET! |
HLMSA | EN1+3, EN1+4*, EN1+5*, EN1+6, EN1+7*, EN1+8*, EXIT! |
HLMSG | EN2+1*, SET+1! |
HLMTN | EN+1, EN2+1, SET+1*! |
HLNDAP | INIT+22*, INIT+25*, INIT+26, SET+1*, KILL+1! |
HLNDAP0 | EN1+1, EN1+10, EN1+11, EN1+13, INIT+26*, INIT+27, INIT+29, INIT+30, SET+1*, KILL+1! |
HLPID | INIT+29*, KILL+1! |
HLQ | INIT+31*, KILL+1! |
HLSDATA | EN+1! |
HLSDATA( | EN1+3 |
HLSDATA(0 | EN+1* |
>> HLSDT | EN+1, EN1+3, EN1+6 |
>> HLSEC | EN+1 |
HLVER | INIT+30*, KILL+1! |
HLXMZ | EN1+1*, EN1+3, EN1+6, EN1+9, EN1+12, EN2+2, EXIT! |
VAT | EXIT! |
VATERR | EXIT! |
VATNAME | EXIT! |
X | EN1+2~, EN1+3*, EN1+4, EN1+5, EN1+6*, EN1+7, EN1+8, EN1+11* |
XMDUN | EN1+9*, EXIT! |
XMDUZ | EN1+1*, EXIT! |
XMSUB | EN1+1*, EXIT! |
XMY | EN1+12!, EXIT! |
XMY( | EN1+12*, EN1+13*, EN2+3* |
XMY("G." | EN1+11* |
XMZ | EN1+1, EXIT! |
Y | EN1+2~ |