MDWOR ; HOIFO/NCA - Main Routine to Decode HL7 ; 1/29/19 4:55pm
Source file <MDWOR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(MDMSG) | ; Entry Point for CPRS and pass MSG in MDMSG
|
|
MSH | ; Decode MSH
|
|
PID | ; Check PID
|
|
PV1 | ; Check PV1
|
|
ORC | ; Check ORC
|
|
OBX | ; Check OBX
|
|
NEW | ; New Order Segment
|
|
OBR | ; Check OBR
|
|
CANCEL | ; Cancel/Discontinue
|
|
CHKIN(MDFN,MDREQ,MDPROV,MDATA,MDVSTD) | ; [Procedure] Check In Study
|
|
FMDTE(DATE) | ; Convert HL-7 formatted date to a Fileman formatted date
|
|
HIGHV(MDHV) | ; Return flag indicator whether procedure is use for auto check-in
|
|
GETAPPT(MDDPAT,MDDA) | ; Get appointment
|
FileNo | Call Tags |
---|---|
^MDD(702 - [#702] | GET1^DIQ |
^MDS(702.09 - [#702.09] | GET1^DIQ |