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 |