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 |