MAGT7MA ;WOIFO/MLH/PMK/DAC - Telepathology - create HL7 message to DPS ;02 Jan 2018 12:58 PM
Source file <MAGT7MA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EDIT | ; main entry point to create HL7 order message for modification
|
|
| NEW | ; entry point for to create HL7 order message for a new case
|
|
| BUILDHL7(STATE) | ; build the segments
; Input variables from Lab Package ; LRDFN ----- lab file (#63) patient pointer ; LRI ------- inverse date in lab file (#63) ; LRSS ------ anatomic pathology section abbreviation in lab file (#63) - CY, EM, or SP |
|
| GETFILE(LRSS) | ; get FILE information
|
|
| REPORT | ; main entry point - create HL7 order message for an electronically signed report
|
|
| CANCEL | ; main entry point - create HL7 order message for a cancelled order
|
|
| NEWTIU(LRSS,PARENTFILE,LRDFN,LRI) | ; check if this is a TIU note to be linked to an image group
; if so, create the cross-linkages now |
|
| TIUXLINK | ; create the cross-linkages to TIU EXTERNAL DATA LINK file
|
|
| TIUIEN(LRSS,LRDFN,LRI) | ; lookup TIU reference
|
|
| ERROR(RETURN,TAG,VARS) | ; log the error to the user's email
|
|
| SENDHL7() | ; P166 DAC - Get value of SEND ANATOMIC PATHOLOGY HL7 switch
|
| FileNo | Call Tags |
|---|---|
| ^MAG(2006.1 - [#2006.1] | GET1^DIQ |
| ^LAB(60 - [#60] | GET1^DIQ |
| ^LR - [#63] | GET1^DIQ |
| ^HLD(779.4 - [#779.4] | GET1^DIQ |
