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 |
Package | Total | Caller Graph |
---|---|---|
Enrollment Application System | 1 | EASUM6 |
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 |