Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: MDHL7A

Package: Clinical Procedures

Routine: MDHL7A


Information

MDHL7A ; HOIFO/WAA - Routine to Decode HL7 for CP ;05/21/09 15:57

Source Information

Source file <MDHL7A.m>

Call Graph

Call Graph

Call Graph Total: 14

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 1 ^ORD(101  
Medicine 1 MCAR Device Client  

Entry Points

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)

External References

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

Used in HL7 Interface

HL7 Protocol Name Call Tags
MCAR Device Client

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^MDD(702 - [#702] GET1^DIQ
^MDD(703.1 - [#703.1] Classic Fileman Calls

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
$$NEWID OBR+17
@( OBX+1
MDSSN PID+9, PID+13
MSH EN2+39
OBR EN2+41
OBX EN2+48
PID EN2+40
STATUS EN2+49

Local Variables

Legend:

>> 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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All