SRCHL7A ;BIR/SJA - RECEIVE HL-7 CONSULTS MESSAGE, PARSE INTO COMPONENTS AND CALL PFSS GET ACCOUNT API ;12/17/04 05:10 PM
Source file <SRCHL7A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
OBR(SRCOBR) | ;Get fields from OBR segment.
|
|
ORC(SRCORC) | ;Get fields from ORC segment.
|
|
EN(MSG) | ;Entry point from protocol SR RECEIVE
|
|
OBX(SRCOBX) | ;Get fields from OBX segment and set into SRC variables
|
|
FN(X) | ;Return New Person Code give Name from HL-7 segment
|
|
ACCT | ||
ZSV(SRCZSV) | ;Get service from ZSV segment
|
FileNo | Call Tags |
---|---|
^GMR(123.5 - [#123.5] | GET1^DIQ |
^VA(200 - [#200] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(40.8 - [#40.8] | EN+9 |
^DIC(40.7 - [#40.7] | OBX+17 |
^SRO(137.45 - [#137.45] | OBX+10, OBX+17 |
Name | Line Occurrences |
---|---|
$$FN | OBX+8, OBX+9 |
OBR | EN+17 |
OBX | EN+21 |
ORC | EN+15 |
ZSV | EN+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | OBX+7* |
DIC | FN+2!* |
DIC(0 | FN+2* |
>> II | OBX+12*, OBX+15* |
LN | OBX+6*, OBX+12, OBX+15, EN+3~ |
MSG | EN~ |
MSG( | OBX+3, OBX+6, OBX+12, OBX+15, EN+8, EN+12 |
SRC99C | OBR+4*, OBR+5, EN+3~ |
SRCARFN | EN+3~, ACCT*, ACCT+1 |
SRCATN | OBR+14*, EN+3~ |
SRCDG1 | EN+3~, ACCT |
SRCDG1(1 | OBX+13*, EN+7*, EN+23 |
SRCDIV | EN+3~, EN+9*, ACCT |
SRCINTR | OBR+17*, EN+3~ |
SRCMSG | ORC+3, OBX+3*, OBX+4, EN+3~, EN+7*, EN+8*, EN+9, EN+11*, EN+12*, EN+13 , EN+15, EN+17, EN+20, EN+21 |
SRCNOD | EN+3~, EN+7*, EN+8*, EN+11*, EN+12*, EN+21 |
SRCOBR | OBR~, OBR+4, OBR+6, OBR+12, OBR+14, OBR+15, OBR+17, EN+4~ |
SRCOBX | OBX~, OBX+3, OBX+6, OBX+12, OBX+15, EN+4~ |
SRCODT | ORC+6*, OBR+12*, OBR+13*, EN+4~ |
SRCOID | OBX+4*, OBX+5, EN+4~ |
SRCORC | ORC~, ORC+4, ORC+5, ORC+6 |
SRCORNP | ORC+5*, EN+4~ |
SRCOTXT | ZSV+3*, EN+4~ |
SRCPNM | EN+4~ |
SRCPR1 | EN+4~, ACCT |
SRCPR1(4 | OBX+16*, EN+7*, EN+23 |
>> SRCPV1 | ACCT |
>> SRCPV1(17 | OBX+8*, EN+7* |
>> SRCPV1(18 | OBX+17* |
>> SRCPV1(2 | OBX+18* |
>> SRCPV1(3 | OBX+17* |
>> SRCPV1(7 | OBX+9*, EN+7* |
SRCPV2 | EN+4~, ACCT |
SRCPV2(8 | OBX+7*, EN+7*, EN+23 |
SRCQT | ORC+3*, OBR+5*, OBR+11*, EN+4~, EN+11*, EN+12, EN+16, EN+17*, EN+18 |
SRCRATSN | EN+5~ |
SRCRB | EN+5~ |
SRCRF | OBX+6*, OBX+7, OBX+8, OBX+9, OBX+10, OBX+11, OBX+12, OBX+14, OBX+15, EN+5~ |
SRCRF( | OBX+6* |
SRCRFL | OBX+6*, OBX+7, OBX+8, OBX+9, OBX+10, OBX+12*, OBX+13, OBX+15*, OBX+16, EN+5~ |
SRCSEND | EN+5~, EN+9* |
SRCSS | OBR+5*, OBR+7*, OBR+8*, OBR+10*, OBR+11, EN+5~, EN+17, EN+22, EN+25 |
SRCSST | OBR+6*, OBR+7, EN+5~ |
SRCSTDT | OBR+15*, OBR+16*, EN+5~ |
SRCSURG | EN+5~, ACCT |
SRCSURG(2 | OBX+17*, EN+7*, EN+23 |
SRCTRLC | ORC+4*, EN+6~, EN+25 |
SRCZSS | ZSV+1*, EN+6~ |
SRCZSV | ZSV~, ZSV+1, ZSV+3 |
SRDFN | EN+6~, ACCT |
SRDOP | OBX+7*, EN+6~ |
SRX | OBX+10*, OBX+17, EN+5~ |
X | OBX+7*, FN~, FN+1 |
Y | OBX+7, EN+6~, FN+3 |