©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
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 |
|---|---|---|
| ALLER | ; -- OBX allergies --
|
|
| SETUP | ;setup HLSDATA() from each "record" of ^TMP("RARPT-QBAK",$J,RARECNT,*)
; re-use var RARECNT |
|
| 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
|
|
| REC | ; -- PID --
; set vendor-calculated variables |
|
| KILL | ||
| 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! |
| Name | Line Occurrences |
|---|---|
| ALLER | REC+32, REC+33 |
| KILL | EN1+4, EN1+6 |
| OBX11 | REC+27, REC+30, REC+32, REC+35, ALLER+1 |
| REC | SETUP+4 |
| SETUP | XIT+5 |
| XIT | EN1+4, EN1+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | REC+35 |
| ^("OBR16A" | REC+17 |
| ^("OBR16B" | REC+17 |
| ^("OBR4B" | REC+16 |
| ^("OBX-HIST-NONE" | REC+32 |
| ^("OBX5-ALLE" | ALLER+1 |
| ^("PID19" | REC+13 |
| ^("PID5" | REC+12 |
| ^("PID7" | REC+12 |
| ^("PID8" | REC+12 |
| ^(0 | REC+35 |
| >> | 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! |