MDHL7A ; HOIFO/WAA - Routine to Decode HL7 for CP ;05/21/09 15:57
Source file <MDHL7A.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Procedures | 8 | ^MDHL7MCA ($$HL7TFM,PROC)^MDHL7U INST^MDHL7U2 ($$MSGIEN,CPTICD,PHY,XVERT)^MDHL7U3 ^MDHL7X $$CHK^MDNCHK $$GETSTDY^MDRPCOT1 $$NTIU^MDRPCW1 |
| VA FileMan | 3 | UPDATE^DIE IX1^DIK $$GET1^DIQ |
| Health Level Seven | 1 | $$FMDATE^HLFNC |
| Master Patient Index VistA | 1 | $$GETDFN^MPIF001 |
| Registration | 1 | PID^VADPT6 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; [Procedure] Entry Point for Message Array in MSG
|
|
| EN2 | ; [Procedure] No Description
|
|
| STATUS(DA,STAT) | ; Update the status of the report in 703.1
|
|
| IM | ;Instrument Manager Interface
|
|
| MSH | ; [Procedure] Decode MSH
|
|
| OBR | ; [Procedure] Check OBR
|
|
| PID | ; [Procedure] Check PID
|
|
| MDSSN | ; This subroutine is to match up the SSN for a patient.
|
|
| OBX | ; [Observation]
|
|
| NEWID(DFN,DATE,INST,MDD702,HLMTIEN) | ; Generate a new entry and ID of 703.1
|
|
| PROC | ; [Procedure] Create report entry in file (703.1)
|
| Name | Field # of Occurrence |
|---|---|
| UPDATE^DIE | NEWID+13 |
| IX1^DIK | STATUS+3 |
| $$GET1^DIQ | EN2+15, OBR+13, OBR+14, PID+11 |
| $$FMDATE^HLFNC | OBR+11 |
| ^MDHL7MCA | EN2+31 |
| $$HL7TFM^MDHL7U | NEWID+9 |
| PROC^MDHL7U | PROC+1 |
| INST^MDHL7U2 | EN2+26 |
| $$MSGIEN^MDHL7U3 | EN+12 |
| CPTICD^MDHL7U3 | OBR+23 |
| PHY^MDHL7U3 | OBR+24 |
| XVERT^MDHL7U3 | EN+18 |
| ^MDHL7X | EN+16, EN2+21, EN2+22, EN2+25, EN2+27, EN2+47, MSH+4, OBR+3, OBR+13, OBR+14 , OBR+15, OBR+18, OBR+22, PID+1, PID+9, PID+14, PID+18 |
| $$CHK^MDNCHK | OBR+8 |
| $$GETSTDY^MDRPCOT1 | EN2+11, OBR+6 |
| $$NTIU^MDRPCW1 | NEWID+18 |
| $$GETDFN^MPIF001 | PID+7 |
| PID^VADPT6 | PID+20 |
| HL7 Protocol Name | Call Tags |
|---|---|
| MCAR Device Client |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^MDD(702 - [#702] | GET1^DIQ |
| ^MDD(703.1 - [#703.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | OBR+22 |
| ^DPT - [#2] | PID+15 |
| ^DPT("SSN" | MDSSN+4, MDSSN+5 |
| ^MDD(702 - [#702] | EN2+14 |
| ^MDD(703.1 - [#703.1] | STATUS+2*, NEWID+3, NEWID+5, NEWID+14, NEWID+16* |
| ^MDS(702.09 - [#702.09] | EN2+5, EN2+20, EN2+23, IM+4, OBR+21 |
| ^TMP($J | EN+7!, EN+10*, EN+19!, EN2+2, EN2+34, EN2+37, EN2+50!, MSH+2, MSH+3, OBR+3 , PID+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EN+1~, OBR+9* |
| BID | EN+1~, PID+20* |
| CODE | EN+1~ |
| CPT | EN+1~, OBR+10* |
| DA | EN+1~, STATUS~, STATUS+2 |
| DATE | EN+1~, OBR+11*, OBR+17, NEWID~, NEWID+9 |
| DEVIEN | EN+5~, EN+14*, EN2+1*, EN2+5*, EN2+15*, EN2+16*, EN2+20*, EN2+22, EN2+23, EN2+24 , EN2+26, IM+4* |
| DEVNAME | EN+5~, EN2+1*, EN2+3*, EN2+4*, EN2+5, EN2+7, EN2+8*, EN2+20, EN2+21, EN2+22 , EN2+24, IM+1, IM+3*, IM+4 |
| DFN | EN+1~, OBR+13, OBR+14, OBR+17, PID+4, PID+7*, PID+8, PID+9, PID+10, PID+11* , PID+14, PID+15, MDSSN+4*, MDSSN+5*, NEWID~, NEWID+8 |
| DIK | EN+1~, STATUS+3* |
| DLCO | EN+1~ |
| DTO | EN+1~, OBR+11*, OBR+15, OBR+20 |
| DZ | EN+1~ |
| ECODE | EN+5~, EN+14*, EN2+24*, EN2+26 |
| ERRTX | EN+1~, EN+15*, EN2+21*, EN2+22*, EN2+25*, EN2+27*, EN2+36, EN2+46, EN2+47*, STATUS+1 , MSH+4*, OBR+3*, OBR+13*, OBR+14*, OBR+15*, OBR+18*, OBR+22*, PID+1*, PID+8*, PID+9* , PID+10!, PID+14*, PID+18* |
| EXAM | EN+1~, OBR+9* |
| EXE | EN+1~ |
| FIL | EN+1~ |
| HLMTIEN | OBR+17, NEWID~, NEWID+12 |
| >> HLMTIENS | EN+9, EN+12 |
| HLNODE | EN+19! |
| >> HLREC("SFN" | EN2+4 |
| >> HLREST | EN+11*, EN+12 |
| I | EN+2~, EN2+1*, EN2+2* |
| ICN | PID+5~, PID+6*, PID+7 |
| ICNT | EN+2~, OBR+20* |
| ID | EN+2~ |
| IMP | EN+2~, OBR+20~ |
| INST | EN2+24*, EN2+25, OBR+17, OBR+21, NEWID~, NEWID+10 |
| J | EN+2~ |
| K | EN+2~ |
| LBL | EN+2~ |
| LINE | EN+2~ |
| LINO | EN+2~, EN2+37*, EN2+38 |
| LN | EN+2~ |
| MDAPP | EN+2~, EN2+24* |
| MDD702 | EN+5~, EN2+11*, EN2+12*, EN2+13, EN2+14*, EN2+15, OBR+6*, OBR+7*, OBR+8*, OBR+13 , OBR+14, OBR+17, NEWID~, NEWID+11, NEWID+18 |
| MDDEV | EN+5~ |
| >> MDDOB | OBR+14, PID+3* |
| MDERROR | EN+4~, EN+8*, EN2+29, EN2+30*, EN2+32 |
| MDFDA | NEWID+1~ |
| MDFDA( | NEWID+7*, NEWID+8*, NEWID+9*, NEWID+10*, NEWID+11*, NEWID+12* |
| MDFLAG | EN+1~, EN+8*, EN2+30* |
| MDGMRC | OBR+2~ |
| MDHORD | EN+6~, EN+8*, OBR+1, OBR+6*, OBR+7 |
| MDIEN | EN+5~, EN2+49, OBR+19*, OBR+23, OBR+24, NEWID+1~ |
| MDIEN(1 | NEWID+15, NEWID+16, NEWID+17 |
| MDIORD | EN+6~, EN2+10*, EN2+11, OBR+5*, OBR+6 |
| MDNO | NEWID+1~, NEWID+18* |
| MDOBX | EN+5~, EN2+35*, EN2+44*, EN2+47 |
| MDQFLG | EN+5~, EN+8* |
| MDRECI | NEWID+1~, NEWID+17*, NEWID+18 |
| MDRTN | EN+2~, OBR+21*, OBR+22, OBX+1 |
| MDSSN | EN+3~, PID+11*, MDSSN+1*, MDSSN+2*, MDSSN+3*, MDSSN+4*, MDSSN+5 |
| MG | EN+2~ |
| MSG | EN+2~ |
| N | EN+2~ |
| NAM | EN+2~, PID+15, PID+19, MDSSN+1* |
| NEWID | NEWID+1~, NEWID+2*, NEWID+5*, NEWID+7, NEWID+15 |
| NEXT | EN+2~ |
| NUM | EN+2~, EN2+35*, EN2+36*, EN2+37, MSH+2, MSH+3, OBR+3, PID+1 |
| NUMZ | EN+5~, EN2+34*, EN2+36 |
| ORIFN | EN+3~, OBR+9* |
| P | EN+3~ |
| PID | EN+3~, PID+20* |
| PIEN | EN+3~ |
| PNAM | EN+5~, PID+19* |
| S | EN+3~ |
| SEC | EN+3~, EN2+38*, EN2+39, EN2+40, EN2+41, EN2+42, EN2+43, EN2+44 |
| SEG | EN+3~, MSH+1~ |
| SEG("MSH" | MSH+3* |
| SEG("OBR" | OBR+4* |
| SEG("PID" | PID+2* |
| SEP | EN+3~ |
| SET | EN+3~, OBR+20~* |
| STAT | STATUS~, STATUS+2 |
| STR | EN+3~ |
| STYP | EN+3~ |
| SUB | EN+3~ |
| TCNT | EN+3~ |
| TXT | EN+3~ |
| U | EN+13, EN+15, EN+18, STATUS+2, OBR+20, PID+8, NEWID+15 |
| UNIQ | EN+3~, OBR+17*, OBR+18, OBR+19, OBR+20 |
| UNITS | EN+4~ |
| VA | EN+4~, PID+20~ |
| VA("BID" | PID+20 |
| VA("PID" | PID+20 |
| VAL | EN+4~ |
| X | EN+4~, EN+12*, EN+13, EN+15, EN+18, EN2+2*, EN2+3, EN2+5, EN2+6, EN2+8 , EN2+10, IM+2, IM+3, MSH+3*, MSH+4, OBR+3*, OBR+4, OBR+5, OBR+9, OBR+10 , OBR+11, OBR+22*, OBR+23, OBR+24, PID+1*, PID+2, PID+3, PID+4, PID+6, MDSSN+1 |
| XMBODY | EN+4~ |
| XMDUZ | EN+4~ |
| XMSUBJ | EN+4~ |
| XMTO | EN+4~ |
| Z | EN+4~ |
| Z1 | EN+4~, PID+15*, PID+16*, PID+18 |
| Z2 | EN+4~, PID+15*, PID+17*, PID+18 |
| ZCODE | EN+5~, EN2+23*, EN2+29 |
| ZZ | EN+4~ |
