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,ZAVA)^IVMPREC6 ($$AUTOEPC,PID12,STORE)^IVMPREC9 ($$CLEARF,ZGDPA,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+131 |
| $$GET1^DIQ | RF1PROC+24, RF1PROC+25, RF1PROC+41 |
| $$FMDATE^HLFNC | PID+25, PID+52, PID+125, ZTA+27, ZCT+26, ZEM+15, RF1PROC+19 |
| $$FMNAME^HLFNC | ZCT+14 |
| $$AUTOADDR^IVMLDEM6 | RF1+26 |
| UPLOAD^IVMLDEM6 | PID+73, PID+77, PID+90, PID+94, PID+110, PID+114, PID+152, PID+156 |
| $$RF1CHK^IVMPREC6 | RF1+20 |
| ZAVA^IVMPREC6 | ZAV+2 |
| $$AUTOEPC^IVMPREC9 | RF1+21 |
| PID12^IVMPREC9 | PID+58 |
| STORE^IVMPREC9 | PID+123, PID+139, PID+160, PID+161, ZTA+47, ZTA+48, ZCT+24, ZCT+32, ZEM+17, ZEM+18 , RF1PROC+16, RF1PROC+26 |
| $$CLEARF^IVMPRECA | ZEM+3 |
| ZGDPA^IVMPRECA | ZGD+2 |
| ZPDPA^IVMPRECA | ZPD+2 |
| ADD^VADPT | PID+141 |
| DEM^VADPT | PID+141 |
| OPD^VADPT | PID+141 |
| ZIPIN^VAFADDR | PID+37, ZTA+18, ZCT+23, ZEM+13 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(11 - [#11] | PID+128 |
| ^DIC(13 - [#13] | PID+129 |
| ^DIC(5 - [#5] | PID+31, PID+46, PID+50, PID+61, ZTA+17, ZTA+22, ZCT+22, ZEM+12 |
| ^DPT - [#2] | PID+135, RF1PROC+35, RF1PROC+37, RF1PROC+39 |
| ^HL(779.004 - [#779.004] | CNTRCONV+2 |
| ^IVM(301.92 - [#301.92] | PID+142, ZTA+28, ZCT+28, ZEM+16, RF1PROC+29, RF1PROC+32 |
| Name | Line Occurrences |
|---|---|
| $$ADDRCNV | RF1PROC+14 |
| $$BAICONV | PID+41 |
| $$CHKEMAIL | PID+121 |
| $$CNTRCONV | PID+40, ZTA+21 |
| $$CONVPH | PID+100 |
| $$CONVPHAN | PID+68, PID+71, PID+75, PID+85, PID+88, PID+92, PID+105, PID+108, PID+112, PID+147 , PID+150, PID+154, ZTA+40, ZTA+42 |
| $$EPCSRCC | RF1PROC+14 |
| RF1PROC | RF1+7, RF1+9, RF1+10, RF1+11, RF1+13, RF1+14, RF1+15, RF1+16, RF1+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ADDRESS("CA" | PID+12, RF1PROC+28 |
| >> ADDRESS("P" | PID+14 |
| >> ADDRESS("R" | PID+15, RF1PROC+31 |
| >> 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, ADDRCNV+14 |
| >> 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+90, PID+94, PID+110, PID+114, PID+135, PID+152, PID+156, RF1+21 , RF1+26, RF1PROC+24, RF1PROC+25, RF1PROC+35, RF1PROC+37, RF1PROC+39, RF1PROC+41 |
| DHCPLST | PID+133~, PID+134*, PID+136*, PID+137, PID+138 |
| >> DODSEG | PID+10, PID+56, PID+63, PID+132, PID+144 |
| CHKEMAIL~, CHKEMAIL+1, CHKEMAIL+2 | |
| >> EPCDEL( | RF1+5! |
| >> EPCDEL("PHH" | RF1PROC+25* |
| >> EPCFARY( | RF1PROC+41, RF1PROC+43 |
| EPCSRC | EPCSRCC~, EPCSRCC+2, EPCSRCC+3, EPCSRCC+4, EPCSRCC+5, EPCSRCC+6, EPCSRCC+7, EPCSRCC+9 |
| >> 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+84, PID+87 , PID+91, PID+100, PID+104, PID+107, PID+111, PID+120, PID+131, PID+146, PID+149, PID+153 , ZTA+9, ZTA+13, ZTA+38, ZTA+39, ZTA+41, ZTA+46, ZCT+19, ZEM+11 |
| >> HLFS | ZTA+3, ZTA+5, ZTA+8, ZTA+36, 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+19, RF1PROC+28, RF1PROC+31, RF1PROC+35 , RF1PROC+37, RF1PROC+39 |
| >> IVMADDR | PID+12*, PID+14*, PID+15*, PID+16, PID+17, PID+20, PID+24, ZTA+8*, ZTA+9, ZTA+13 , ZCT+18*, ZCT+19, ZEM+10*, ZEM+11 |
| >> IVMADFLG | PID+9*, PID+55*, PID+60*, PID+67*, PID+84*, PID+100*, PID+104*, PID+121*, PID+123, ZCT+2* , ZCT+10, ZCT+19*, ZCT+24, ZEM+1*, ZEM+7, RF1+1* |
| >> IVMCMAST | PID+34*, PID+46 |
| IVMCNTRY | PID+1~, PID+70*, PID+71*, PID+72*, PID+73, PID+87*, PID+88*, PID+89*, PID+90, PID+107* , PID+108*, PID+109*, PID+110, PID+149*, PID+150*, PID+151*, PID+152 |
| >> IVMDA | RF1+20 |
| >> IVMDEMDA | PID+12, PID+13, PID+15, PID+142, ZTA+28, ZCT+28, ZEM+16, RF1PROC+29, RF1PROC+32 |
| >> IVMDHCP | PID+142*, PID+160, PID+161, ZTA+28*, ZTA+47, ZTA+48, ZTA+50, ZCT+28*, ZCT+32, ZCT+34 , ZEM+16*, ZEM+17, ZEM+18, RF1PROC+29*, RF1PROC+30, RF1PROC+32*, RF1PROC+33, RF1PROC+35*, RF1PROC+37*, RF1PROC+39* , RF1PROC+42 |
| IVMEPC | RF1PROC+1~, RF1PROC+10*, RF1PROC+13*, RF1PROC+14 |
| IVMEXT | PID+1~, PID+74*, PID+75*, PID+76*, PID+77, PID+80, PID+91*, PID+92*, PID+93*, PID+94 , PID+97, PID+111*, PID+112*, PID+113*, PID+114, PID+117, PID+153*, PID+154*, PID+155*, PID+156 , PID+159 |
| >> 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+79 , PID+80*, PID+84*, PID+85*, PID+86*, PID+89, PID+93, PID+96, PID+97*, PID+100*, PID+104* , PID+105*, PID+106*, PID+109, PID+113, PID+116, PID+117*, PID+120*, PID+121*, PID+124*, PID+125* , PID+127*, PID+128*, PID+129*, PID+131*, PID+138*, PID+146*, PID+147*, PID+148*, PID+151, PID+155 , PID+158, PID+159*, PID+160, PID+161, 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+45, ZTA+46*, ZTA+47, ZTA+48, ZTA+50, 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+14*, RF1PROC+15, RF1PROC+19* , RF1PROC+20, RF1PROC+25, RF1PROC+30, RF1PROC+33, RF1PROC+41, RF1PROC+42 |
| IVMFNUM | PID+1~ |
| IVMFVAL | PID+1~ |
| IVMLST | PID+133~, PID+134*, PID+135*, PID+137 |
| IVMPH | ZTA+35~, ZTA+41*, ZTA+42*, ZTA+43 |
| >> IVMPHDFG | RF1PROC+23*, RF1PROC+24 |
| IVMPHONE | ZTA+1~, ZTA+36*, ZTA+38, ZTA+39, ZTA+41, ZTA+46 |
| >> IVMPID( | PID+7, PID+124 |
| >> IVMPID(12 | PID+61 |
| >> IVMPID(22 | PID+131 |
| >> 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+124, 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, ZTA+46, 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+14 |
| >> IVMPMAST | PID+33*, PID+61 |
| >> IVMRACE | PID+132 |
| >> IVMRACE(2 | PID+136 |
| >> IVMRFDAT | RF1PROC+6*, RF1PROC+7 |
| >> IVMRTN | RF1+20 |
| >> IVMSEG | ZTA+3, ZTA+5, ZTA+8, ZTA+36, 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+19 |
| >> 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+82, PID+99, PID+102, PID+119, PID+124 , PID+125, PID+126, PID+129, PID+130, PID+132, PID+144, ZTA+2, ZTA+7, ZTA+25, ZTA+27 , ZTA+30, ZTA+34, ZTA+49, 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+11, RF1+13, RF1+14 , RF1+15, RF1+16, RF1+18, RF1+20, RF1PROC+4, RF1PROC+7, RF1PROC+13, RF1PROC+17 |
| NOPHUP | RF1+22~*, RF1+26 |
| NOUPDT | RF1+22~*, RF1+23*, RF1+26 |
| 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+11, RF1+13, RF1+14, RF1+15, RF1+16 , RF1+18, RF1PROC+24, RF1PROC+28, RF1PROC+31, RF1PROC+35, RF1PROC+37, RF1PROC+39, RF1PROC+41, RF1PROC+43, RF1PROC+44 |
| >> TELECOM | PID+63 |
| >> TELECOM("BPN" | PID+99, PID+100 |
| >> TELECOM("NET" | PID+119, PID+120 |
| >> TELECOM("ORN" | PID+102, PID+104, PID+107, PID+111 |
| >> TELECOM("PRN" | PID+144, PID+146, PID+149, PID+153, RF1PROC+23 |
| >> TELECOM("VACPN" | PID+65, PID+67, PID+70, PID+74 |
| >> TELECOM("WPN" | PID+82, PID+84, PID+87, PID+91 |
| U | PID+135, PID+136, PID+138 |
| >> UPDAUPG( | ZCT+34* |
| >> UPDAUPG("CA" | RF1PROC+30* |
| >> UPDAUPG("RA" | RF1PROC+33* |
| >> UPDAUPG("TA" | ZTA+50* |
| >> UPDEPC | RF1+21 |
| >> UPDEPC( | RF1PROC+41*, RF1PROC+43* |
| >> UPDEPC("SAD" | RF1+23, RF1PROC+44* |
| UPPHN | RF1+25! |
| >> X | PID+37*, ZTA+18*, ZCT+23*, ZEM+13* |
| XVAL | PID+133~, PID+134*, PID+135*, PID+136*, PID+138* |
| >> Y | PID+142, ZTA+28, ZCT+28, ZEM+16, RF1PROC+29, RF1PROC+32 |
| ZCTTYP | ZCT+1~, ZCT+6*, ZCT+7, ZCT+34 |
| >> ZEMADRUP( | ZEM+17* |