BHL3MI ; cmi/anchorage/maw - BHL Setup HL7 message and pass to APCD ; [ 06/07/2002 7:04 AM ]
Source file <BHL3MI.m>
Package | Total | Call Graph |
---|---|---|
IHS Support HL7 Interfaces | 1 | EOJ^BHLSETI |
Patient Care Component | 1 | IN^APCD3M |
Name | Comments | DBIA/ICR reference |
---|---|---|
SET | ;-- this is the main routine driver
|
|
MSH | ;-- let's setup the msh segment
|
|
CHKSEG(BSEG,MC) | ;-- see if we are at a start of a segment
|
|
SETSEG(C,BS) | ;-- setup the segment array
|
|
PASS | ;-- call 3M filer
|
|
MAIN | ;EP - this is the main routine driver
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^INTHU - [#4001] | SET+6, SET+8 |
Name | Line Occurrences |
---|---|
CHKSEG | SET+12 |
MSH | MAIN+1 |
PASS | MAIN+1 |
SET | MAIN+1 |
SETSEG | SET+14, CHKSEG+1, CHKSEG+2, CHKSEG+3, CHKSEG+4, CHKSEG+5, CHKSEG+6, CHKSEG+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> APCDHL7M( | SETSEG+1*, MSH+1, MSH+2, MSH+3, MSH+4 |
>> BHL3DA | SET+6*, SET+8 |
>> BHL3MC | SET+3*, SET+12, SET+14, SETSEG+2* |
BHLBSEG | SET+4~, SET+11*, SET+12, SET+14, SETSEG+3* |
BHLCNT | SET+4~, SET+5*, SET+11, SET+13*, SETSEG+4* |
>> BHLMDA | MSH+1*, MSH+2, MSH+3, MSH+4 |
BHLSEG | SET+7~, SET+8*, SET+10, SET+11 |
>> BHLUIF | SET+2* |
BS | SETSEG~, SETSEG+1 |
BSEG | CHKSEG~, CHKSEG+1, CHKSEG+2, CHKSEG+3, CHKSEG+4, CHKSEG+5, CHKSEG+6, CHKSEG+7 |
C | SETSEG~, SETSEG+1 |
>> ENC | MSH+4* |
>> FS | MSH+3*, MSH+4 |
I | SET+9~, SET+10*, SET+11 |
MC | CHKSEG~, CHKSEG+1, CHKSEG+2, CHKSEG+3, CHKSEG+4, CHKSEG+5, CHKSEG+6, CHKSEG+7 |
>> UIF | SET+1, SET+2, SET+6, SET+8 |