IVMPREC8 ;ALB/KCL,BRM,PJR,CKN,TDM,PWC,LBD,DPR,KUM - PROCESS INCOMING (Z05 EVENT TYPE) HL7 MESSAGES (CON'T) ;7/24/24 8:56AM
Source file <IVMPREC8.m>
Package | Total | Call Graph |
---|---|---|
Income Verification Match | 4 | ($$AUTOADDR,UPLOAD)^IVMLDEM6 $$RF1CHK^IVMPREC6 ($$AUTOEPC,PID12,STORE)^IVMPREC9 ($$CLEARF,ZPDPA)^IVMPRECA |
Registration | 3 | $$CODE2PTR^DGUTL4 (ADD,DEM,OPD)^VADPT ZIPIN^VAFADDR |
Health Level Seven | 1 | ($$FMDATE,$$FMNAME)^HLFNC |
VA FileMan | 1 | $$GET1^DIQ |
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 |
---|---|---|
Income Verification Match | 4 | IVM273A IVMPREC6 IVMPREC9 IVMPRECA |
Name | Comments | DBIA/ICR reference |
---|---|---|
PID | ;-compare PID fields with DHCP
|
|
ZPD | ; -compare ZPD with DHCP
|
|
ZTA | ; -compare ZTA with DHCP
|
|
ZAV | ; compare ZAV with DHCP
|
|
ZGD | ; - compare ZGD with DHCP
|
|
ZCT | ; - compare ZCT with DHCP
|
|
ZEM | ; - compare ZEM with DHCP
|
|
RF1 | ; -compare RF1 with DHCP
|
|
RF1PROC | ;
|
|
ADDRCNV(ADDRSRC) | ;convert Addr Source from HL7 to DHCP
|
|
EPCSRCC(EPCSRC) | ;Convert Email, Cell, Pager Change Source from HL7 to DHCP
|
|
BAICONV(BAISRC) | ;Convert Bad addr source from HL7 to DHCP format
|
|
CONVPH(PH) | ;remove special chars/spaces from Ph
|
|
CNTRCONV(COUNTRY) | ;Check if valid country
|
|
CHKEMAIL(EMAIL) | ;Check for Valid Email
|
|
CONVPHAN(PH) | ;Convert Alpha Phone number to Numeric
|
Name | Field # of Occurrence |
---|---|
$$CODE2PTR^DGUTL4 | PID+122 |
$$GET1^DIQ | RF1PROC+22, RF1PROC+23, RF1PROC+37 |
$$FMDATE^HLFNC | PID+25, PID+52, PID+116, ZTA+27, ZGD+13, ZCT+26, ZEM+15, RF1PROC+17 |
$$FMNAME^HLFNC | ZCT+14 |
$$AUTOADDR^IVMLDEM6 | RF1+25 |
UPLOAD^IVMLDEM6 | PID+73, PID+77, PID+87, PID+91, PID+104, PID+108, PID+143, PID+147 |
$$RF1CHK^IVMPREC6 | RF1+19 |
$$AUTOEPC^IVMPREC9 | RF1+20 |
PID12^IVMPREC9 | PID+58 |
STORE^IVMPREC9 | PID+114, PID+130, PID+148, PID+149, ZTA+44, ZTA+45, ZAV+8, ZGD+17, ZCT+24, ZCT+32 , ZEM+17, ZEM+18, RF1PROC+14, RF1PROC+24 |
$$CLEARF^IVMPRECA | ZEM+3 |
ZPDPA^IVMPRECA | ZPD+2 |
ADD^VADPT | PID+132 |
DEM^VADPT | PID+132 |
OPD^VADPT | PID+132 |
ZIPIN^VAFADDR | PID+37, ZTA+18, ZGD+11, ZCT+23, ZEM+13 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(11 - [#11] | PID+119 |
^DIC(13 - [#13] | PID+120 |
^DIC(5 - [#5] | PID+31, PID+46, PID+50, PID+61, ZTA+17, ZTA+22, ZGD+10, ZCT+22, ZEM+12 |
^DPT - [#2] | PID+126, RF1PROC+33, RF1PROC+35 |
^HL(779.004 - [#779.004] | CNTRCONV+2 |
^IVM(301.92 - [#301.92] | PID+133, ZTA+28, ZAV+7, ZGD+15, ZCT+28, ZEM+16, RF1PROC+27, RF1PROC+30 |
Name | Line Occurrences |
---|---|
$$ADDRCNV | RF1PROC+12 |
$$BAICONV | PID+41 |
$$CHKEMAIL | PID+112 |
$$CNTRCONV | PID+40, ZTA+21 |
$$CONVPH | PID+94 |
$$CONVPHAN | PID+68, PID+71, PID+75, PID+82, PID+85, PID+89, PID+99, PID+102, PID+106, PID+138 , PID+141, PID+145, ZTA+40, ZTA+42 |
$$EPCSRCC | RF1PROC+12 |
RF1PROC | RF1+7, RF1+9, RF1+10, RF1+12, RF1+13, RF1+14, RF1+15, RF1+17 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ADDRESS("CA" | PID+12, RF1PROC+26 |
>> ADDRESS("P" | PID+14 |
>> ADDRESS("R" | PID+15, RF1PROC+29 |
>> ADDRESS("VAB1" | PID+14 |
>> ADDRESS("VAB2" | PID+14 |
>> ADDRESS("VAB3" | PID+14 |
>> ADDRESS("VAB4" | PID+14 |
ADDRSRC | ADDRCNV~, ADDRCNV+2, ADDRCNV+3, ADDRCNV+4, ADDRCNV+5, ADDRCNV+6, ADDRCNV+7, ADDRCNV+8, ADDRCNV+9, ADDRCNV+10 , ADDRCNV+11, ADDRCNV+12 |
>> AUPFARY( | PID+12, PID+13, PID+15 |
BAISRC | BAICONV~, BAICONV+1, BAICONV+2, BAICONV+3, BAICONV+4, BAICONV+5 |
COMPPH1 | PID+1~, ZTA+1~ |
COMPPH2 | PID+1~, ZTA+1~ |
>> CONFADCT | PID+42 |
COUNTRY | PID+1~, PID+17*, PID+18, PID+40, ZTA+1~, ZTA+9*, ZTA+10, ZTA+21, CNTRCONV~, CNTRCONV+1 , CNTRCONV+2 |
>> DFN | PID+73, PID+77, PID+87, PID+91, PID+104, PID+108, PID+126, PID+143, PID+147, RF1+20 , RF1+25, RF1PROC+22, RF1PROC+23, RF1PROC+33, RF1PROC+35, RF1PROC+37 |
DHCPLST | PID+124~, PID+125*, PID+127*, PID+128, PID+129 |
>> DODSEG | PID+10, PID+56, PID+63, PID+123, PID+135 |
CHKEMAIL~, CHKEMAIL+1, CHKEMAIL+2 | |
>> EPCDEL( | RF1+5! |
>> EPCDEL("PHH" | RF1PROC+23* |
>> EPCFARY( | RF1PROC+37, RF1PROC+39 |
EPCSRC | EPCSRCC~, EPCSRCC+2, EPCSRCC+3, EPCSRCC+4, EPCSRCC+5, EPCSRCC+6, EPCSRCC+7 |
>> FORADDR | PID+18*, PID+30, PID+36, PID+38, PID+39, PID+45, PID+49, PID+59, ZTA+10*, ZTA+16 , ZTA+19, ZTA+20 |
>> HLECH | PID+17, PID+20, PID+24, PID+25, PID+52, PID+67, PID+70, PID+74, PID+81, PID+84 , PID+88, PID+94, PID+98, PID+101, PID+105, PID+111, PID+122, PID+137, PID+140, PID+144 , ZTA+9, ZTA+13, ZTA+38, ZTA+39, ZTA+41, ZGD+9, ZCT+19, ZEM+11 |
>> HLFS | ZTA+3, ZTA+5, ZTA+8, ZTA+36, ZAV+4, ZAV+5, ZGD+3, ZGD+5, ZGD+8, ZCT+7 , ZCT+8, ZCT+10, ZCT+18, ZEM+3, ZEM+4, ZEM+5, ZEM+7, ZEM+10, RF1+1, RF1PROC+2 , RF1PROC+6, RF1PROC+17, RF1PROC+26, RF1PROC+29, RF1PROC+33, RF1PROC+35 |
>> IVMADDR | PID+12*, PID+14*, PID+15*, PID+16, PID+17, PID+20, PID+24, ZTA+8*, ZTA+9, ZTA+13 , ZGD+8*, ZGD+9, ZCT+18*, ZCT+19, ZEM+10*, ZEM+11 |
>> IVMADFLG | PID+9*, PID+55*, PID+60*, PID+67*, PID+81*, PID+94*, PID+98*, PID+112*, PID+114, ZGD+1* , ZGD+5, ZGD+9*, ZCT+2*, ZCT+10, ZCT+19*, ZCT+24, ZEM+1*, ZEM+7, RF1+1* |
IVMATYP | ZAV+1~, ZAV+3*, ZAV+4*, ZAV+6 |
>> IVMCMAST | PID+34*, PID+46 |
IVMCNTRY | PID+1~, PID+70*, PID+71*, PID+72*, PID+73, PID+84*, PID+85*, PID+86*, PID+87, PID+101* , PID+102*, PID+103*, PID+104, PID+140*, PID+141*, PID+142*, PID+143 |
>> IVMDA | RF1+19 |
>> IVMDEMDA | PID+12, PID+13, PID+15, PID+133, ZTA+28, ZAV+7, ZGD+15, ZCT+28, ZEM+16, RF1PROC+27 , RF1PROC+30 |
>> IVMDHCP | PID+133*, PID+148, PID+149, ZTA+28*, ZTA+44, ZTA+45, ZTA+47, ZAV+7*, ZAV+8, ZGD+15* , ZGD+17, ZCT+28*, ZCT+32, ZCT+34, ZEM+16*, ZEM+17, ZEM+18, RF1PROC+27*, RF1PROC+28, RF1PROC+30* , RF1PROC+31, RF1PROC+33*, RF1PROC+35*, RF1PROC+38 |
IVMEPC | RF1PROC+1~, RF1PROC+10*, RF1PROC+11*, RF1PROC+12 |
IVMEXT | PID+1~, PID+74*, PID+75*, PID+76*, PID+77, PID+88*, PID+89*, PID+90*, PID+91, PID+105* , PID+106*, PID+107*, PID+108, PID+144*, PID+145*, PID+146*, PID+147 |
>> IVMFLD | PID+3*, PID+10, PID+20*, PID+22*, PID+24*, PID+25*, PID+26*, PID+27, PID+30*, PID+31* , PID+36*, PID+37*, PID+38*, PID+39*, PID+40*, PID+41*, PID+42*, PID+45*, PID+46*, PID+49* , PID+50*, PID+52*, PID+54*, PID+61*, PID+67*, PID+68*, PID+69*, PID+72, PID+76, PID+81* , PID+82*, PID+83*, PID+86, PID+90, PID+94*, PID+98*, PID+99*, PID+100*, PID+103, PID+107 , PID+111*, PID+112*, PID+115*, PID+116*, PID+118*, PID+119*, PID+120*, PID+122*, PID+129*, PID+137* , PID+138*, PID+139*, PID+142, PID+146, PID+148, PID+149, ZTA+5*, ZTA+13*, ZTA+14*, ZTA+15 , ZTA+16*, ZTA+17*, ZTA+18*, ZTA+19*, ZTA+20*, ZTA+21*, ZTA+22*, ZTA+23, ZTA+25*, ZTA+27* , ZTA+38*, ZTA+39*, ZTA+40*, ZTA+43*, ZTA+44, ZTA+45, ZTA+47, ZAV+2*, ZAV+5*, ZAV+8 , ZGD+5*, ZGD+9*, ZGD+10*, ZGD+11*, ZGD+13*, ZGD+17, ZCT+10*, ZCT+12*, ZCT+14*, ZCT+15* , ZCT+19*, ZCT+21*, ZCT+22*, ZCT+23*, ZCT+26*, ZCT+30*, ZCT+32, ZCT+34, ZEM+7*, ZEM+11* , ZEM+12*, ZEM+13*, ZEM+15*, ZEM+17, ZEM+18, RF1PROC+7*, RF1PROC+12*, RF1PROC+13, RF1PROC+17*, RF1PROC+18 , RF1PROC+23, RF1PROC+28, RF1PROC+31, RF1PROC+37, RF1PROC+38 |
IVMFNUM | PID+1~ |
IVMFVAL | PID+1~ |
IVMLST | PID+124~, PID+125*, PID+126*, PID+128 |
IVMPH | ZTA+35~, ZTA+41*, ZTA+42*, ZTA+43 |
>> IVMPHDFG | RF1PROC+21*, RF1PROC+22 |
IVMPHONE | ZTA+1~, ZTA+36*, ZTA+38, ZTA+39, ZTA+41 |
>> IVMPID( | PID+7, PID+115 |
>> IVMPID(12 | PID+61 |
>> IVMPID(22 | PID+122 |
>> IVMPIECE | PID+5*, PID+7, PID+20*, PID+22, PID+23, PID+29, PID+33, PID+34, PID+35, PID+38 , PID+39, PID+40, PID+41, PID+42, PID+44, PID+48, PID+51, PID+115, ZTA+2*, ZTA+3 , ZTA+5, ZTA+8, ZTA+12*, ZTA+13, ZTA+14, ZTA+16, ZTA+17, ZTA+18, ZTA+19, ZTA+20 , ZTA+21, ZTA+22, ZTA+36, ZTA+37*, ZTA+38, ZTA+39, ZGD+2*, ZGD+3, ZGD+5, ZGD+8* , ZGD+9, ZGD+10, ZGD+11, ZCT+3*, ZCT+6, ZCT+8, ZCT+10, ZCT+18*, ZCT+19, ZCT+22 , ZCT+23, ZEM+2*, ZEM+5, ZEM+7, ZEM+10*, ZEM+11, ZEM+12, ZEM+13, RF1+1*, RF1PROC+2 , RF1PROC+7*, RF1PROC+12 |
>> IVMPMAST | PID+33*, PID+61 |
>> IVMRACE | PID+123 |
>> IVMRACE(2 | PID+127 |
>> IVMRFDAT | RF1PROC+6*, RF1PROC+7 |
>> IVMRTN | RF1+19 |
>> IVMSEG | ZTA+3, ZTA+5, ZTA+8, ZTA+36, ZAV+4, ZAV+5, ZGD+3, ZGD+5, ZGD+8, ZCT+7 , ZCT+8, ZCT+10, ZCT+18, ZEM+3*, ZEM+4, ZEM+5, ZEM+7, ZEM+10, RF1+1, RF1PROC+2 , RF1PROC+6, RF1PROC+17 |
>> IVMSTPTR | PID+31*, PID+33, PID+34, PID+50 |
>> IVMTSTPT | ZTA+17*, ZTA+22 |
>> IVMXREF | PID+5, PID+10, PID+56, PID+63, PID+65, PID+79, PID+93, PID+96, PID+110, PID+115 , PID+116, PID+117, PID+120, PID+121, PID+123, PID+135, ZTA+2, ZTA+7, ZTA+25, ZTA+27 , ZTA+30, ZTA+34, ZTA+46, ZAV+6, ZGD+2, ZGD+7, ZGD+13, ZCT+3, ZCT+14, ZCT+17 , ZCT+26, ZCT+33, ZEM+2, ZEM+4, ZEM+9, ZEM+15, ZEM+17, RF1+1, RF1+7, RF1+9 , RF1+10, RF1+12, RF1+13, RF1+14, RF1+15, RF1+17, RF1+19, RF1PROC+4, RF1PROC+7, RF1PROC+11 , RF1PROC+15 |
NOPHUP | RF1+21~*, RF1+25 |
NOUPDT | RF1+21~*, RF1+22*, RF1+25 |
PH | CONVPH~, CONVPH+3, CONVPH+4*, CONVPH+5, CONVPH+6, CONVPHAN~, CONVPHAN+1*, CONVPHAN+2 |
>> RF1TYPE | RF1+1*, RF1+5, RF1+7, RF1+9, RF1+10, RF1+12, RF1+13, RF1+14, RF1+15, RF1+17 , RF1PROC+22, RF1PROC+26, RF1PROC+29, RF1PROC+33, RF1PROC+35, RF1PROC+37, RF1PROC+39, RF1PROC+40 |
>> TELECOM | PID+63 |
>> TELECOM("BPN" | PID+93, PID+94 |
>> TELECOM("NET" | PID+110, PID+111 |
>> TELECOM("ORN" | PID+96, PID+98, PID+101, PID+105 |
>> TELECOM("PRN" | PID+135, PID+137, PID+140, PID+144, RF1PROC+21 |
>> TELECOM("VACPN" | PID+65, PID+67, PID+70, PID+74 |
>> TELECOM("WPN" | PID+79, PID+81, PID+84, PID+88 |
U | PID+126, PID+127, PID+129 |
>> UPDAUPG( | ZCT+34* |
>> UPDAUPG("CA" | RF1PROC+28* |
>> UPDAUPG("RA" | RF1PROC+31* |
>> UPDAUPG("TA" | ZTA+47* |
>> UPDEPC | RF1+20 |
>> UPDEPC( | RF1PROC+37*, RF1PROC+39* |
>> UPDEPC("SAD" | RF1+22, RF1PROC+40* |
UPPHN | RF1+24! |
>> X | PID+37*, ZTA+18*, ZGD+11*, ZCT+23*, ZEM+13* |
XVAL | PID+124~, PID+125*, PID+126*, PID+127*, PID+129* |
>> Y | PID+133, ZTA+28, ZAV+7, ZGD+15, ZCT+28, ZEM+16, RF1PROC+27, RF1PROC+30 |
ZCTTYP | ZCT+1~, ZCT+6*, ZCT+7, ZCT+34 |
>> ZEMADRUP( | ZEM+17* |