RAHLBKVR ;HIRMFO/GJC-Bridge, Kurzweil compatible to HL7 v1.5 ;12/31/97 12:05
Source file <RAHLBKVR.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 1 | EN1^HLTRANS |
Kernel | 1 | $$DT^XLFDT |
Radiology Nuclear Medicine | 1 | EN1^RAHLO |
Name | Comments | DBIA/ICR reference |
---|---|---|
RPT | ; Save off Report Text data.
|
|
IMP | ; Save off Impression Text data.
|
|
DIAG | ; Save off Diagnostic Code data.
|
|
PID | ; Pick data off the 'PID' segment.
|
|
EN1 | ; Build the ^TMP("RARPT-REC" global when we
; receive the message from HL7. ; HLDA-ien of the record in ^HL(772, should be defined. |
|
XIT | ; Clean up environment, quit
|
|
OBX | ; Pick data off the 'OBX' segments
|
|
OBR | ; Pick data off the 'OBR' segment.
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HL(772 - [#772] | EN1+9, OBR+1, OBX+1 |
^TMP("RARPT-REC" | EN1+3!, EN1+5*, EN1+6*, PID+4*, PID+7*, PID+12*, OBR+6*, OBR+7*, OBR+8*, OBR+11* , OBR+13*, OBR+14*, OBR+15*, OBR+16*, OBR+17*, XIT+1, XIT+2!, DIAG+6*, IMP+2*, RPT+2* |
Name | Line Occurrences |
---|---|
DIAG | OBX+6 |
IMP | OBX+6 |
RPT | OBX+6 |
XIT | EN1+4, PID+10, OBR+2, OBR+12 |
Name | Field # of Occurrence |
---|---|
^( | OBR+1, OBX+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | EN1+9*, OBR+1*, OBX+1*, XIT+6! |
DXSTR | DIAG+3~, DIAG+4*, DIAG+5*, DIAG+6 |
>> HLDA | EN1+3 |
>> HLDUZ | EN1+4, OBR+13, OBR+14, OBR+15, OBR+17 |
>> HLECH | PID+3, PID+4, OBR+6, OBR+7, OBR+8, OBX+4 |
>> HLERR | XIT+4*, XIT+5 |
>> HLESIG | PID+12, OBR+11, OBR+13 |
>> HLFS | PID+1, PID+2, PID+3, PID+4, PID+6, PID+7, OBR+1, OBR+2, OBR+3, OBR+4 , OBR+5, OBR+12, OBR+15, OBR+16, OBX+1, OBX+2, OBX+3, OBX+4, XIT+5, DIAG+2 , DIAG+4, IMP+2, RPT+2 |
>> HLMID | XIT+5 |
>> HLMTN | XIT+5* |
HLSDATA | XIT+4! |
HLSDATA(1 | XIT+4* |
HLSDATA(2 | XIT+5* |
>> HLTRANS | XIT+6 |
>> OBXTYP | OBX+4*, OBX+5, OBX+6 |
OBXTYPE | XIT+6! |
RADATE | XIT+7! |
RADCNT | XIT+7!, DIAG+1*, DIAG+6 |
RADTCN | OBR+5~*, OBR+6, OBR+7, OBR+8, XIT+7! |
RAERR | EN1+4*, PID+10*, OBR+2*, OBR+12*, OBX+1, OBX+3*, OBX+5*, XIT+1, XIT+4, XIT+7! |
RAESIG | XIT+7! |
RAICNT | XIT+7!, IMP+1*, IMP+2 |
RAPRIMAR | XIT+8! |
RARCNT | XIT+7!, RPT+1*, RPT+2 |
RASUB | EN1+3*, EN1+5, EN1+6, EN1+9, PID+4, PID+7, PID+12, OBR+1, OBR+6, OBR+7 , OBR+8, OBR+11, OBR+13, OBR+14, OBR+15, OBR+16, OBR+17, OBX+1, XIT+1, XIT+2 , XIT+7!, DIAG+6, IMP+2, RPT+2 |
RATRANSC | XIT+8! |
RAVERF | XIT+7! |
SEGMNT | EN1+9*, PID+1, PID+2*, PID+3, PID+4, PID+6, PID+7, OBR+1!*, OBR+2, OBR+3* , OBR+4, OBR+5, OBR+12, OBR+15, OBR+16, OBX+1!*, OBX+2*, OBX+3, OBX+4, XIT+7! , DIAG+2, DIAG+4, IMP+2, RPT+2 |
X | DIAG+3~, DIAG+5* |
>> X1 | XIT+4* |