MDCPHL7A ;HINES OIFO/BJ - CliO HL7 Handler/validator;09 Aug 2006
Source file <MDCPHL7A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
; Main processing routine used by VistA HL7 subsystem ; Parameters - ; Covert (preset local variables) - ; See HL*1.6*56 guide, pg 9-4. ; HLMTIENS - The message ID ; HLNODE - Current message segment: set by HLNEXT; ; HLNODE(N) - Continuation nodes for current segment. ; HLQUIT - will be less than 1 if there are no more nodes. |
|
| LOG(MDCPINST,MDCPORD,MDCPDTTM,MDCPHL7,MDCPHDR,MDCPLOC) | ; We need to make an entry in 704.002 for this message.
; Parameters - ; Overt: ; MDCPINST - The name of the instrument sending the message. ; MDCPORD - The order identifier returned from the instrument. ; MDCPDTTM - The date/time of the observation. ; MDCPHL7- The HL7 message id in file 773. ; MDCPHDR- The ID of the HL7 message in file 772 (for the MSH segment) ; MDCPLOC- The reported location of the patient in this HL7 message |
|
| VALPID(MDCPIEN,MDCPID) | ; Validate an HL7 PID segment.
|
|
| VALMAP(MDCPIEN,MDCPINST) | ; Validate an incoming device to a mapping table
; Purpose - ; This line tag will take an incoming HL7 Sending Application and ensure ; that it has a mapping table in the TERM_MAPPING_TABLE file (704.108) ; Compare is done on field SOURCE_ID (#.21) via the 'SOURCE' x-ref |
|
| VALLOC(MDCPIEN,MDCPLOC) | ; Validate an incoming location to File 44
|
|
| BLDARRY(MDCPVAL,MDCPSEP) | ; Build an array
|
|
| HL72FMDT(MDHL7) | ; Convert an HL7 Date/Time to Fileman
; Check for YYYYMMDDhhmmss pattern first |
| HL7 Protocol Name | Call Tags |
|---|---|
| MDHL Device Client | EN |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | FIND1^DIC |
| ^SC - [#44] | FIND1^DIC |
| ^MDC(704.108 - [#704.108] | FIND1^DIC, GET1^DIQ |
