©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
MCAR7A ; HIRMFO/REL-Main Routine to Decode HL7 ;5/26/00 09:43
Source file <MCAR7A.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 1 | $$FMDATE^HLFNC |
| Medicine | 1 | ^MCAR7X |
| Registration | 1 | PID^VADPT6 |
| VA Fileman | 1 | IX1^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry Point for Message Array in MSG
; Reference DBIA #10035 for DPT calls. |
|
| PROC | ; Create Procedure entry in appropriate file (FIL)
|
|
| KIL | ; Kill Variables
|
|
| PID | ; Check PID
|
|
| P1 | ||
| MSH | ; Decode MSH
|
|
| OBR | ; Check OBR
|
| HL7 Protocol Name | Call Tags |
|---|---|
| MCAR Device Client |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | OBR+13 |
| ^DPT - [#2] | PID+7 |
| ^DPT("SSN" | PID+5 |
| ^MCAR( | PROC+2, P1*, P1+1, P1+2* |
| ^MCAR(690 - [#690] | PID+13* |
| ^MCAR(690.7 - [#690.7] | OBR+10, OBR+11 |
| Name | Line Occurrences |
|---|---|
| @( | OBR+14 |
| KIL | MSH+2, MSH+4, MSH+5, PID+1, PID+6, PID+10, OBR+1, OBR+7, OBR+10, OBR+13 , OBR+14 |
| P1 | P1, P1+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | OBR+4*, KIL+1! |
| BID | PID+11*, KIL+1! |
| CODE | KIL+1! |
| CPT | OBR+5*, KIL+1! |
| DA | PROC+2*, PROC+3, P1*, P1+1, P1+2, KIL+1! |
| DATE | OBR+6*, KIL+1! |
| DFN | PID+5*, PID+6, PID+7, PID+13, OBR+8, KIL+1! |
| DIK | P1+2*, KIL+1! |
| DLCO | KIL+1! |
| DTO | OBR+6*, OBR+7, OBR+8, KIL+1! |
| ERRTX | EN+2!, MSH+4*, PID+1*, PID+6*, PID+10*, OBR+1*, OBR+7*, OBR+10*, OBR+13*, KIL+1! |
| EXAM | OBR+4*, KIL+1! |
| EXAM2 | OBR+4*, KIL+1! |
| EXE | KIL+1! |
| FIL | PROC+2, P1, P1+1, P1+2, KIL+1! |
| >> HLNEXT | EN+3 |
| >> HLNODE | EN+3 |
| >> HLNODE( | EN+3 |
| >> HLQUIT | EN+3 |
| I | EN+3*, KIL+2! |
| ICNT | OBR+8*, KIL+2! |
| ID | KIL+2! |
| IMP | OBR+8!, KIL+2! |
| >> INST | OBR+3*, OBR+10*, OBR+11 |
| J | EN+3*, KIL+2! |
| K | KIL+2! |
| LBL | KIL+2! |
| LINE | KIL+2! |
| LN | KIL+2! |
| MCAPP | MSH+3*, MSH+5*, OBR+3*, OBR+10, KIL+2! |
| MCRTN | OBR+11*, OBR+13, OBR+14, KIL+2! |
| MG | KIL+2! |
| MSG | EN+2!, KIL+2! |
| MSG( | EN+3*, MSH+2, MSH+3, MSH+5, PID+1, PID+16, PID+17, OBR+1 |
| N | KIL+2! |
| NAM | PID+3*, PID+7, KIL+2! |
| NEXT | KIL+2! |
| NUM | EN+4*, MSH+2, MSH+3, MSH+5, MSH+6*, PID+1, PID+14*, PID+16*, PID+17*, OBR+1 , OBR+8*, KIL+2! |
| ORIFN | OBR+3*, OBR+4*, KIL+3! |
| P | KIL+3! |
| PID | PID+11*, KIL+3! |
| PIEN | KIL+3! |
| S | KIL+3! |
| SEG | MSH+1!, KIL+3! |
| SEG("MSH" | MSH+3* |
| SEG("OBR" | OBR+2* |
| SEG("PID" | PID+2* |
| SEP | KIL+3! |
| SET | OBR+8!*, PROC+1, PROC+2, P1+2, KIL+3! |
| SSN | PID+3*, PID+4*, PID+5*, KIL+3! |
| STR | KIL+3! |
| STYP | KIL+3! |
| SUB | KIL+3! |
| TCNT | KIL+3! |
| TXT | KIL+3! |
| U | PID+13 |
| UNITS | KIL+4! |
| VA | PID+11!, KIL+4! |
| VA("BID" | PID+11 |
| VA("PID" | PID+11 |
| VAL | KIL+4! |
| X | MSH+3*, MSH+4, PID+1*, PID+2, PID+3, OBR+1*, OBR+2, OBR+3, OBR+4, OBR+5 , OBR+6, OBR+10*, OBR+13*, KIL+4! |
| XMBODY | KIL+4! |
| XMDUZ | KIL+4! |
| XMSUBJ | KIL+4! |
| XMTO | KIL+4! |
| Z1 | PID+7*, PID+8*, PID+10, KIL+4! |
| Z2 | PID+7*, PID+9*, PID+10, KIL+4! |