EASPREC6 ;ALB/BD,MNH,LMD - ROUTINE TO PROCESS INCOMING (Z06 EVENT TYPE) HL7 MESSAGES ;6/16/04 9:28am
Source file <EASPREC6.m>
| Package | Total | Call Graph |
|---|---|---|
| Income Verification Match | 5 | $$STATUS^IVMPLOG ACK^IVMPREC BLDPID^IVMPREC6 $$CLEARF^IVMPRECA ($$MATCH,MAIL,PARSPID3)^IVMUFNC |
| Enrollment Application System | 4 | SET^EASBTBUL $$EXPIRED^EASPTRN1 ^EASUM6 (,MTBULL)^EASUM9 |
| Registration | 2 | $$LYR^DGMTSCU1 $$LST^DGMTU |
| VA FileMan | 2 | NOW^%DTC ^DIE |
| Health Level Seven | 1 | $$FMDATE^HLFNC |
| Integrated Billing | 1 | $$RXST^IBARXEU |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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 |
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | PROCESS+1, CLOSE+22 |
| $$LYR^DGMTSCU1 | ZMT+7 |
| $$LST^DGMTU | PROCESS+7 |
| ^DIE | PROCESS+39, PROCESS+80, CLOSE+23 |
| SET^EASBTBUL | PROCESS+30 |
| $$EXPIRED^EASPTRN1 | PROCESS+44, PROCESS+63, PROCESS+82 |
| ^EASUM6 | PROCESS+42 |
| ^EASUM9 | PROCESS+67 |
| MTBULL^EASUM9 | PROCESS+86 |
| $$FMDATE^HLFNC | ZMT+4, ZIV+2, PARSEZMT+2, PARSEZMT+7, PARSEZMT+11, PARSEZMT+12 |
| $$RXST^IBARXEU | PROCESS+5 |
| $$STATUS^IVMPLOG | CLOSE+14 |
| ACK^IVMPREC | EN1, EN1+6, EN1+10 |
| BLDPID^IVMPREC6 | PID+8 |
| $$CLEARF^IVMPRECA | PID+13 |
| $$MATCH^IVMUFNC | PID+18 |
| MAIL^IVMUFNC | PROCESS+86 |
| PARSPID3^IVMUFNC | PID+15 |
| FileNo | Call Tags |
|---|---|
| ^IVM(301.5 - [#301.5] | Classic Fileman Calls |
| ^DGMT(408.31 - [#408.31] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(408.32 - [#408.32] | PROCESS+25, PROCESS+65, PROCESS+85, PARSEZMT+3, PARSEZMT+13 |
| ^DGMT(408.31 - [#408.31] | PROCESS+13, PROCESS+28, ZMT+11, ZMT+14 |
| ^IVM(301.5 - [#301.5] | CLOSE+9, CLOSE+10 |
| ^TMP($J | EN1, PID+4, GET+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | PID+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | PROCESS~, PROCESS+2, CLOSE+22 |
| %H | PROCESS~ |
| %I | PROCESS~ |
| CANCFLG | EN+2~, CLEANUP! |
| CASEFLG | EN+2~, EN+9*, PROCESS+35, PROCESS+48, PROCESS+54, PROCESS+72, ZIV+7*, ZIV+8* |
| CLOSFLG | CLEANUP+1! |
| CMPDATE | PARSEZMT+1~, PARSEZMT+7* |
| CNTR | PID+1~, PID+2*, PID+6*, PID+10*, PID+11, PID+12, PID+13, PID+14 |
| CNTR2 | PID+1~, PID+12*, PID+13 |
| COMP | PID+1~ |
| CURMT | PROCESS+7*, PROCESS+8, PROCESS+9, PROCESS+10, PROCESS+11, PROCESS+61~ |
| DA | PROCESS+38*, PROCESS+39!, PROCESS+74*, PROCESS+80!, CLOSE+6~, CLOSE+9*, CLOSE+10, CLOSE+14 |
| DEPFLG | EN+2~, EN+9*, ZIC, ZDP* |
| DFN | PROCESS+5, PROCESS+7, PROCESS+30, PROCESS+44, PROCESS+46, PROCESS+62, PROCESS+63, PROCESS+68*, PROCESS+70, PROCESS+82 , PROCESS+84, PID+16*, PID+18, ZMT+11, CLOSE~, CLOSE+7, CLOSE+9 |
| DGCAT | PROCESS+20~, PROCESS+25*, PROCESS+30, PROCESS+61~, PROCESS+65*, PROCESS+85* |
| DGLY | CLEANUP!, ZMT+7* |
| DGMTP | CLEANUP!, PROCESS+13* |
| DGMTYPT | EN+5~, PROCESS+5, PROCESS+7, PROCESS+49, PROCESS+50, PROCESS+58, PROCESS+59, ZMT+5*, ZMT+6*, ZMT+11 |
| DIC | PROCESS~ |
| DIE | PROCESS+38*, PROCESS+39!, PROCESS+74*, PROCESS+80!, CLOSE+6~, CLOSE+23* |
| DR | PROCESS+38*, PROCESS+39!, PROCESS+75*, PROCESS+76*, PROCESS+77*, PROCESS+78*, PROCESS+79*, PROCESS+80!, CLOSE+6~, CLOSE+22* |
| DT | PROCESS+20~, PROCESS+23*, PROCESS+30 |
| EAEVENT | CLOSE+6~ |
| EASMTDT | EN+4~, PROCESS+41, PROCESS+43, PROCESS+69, PROCESS+81, ZMT+4* |
| EASZ06 | EN+4~, PROCESS+4* |
| EASZ06D | EN+5~, PROCESS+66* |
| EDB | EN+2~ |
| ERRFLG | EN+2~, EN+9*, EN1*, EN1+4 |
| >> ERRMSG | PID+18 |
| EVENTS | CLOSE+6~, CLOSE+14 |
| EVENTS("ENROLL" | CLOSE+14 |
| EXPIRED | EN+4~, PROCESS+4*, PROCESS+45*, PROCESS+64*, PROCESS+83* |
| FININD | PROCESS+20~, PROCESS+28*, PROCESS+30 |
| >> HLECH | PID+13 |
| HLERR | EN+9*, EN1, EN1+1!, EN1+6, EN1+8*, EN1+10, CLEANUP+1!, PROCESS+3*, PROCESS+49*, PROCESS+50* , PROCESS+58*, PROCESS+59*, PID+18*, ZIV+4*, ZIV+6* |
| >> HLFS | MSH, ZMT+4, ZIV+1, ZIV+5, ZIV+7, ZIV+8 |
| >> HLMID | MSH* |
| >> HLQ | PID+14 |
| I | PID+1~ |
| >> ICN | PID+16*, PID+18 |
| IVEVENT | CLOSE+6~ |
| IVM10 | EN+3~, PROCESS+30, PARSEZMT+7* |
| IVM12 | EN+3~, PARSEZMT+8* |
| IVM17 | EN+3~, ZMT+5, PARSEZMT+9* |
| IVM18 | EN+3~, PARSEZMT+10* |
| IVM2 | EN+3~, PARSEZMT+2* |
| IVM20 | EN+3~, PARSEZMT+11* |
| IVM25 | EN+3~, PARSEZMT+12* |
| IVM26 | EN+3~, PARSEZMT+13* |
| IVM3 | EN+3~, PROCESS+25, PROCESS+65, PROCESS+85, PARSEZMT+3* |
| IVM32 | EN+3~, PROCESS+30, PARSEZMT+14*, PARSEZMT+16* |
| IVM5 | EN+5~, PROCESS+65*, PROCESS+85* |
| IVM7 | EN+3~, ZMT+18, PARSEZMT+5* |
| IVM8 | EN+3~, PARSEZMT+6* |
| >> IVMCEB | PROCESS+5*, PROCESS+30 |
| IVMCR | CLOSE~, CLOSE+7, CLOSE+22 |
| IVMCS | CLOSE~, CLOSE+7, CLOSE+22 |
| IVMDA | EN+4~, EN+9*, EN1*, PID+4*, PID+5*, PID+7, PID+19, ZMT+1, ZIV, GET+2 , GET+4 |
| IVMDAP | CLEANUP!, PID+19* |
| IVMDAS | CLEANUP! |
| IVMDATE | PROCESS~, PROCESS+2*, PROCESS+23 |
| IVMDAV | CLEANUP+2!, ZIV* |
| IVMDAZ | CLEANUP!, ZMT+1* |
| >> IVMDELMT | CLOSE+8* |
| IVMDFN | PROCESS+61~, PROCESS+62*, PROCESS+68 |
| IVMDGLY | CLEANUP!, ZIC* |
| IVMFLGC | EN+9*, CLEANUP! |
| IVMIEN | ZMT~, ZMT+9*, ZMT+11*, ZMT+12, ZMT+14, ZMT+16 |
| IVMIY | EN+3~, PROCESS+46, PROCESS+70, PROCESS+84, ZIV+1*, ZIV+2*, ZIV+3, CLOSE~, CLOSE+7, CLOSE+9 |
| IVMMT31 | CLEANUP!, PROCESS+13* |
| IVMMTDT | CLEANUP+1!, PROCESS+7, PROCESS+8, PROCESS+10*, PROCESS+41*, PROCESS+43*, PROCESS+44, PROCESS+63, PROCESS+69*, PROCESS+81* , PROCESS+82, ZMT+4*, ZMT+7, ZMT+8 |
| IVMMTI | PROCESS+61~ |
| IVMMTIEN | CLEANUP+1!, PROCESS+6, PROCESS+9*, PROCESS+12, PROCESS+13, PROCESS+28, PROCESS+37, PROCESS+38, PROCESS+73, PROCESS+74 , ZMT+12* |
| IVMMTSTS | EN+4~, PROCESS+11* |
| IVMPAT | EN+4~ |
| IVMPID | PID+1~, PID+8 |
| IVMPID( | PID+10, PID+11, PID+12, PID+13*, PID+14* |
| IVMPID(3 | PID+15 |
| >> IVMRTN | EN1, PID+4, GET+2 |
| IVMSEG | CLEANUP+1!, MSH, PID+2, PID+4*, PID+5, PID+6, ZIC, ZMT+1, ZMT+4, ZIV , ZIV+1, ZIV+5, ZIV+7, ZIV+8, GET+2*, GET+3 |
| IVMSEG1 | EN1+3, CLEANUP+1!, GET+3* |
| IVMSTAT | CLEANUP+1! |
| IVMTEXT | CLEANUP+1! |
| IVMZ10 | CLEANUP+2!, PROCESS+45*, PROCESS+64*, PROCESS+83* |
| MISSING | EN+2~, EN1+5*, EN1+6, EN1+7, EN1+8 |
| >> MSGID | MSH* |
| MTCODE | ZMT~, ZMT+14*, ZMT+15 |
| MTDATE | EN+4~, ZMT+8*, ZMT+11 |
| MTFND | EN+4~, EN+9*, PROCESS+34, PROCESS+53, ZMT+10*, ZMT+11, ZMT+17*, ZMT+18* |
| NOPID | PID+1~, PID+2*, PID+3, PID+5* |
| PID3ARY | PID+1~, PID+15, PID+17! |
| PID3ARY("NI" | PID+16 |
| PID3ARY("PI" | PID+16 |
| PIDSTR | PID+1~, PID+8 |
| PIDSTR( | PID+2*, PID+6* |
| SEGMENTS | EN+2~, EN+7*, EN1+8 |
| SEGSTR | EN+2~, EN+6*, EN1+5, PID+7*, GET+4* |
| STATUS | CLOSE+6~, CLOSE+13*, CLOSE+14*, CLOSE+22 |
| TMPARY | PID+1~, PID+15, PID+17! |
| TMPARY(3 | PID+15* |
| TYPE | EN+4~, EN1+7*, EN1+8 |
| U | PROCESS+8 |
| UPMTS | EN+4~, EN+9*, PROCESS+57, PROCESS+60, ZMT+16*, ZMT+18* |
| X | CLOSE+6~ |
| XMSUB | CLEANUP+1! |
| Y | CLOSE+6~ |
| Z06COM | EN+2~, EN+8* |
| ZIVSEG | CLEANUP+2!, ZIV* |
| ZMTSEG | CLEANUP+2!, PROCESS+3, ZMT+1*, ZMT+2 |
| ZSEG | PARSEZMT~, PARSEZMT+2, PARSEZMT+3, PARSEZMT+5, PARSEZMT+6, PARSEZMT+7, PARSEZMT+8, PARSEZMT+9, PARSEZMT+10, PARSEZMT+11 , PARSEZMT+12, PARSEZMT+13, PARSEZMT+14 |