SRHLUO4 ;B'HAM ISC\DLR - Surgery Interface (Cont.) Utilities for building Outgoing HL7 Segments ; [ 05/06/98 7:14 AM ]
Source file <SRHLUO4.m>
Package | Total | Call Graph |
---|---|---|
Surgery | 1 | ($$CHECK,$$VALUE,MSG)^SRHLUO4C |
VA Fileman | 1 | GETS^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
POBX | ;process the underlying OBX & NTE segments
|
|
INIT(IEN) | ;initialize FILE FIELD and SEQ
|
|
POBR | ;sets up the DIQ
|
|
EXIT | ;
|
|
MAIN | ||
OBR(SRI,CASE,SRENT) | ;Observation
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SRO(133.2 - [#133.2] | MAIN+1, POBR+5, POBR+7, POBR+9, POBR+12, POBR+14, POBR+17, POBR+18, POBR+19, POBX+1 , POBX+2, POBX+3, POBX+5, POBX+8, POBX+9, POBX+12, POBX+16, POBX+18, POBX+19, INIT+1 |
Name | Line Occurrences |
---|---|
INIT | POBR+5, POBR+10, POBR+18, POBX+2, POBX+12, POBX+14, POBX+16, POBX+18 |
POBR | MAIN+1 |
POBX | MAIN+1 |
Name | Field # of Occurrence |
---|---|
^(0 | POBR+7, POBR+14, POBR+18, POBX+5, POBX+9, INIT+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CASE | OBR~, POBR+3, POBR+7 |
CNT | MAIN~ |
CNT( | POBX+12* |
DA | EXIT+1! |
DIQ | EXIT+1! |
DR | EXIT+1! |
FIELD | MAIN~, POBR+5*, POBR+12, POBR+14, POBR+15, POBR+18, POBR+22, POBX+2*, POBX+4, POBX+7 , POBX+12, POBX+18, INIT+1* |
>> FIELDS | POBR+12* |
FILE | MAIN~, POBR+5, POBR+12, POBR+14, POBR+15, POBR+18, POBR+22, POBX+2, POBX+4, POBX+7 , POBX+12, POBX+16, POBX+18, INIT+1* |
FLAGS | MAIN~, POBR+3*, POBR+5, POBR+12, POBX+2 |
>> FLD | POBR+19*, POBR+21, POBX+4*, POBX+12*, POBX+18*, POBX+19 |
HDR | POBR+1!, POBR+7*, POBR+15, POBX+5*, POBX+8, POBX+19 |
>> HL("FS" | POBR+7, POBR+15, POBR+22, POBX+4, POBX+5, POBX+8, POBX+9, POBX+12, POBX+19 |
>> HLCOMP | POBR+7, POBR+15, POBX+5, POBX+8, POBX+19 |
IEN | MAIN~, INIT~, INIT+1 |
>> IENS | POBR+3*, POBR+5, POBR+12, POBX+2 |
NTE | MAIN+1!, EXIT+1! |
NTE( | POBX+4* |
OBR | MAIN+1!, EXIT+1! |
OBR( | POBR+15*, POBR+21*!, POBR+22*, POBX+4, POBX+10*, POBX+12, POBX+18 |
OBX | MAIN+1!, EXIT+1!, POBX+1*, POBX+5*, POBX+8, POBX+9, POBX+12, POBX+18*, POBX+19 |
OBX( | POBX+8*, POBX+9*, POBX+12*, POBX+19* |
SEQ | MAIN~, POBR+15, POBR+19*, POBR+22, POBX+8*, POBX+12, POBX+19, INIT+1* |
SR | POBR+1!, POBR+23! |
SR( | POBR+21* |
SRENT | OBR~ |
SRHL | POBR+1! |
SRHL( | POBR+14, POBR+17, POBR+18, POBX+4, POBX+7, POBX+16 |
SRI | OBR~ |
SROBR | MAIN~, MAIN+1* |
SRST | MAIN~, POBR+3*, POBR+14*, POBR+15, POBR+17*, POBR+18, POBR+19, POBR+21, POBR+22, POBX+4* , POBX+7*, POBX+8, POBX+9, POBX+10, POBX+12, POBX+16*, POBX+18 |
SRX | MAIN~, MAIN+1*, POBR+5, POBR+7, POBR+9, POBX+1 |
SRY | MAIN~, POBR+9*, POBR+10, POBR+12, POBR+14, POBR+15, POBR+17, POBX+1*, POBX+2, POBX+3 , POBX+5, POBX+7, POBX+8, POBX+9, POBX+12, POBX+14, POBX+16, POBX+18 |
SRY1 | MAIN~, POBR+17*, POBR+18, POBR+19, POBR+22, POBX+12*, POBX+16*, POBX+18*, POBX+19 |
>> SRZ | POBX+4* |
TAR | MAIN~, POBR+3*, POBR+5, POBR+12, POBX+2 |
TMPOBR | MAIN~, MAIN+1!, POBR+7*, POBX+10 |
U | POBR+7, POBR+14, POBR+17, POBR+18, POBR+19, POBX+3, POBX+5, POBX+8, POBX+9, POBX+19 , INIT+1 |
>> VALUE | POBX+7*, POBX+8, POBX+18*, POBX+19 |