RAHLBKVQ ;HIRMFO/GJC-Bridge Query, Kurzweil compatible to HL7 v1.5 ;10/7/97 16:01
Source file <RAHLBKVQ.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 2 | ($$HLDATE,$$HLNAME,$$M11)^HLFNC EN1^HLTRANS |
Radiology Nuclear Medicine | 1 | EN1^RAHLQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ; Build the ^TMP("RARPT-QRY" global from HL7's message global ^HL(772
; same global will be used for data returned back from DHCP |
|
XIT | ; compile the 'ACK' segment, kill variables and quit
|
|
KILL | ||
SETUP | ;setup HLSDATA() from each "record" of ^TMP("RARPT-QBAK",$J,RARECNT,*)
; re-use var RARECNT |
|
REC | ; -- PID --
; set vendor-calculated variables |
|
ALLER | ; -- OBX allergies --
|
|
OBX11 | ; for HL7 1.5
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HL(772 - [#772] | EN1+5 |
^TMP("RARPT-QBAK" | EN1+3!, KILL+2!, SETUP+4, REC+2*, REC+3*, REC+4*, REC+5, REC+7, REC+8*, REC+9* , REC+10*, REC+12, REC+13, REC+16, REC+17, REC+18, REC+19, REC+20, REC+27, REC+30 , REC+32, ALLER+1 |
^TMP("RARPT-QRY" | EN1+3!, EN1+8*, EN1+9*, EN1+10*, EN1+11*, KILL+2! |
^UTILITY($J | REC+33, REC+35, REC+36! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | KILL! |
DIWF | KILL! |
DIWL | KILL! |
DIWR | KILL! |
GMRAL | KILL! |
>> HLDA | EN1+2, EN1+3 |
>> HLDUZ | EN1+4, EN1+8 |
>> HLECH | XIT+4, REC+16, REC+17, REC+27, REC+30, REC+32, REC+35, ALLER+1 |
>> HLFS | EN1+6, EN1+7, EN1+9, EN1+10, EN1+11, XIT+1, XIT+3, XIT+4, REC+12, REC+13 , REC+16, REC+18, REC+19, REC+20, REC+27, REC+30, REC+32, REC+35, ALLER+1, OBX11+1 |
>> HLMID | XIT+3 |
>> HLMTN | XIT+1* |
>> HLQ | REC+6, REC+16 |
HLSDATA | XIT+2! |
HLSDATA( | REC+14*, REC+21*, REC+27*, REC+30*, REC+32*, REC+35*, ALLER+1*, OBX11+1* |
HLSDATA(1 | XIT+1*, XIT+2* |
HLSDATA(2 | XIT+3* |
HLSDATA(3 | XIT+4* |
>> HLTRANS | XIT+6 |
I | KILL!, REC+33*, REC+35* |
PI | KILL! |
RACN | KILL! |
RACN0 | KILL! |
RACNI | KILL! |
RADFN | KILL! |
RADISP | KILL! |
RADTE | KILL! |
RADTE0 | KILL!, REC+5*, REC+6*, REC+9, REC+10 |
RADTI | KILL! |
RAERR | EN1+4*, EN1+6*, XIT+1, XIT+2, XIT+3, KILL! |
RAESIG | KILL! |
RAEXAM | XIT+4, KILL! |
RAHLREC | EN1+5*, EN1+6, EN1+7, XIT+4, KILL! |
RAI | KILL! |
RAMDIV | KILL+1! |
RAMDV | KILL+1! |
RAMEMLOW | KILL+1! |
RAMLC | KILL+1! |
RAN | KILL+1!, SETUP+2*, REC+14*, REC+21*, REC+27*, REC+29*, REC+30, REC+32*, REC+35*, ALLER+1* , OBX11+1 |
RANUMREC | KILL+1! |
RAOBR | KILL+1! |
RAOBX | KILL+1! |
RAPID | KILL+1! |
RAPRTSET | KILL+1! |
RAPRV | KILL+1!, REC+7*, REC+8 |
RARECNT | XIT+4, KILL+1!, SETUP+4*, REC+2, REC+3, REC+4, REC+5, REC+7, REC+8, REC+9 , REC+10, REC+12, REC+13, REC+16, REC+17, REC+18, REC+19, REC+20, REC+27, REC+30 , REC+32, ALLER+1 |
RARPT | KILL+1! |
RASSN | KILL+1! |
RASTATUS | KILL+1! |
RASUB | EN1+3*, EN1+5, EN1+8, EN1+9, EN1+10, EN1+11, KILL+1! |
RAVERF | KILL+1! |
SEGMENT | EN1+7*, EN1+9, EN1+10, EN1+11, KILL+1! |
VA | KILL+1! |
VADM | KILL+1! |
VAERR | KILL+1! |
X | KILL+1! |
X0 | KILL+1! |
X1 | XIT+2*, KILL+1!, REC+12*, REC+13*, REC+14, REC+16*, REC+17*, REC+18*, REC+19*, REC+20* , REC+21 |
Y | KILL+1! |