EASPREC6 ;ALB/BD,MNH,LMD - ROUTINE TO PROCESS INCOMING (Z06 EVENT TYPE) HL7 MESSAGES ;6/16/04 9:28am
Source file <EASPREC6.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; entry point to validate Means Test messages
|
|
EN1 | ||
CLEANUP | ||
PROCESS | ||
MSH | ||
PID | ;Handle wrapped PID segment
|
|
ZIC | ||
ZIR | ||
ZDP | ||
ZMT | ||
ZIV | ||
BHS | ||
BTS | ||
GET | ; get HL7 segment from ^TMP
|
|
PARSEZMT(ZSEG) | ;
|
|
CLOSE(IVMIY,DFN,IVMCS,IVMCR) | ; Close IVM case record for a patient
; Input: DFN -- Pointer to the patient in file #2 ; IVMIY -- Income year of the closed case ; IVMCS -- Closure source [1=IVM | 2=DHCP] ; IVMCR -- Pointer to the closure reason in file #301.93 |
|
CLOSEQ |
FileNo | Call Tags |
---|---|
^IVM(301.5 - [#301.5] | Classic Fileman Calls |
^DGMT(408.31 - [#408.31] | Classic Fileman Calls |