Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IVMPREC8

Package: Income Verification Match

Routine: IVMPREC8


Information

IVMPREC8 ;ALB/KCL,BRM,PJR,CKN,TDM,PWC,LBD,DPR,KUM - PROCESS INCOMING (Z05 EVENT TYPE) HL7 MESSAGES (CON'T) ;02 NOV 2018 8:56 AM

Source Information

Source file <IVMPREC8.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Income Verification Match 5 $$AUTOADDR^IVMLDEM6  $$AUTODOD^IVMLDEMD  $$RF1CHK^IVMPREC6  ($$AUTOEPC,$$AUTORINC,STORE)^IVMPREC9  $$CLEARF^IVMPRECA  
Registration 3 $$CODE2PTR^DGUTL4  (ADD,DEM,OPD)^VADPT  ZIPIN^VAFADDR  
Health Level Seven 1 ($$FMDATE,$$FMNAME)^HLFNC  
VA FileMan 1 ($$GET1,GETS)^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Income Verification Match 3 IVM273A  IVMPREC6  IVMPRECA  

Entry Points

Name Comments DBIA/ICR reference
PID ;-compare PID fields with DHCP fields
ZPD ; - compare ZPD fields with DHCP fields
DODCK(DFN) ;this will check if Date of Death information needs to be uploaded or not.
ZTA ; -compare ZTA fields with DHCP fields
ZAV ; compare ZAV with DHCP
ZGD ; - compare ZGD with DHCP
ZCT ; - compare ZCT with DHCP
ZEM ; - compare ZEM fields with DHCP
RF1 ; - compare RF1 segment fields with DHCP
RF1PROC ;
ADDRCNV(ADDRSRC) ;convert Addr Source from HL7 to DHCP format
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

External References

Name Field # of Occurrence
$$CODE2PTR^DGUTL4 PID+109
$$GET1^DIQ RF1PROC+26, RF1PROC+27
GETS^DIQ DODCK+19
$$FMDATE^HLFNC PID+34, PID+61, PID+99, ZPD+14, ZTA+31, ZGD+16, ZCT+24, ZEM+18, RF1PROC+18
$$FMNAME^HLFNC ZPD+11, ZCT+13
$$AUTOADDR^IVMLDEM6 RF1+31
$$AUTODOD^IVMLDEMD ZPD+25
$$RF1CHK^IVMPREC6 RF1+19
$$AUTOEPC^IVMPREC9 RF1+20
$$AUTORINC^IVMPREC9 ZPD+24
STORE^IVMPREC9 PID+92, PID+118, PID+134, PID+137, ZPD+20, ZPD+22, ZTA+40, ZTA+42, ZAV+10, ZGD+22
, ZCT+22, ZCT+30, ZEM+24, ZEM+25, RF1PROC+15, RF1PROC+28
$$CLEARF^IVMPRECA ZCT+4, ZEM+3
ADD^VADPT PID+121
DEM^VADPT PID+121
OPD^VADPT PID+121
ZIPIN^VAFADDR PID+46, ZTA+20, ZGD+13, ZCT+20, ZEM+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(11 - [#11] PID+104
^DIC(13 - [#13] PID+106
^DIC(5 - [#5] PID+40, PID+55, PID+59, PID+71, ZTA+19, ZTA+24, ZGD+12, ZCT+19, ZEM+14
^DPT - [#2] PID+114, RF1PROC+42, RF1PROC+43
^HL(779.004 - [#779.004] CNTRCONV+2
^IVM(301.92 - [#301.92] PID+124, ZPD+17, ZTA+34, ZAV+8, ZGD+19, ZCT+27, ZEM+21, RF1PROC+33, RF1PROC+37

Label References

Name Line Occurrences
$$ADDRCNV RF1PROC+13
$$BAICONV PID+50
$$CHKEMAIL PID+90
$$CNTRCONV PID+49, ZTA+23
$$CONVPH PID+77, PID+80, PID+83, PID+86, PID+133, ZTA+39
$$DODCK ZPD+4
$$EPCSRCC RF1PROC+13
RF1PROC RF1+8, RF1+10, RF1+11, RF1+13, RF1+14, RF1+15, RF1+16

Naked Globals

Name Field # of Occurrence
^(1 PID+124, ZPD+17, ZTA+34, ZAV+8, ZGD+19, ZCT+27, ZEM+21, RF1PROC+33, RF1PROC+37

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADDRESS("CA" PID+21, RF1PROC+31
>> ADDRESS("P" PID+23
>> ADDRESS("R" PID+24, RF1PROC+36
>> ADDRESS("VAB1" PID+23
>> ADDRESS("VAB2" PID+23
>> ADDRESS("VAB3" PID+23
>> ADDRESS("VAB4" PID+23
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+21, PID+22, PID+24
BAISRC BAICONV~, BAICONV+1, BAICONV+2, BAICONV+3, BAICONV+4, BAICONV+5
>> CKDEL DODCK+16*
COMPPH1 PID+1~, PID+133*, PID+134, ZTA+1~, ZTA+39*, ZTA+40
COMPPH2 PID+1~, PID+133*, PID+134, ZTA+1~, ZTA+39*, ZTA+40
>> CONFADCT PID+51
COUNTRY PID+1~, PID+26*, PID+27, PID+49, ZTA+1~, ZTA+11*, ZTA+12, ZTA+23, CNTRCONV~, CNTRCONV+1
, CNTRCONV+2
DFN PID+114, ZPD+4, ZPD+24, ZPD+25, DODCK~, DODCK+19, DODCK+20, RF1+20, RF1+31, RF1PROC+26
, RF1PROC+27, RF1PROC+42, RF1PROC+43
DHCPLST PID+112~, PID+113*, PID+115*, PID+116, PID+117
>> DOD DODCK+20*, DODCK+21, DODCK+22, DODCK+23
DODARRAY DODCK+14~
DODARRAY(2 DODCK+20
>> DODSEG PID+11, PID+66, PID+74, PID+111, PID+129
EMAIL CHKEMAIL~, CHKEMAIL+1, CHKEMAIL+2
>> EPCDEL( RF1+5!
>> EPCDEL("PHH" RF1PROC+27*
>> EPCFARY( RF1PROC+45
EPCSRC EPCSRCC~, EPCSRCC+2, EPCSRCC+3, EPCSRCC+4, EPCSRCC+5, EPCSRCC+6, EPCSRCC+7
>> FORADDR PID+27*, PID+39, PID+45, PID+47, PID+48, PID+54, PID+58, PID+69, ZTA+12*, ZTA+18
, ZTA+21, ZTA+22
>> HLECH PID+26, PID+29, PID+33, PID+34, PID+61, PID+77, PID+80, PID+83, PID+86, PID+89
, PID+109, PID+130, ZTA+11, ZTA+15, ZGD+11, ZCT+18, ZEM+13
>> HLFS ZPD+5, ZPD+8, ZTA+3, ZTA+6, ZTA+10, ZAV+4, ZAV+5, ZGD+3, ZGD+6, ZGD+10
, ZCT+4, ZCT+6, ZCT+7, ZCT+10, ZCT+17, ZEM+3, ZEM+4, ZEM+5, ZEM+8, ZEM+12
, RF1+1, RF1PROC+2, RF1PROC+6, RF1PROC+18, RF1PROC+31, RF1PROC+36, RF1PROC+42, RF1PROC+43
>> IVMADDR PID+21*, PID+23*, PID+24*, PID+25, PID+26, PID+29, PID+33, ZTA+10*, ZTA+11, ZTA+15
, ZGD+10*, ZGD+11, ZCT+17*, ZCT+18, ZEM+12*, ZEM+13
>> IVMADFLG PID+10*, PID+64*, PID+70*, PID+77*, PID+80*, PID+83*, PID+86*, PID+90*, PID+92, ZGD+1*
, ZGD+6, ZGD+11*, ZCT+2*, ZCT+10, ZCT+18*, ZCT+22, ZEM+1*, ZEM+8, RF1+1*
IVMATYP ZAV+1~, ZAV+3*, ZAV+4*, ZAV+6
>> IVMCMAST PID+43*, PID+55
>> IVMDA RF1+19
>> IVMDEMDA PID+21, PID+22, PID+24, PID+124, ZPD+17, ZTA+34, ZAV+8, ZGD+19, ZCT+27, ZEM+21
, RF1PROC+33, RF1PROC+37
>> IVMDHCP PID+124*, PID+133, PID+137, ZPD+17*, ZPD+20, ZTA+34*, ZTA+39, ZTA+42, ZTA+45, ZAV+8*
, ZAV+10, ZGD+19*, ZGD+22, ZCT+27*, ZCT+30, ZCT+33, ZEM+21*, ZEM+24, ZEM+25, RF1PROC+33*
, RF1PROC+34, RF1PROC+37*, RF1PROC+38, RF1PROC+42*, RF1PROC+43*, RF1PROC+44
IVMEPC RF1PROC+1~, RF1PROC+10*, RF1PROC+11*, RF1PROC+13
>> IVMFLD PID+3*, PID+11, PID+29*, PID+31*, PID+33*, PID+34*, PID+35*, PID+36, PID+39*, PID+40*
, PID+45*, PID+46*, PID+47*, PID+48*, PID+49*, PID+50*, PID+51*, PID+54*, PID+55*, PID+58*
, PID+59*, PID+61*, PID+63*, PID+71*, PID+77*, PID+80*, PID+83*, PID+86*, PID+89*, PID+90*
, PID+96*, PID+99*, PID+103*, PID+104*, PID+106*, PID+109*, PID+117*, PID+130*, PID+131, PID+133
, PID+137, ZPD+8*, ZPD+11*, ZPD+14*, ZPD+20, ZTA+6*, ZTA+15*, ZTA+16*, ZTA+17, ZTA+18*
, ZTA+19*, ZTA+20*, ZTA+21*, ZTA+22*, ZTA+23*, ZTA+24*, ZTA+25, ZTA+28*, ZTA+31*, ZTA+39
, ZTA+42, ZTA+45, ZAV+2*, ZAV+5*, ZAV+10, ZGD+6*, ZGD+11*, ZGD+12*, ZGD+13*, ZGD+16*
, ZGD+22, ZCT+10*, ZCT+13*, ZCT+18*, ZCT+19*, ZCT+20*, ZCT+24*, ZCT+30, ZCT+33, ZEM+8*
, ZEM+13*, ZEM+14*, ZEM+15*, ZEM+18*, ZEM+24, ZEM+25, RF1PROC+7*, RF1PROC+13*, RF1PROC+14, RF1PROC+18*
, RF1PROC+19, RF1PROC+27, RF1PROC+34, RF1PROC+38, RF1PROC+44
IVMLST PID+112~, PID+113*, PID+114*, PID+116
>> IVMPHDFG RF1PROC+25*, RF1PROC+26
>> IVMPID( PID+7, PID+96
>> IVMPID(12 PID+71
>> IVMPID(22 PID+109
>> IVMPIECE PID+5*, PID+7, PID+29*, PID+31, PID+32, PID+38, PID+42, PID+43, PID+44, PID+47
, PID+48, PID+49, PID+50, PID+51, PID+53, PID+57, PID+60, PID+96, ZPD+3*, ZPD+5
, ZPD+8, ZPD+21, ZTA+2*, ZTA+3, ZTA+6, ZTA+10, ZTA+14*, ZTA+15, ZTA+16, ZTA+18
, ZTA+19, ZTA+20, ZTA+21, ZTA+22, ZTA+23, ZTA+24, ZGD+2*, ZGD+3, ZGD+6, ZGD+10*
, ZGD+11, ZGD+12, ZGD+13, ZCT+3*, ZCT+5, ZCT+7, ZCT+10, ZCT+17*, ZCT+18, ZCT+19
, ZCT+20, ZEM+2*, ZEM+5, ZEM+8, ZEM+12*, ZEM+13, ZEM+14, ZEM+15, RF1+1*, RF1PROC+2
, RF1PROC+7*, RF1PROC+13
>> IVMPMAST PID+42*, PID+71
>> IVMRACE PID+111
>> IVMRACE(2 PID+115
>> IVMRFDAT RF1PROC+6*, RF1PROC+7
>> IVMRTN RF1+19
>> IVMSEG ZPD+5, ZPD+8, ZPD+21, DODCK+18, DODCK+22, DODCK+23, ZTA+3, ZTA+6, ZTA+10, ZAV+4
, ZAV+5, ZGD+3, ZGD+6, ZGD+10, ZCT+4*, ZCT+6, ZCT+7, ZCT+10, ZCT+17, ZEM+3*
, ZEM+4, ZEM+5, ZEM+8, ZEM+12, RF1+1, RF1PROC+2, RF1PROC+6, RF1PROC+18
>> IVMSTPTR PID+40*, PID+42, PID+43, PID+59
>> IVMTSTPT ZTA+19*, ZTA+24
>> IVMXREF PID+5, PID+11, PID+66, PID+74, PID+76, PID+79, PID+82, PID+85, PID+88, PID+96
, PID+99, PID+102, PID+106, PID+108, PID+111, PID+129, ZPD+3, ZPD+4, ZPD+11, ZPD+14
, ZPD+22, ZPD+24, ZPD+25, ZTA+2, ZTA+9, ZTA+28, ZTA+31, ZTA+38, ZTA+44, ZAV+6
, ZGD+2, ZGD+9, ZGD+16, ZCT+3, ZCT+13, ZCT+16, ZCT+24, ZCT+32, ZEM+2, ZEM+4
, ZEM+11, ZEM+18, ZEM+24, RF1+1, RF1+8, RF1+10, RF1+11, RF1+13, RF1+14, RF1+15
, RF1+16, RF1+19, RF1PROC+4, RF1PROC+7, RF1PROC+11, RF1PROC+16
NOPHUP RF1+21~*, RF1+31
NOUPDT RF1+21~*, RF1+22*, RF1+31
PH CONVPH~, CONVPH+3, CONVPH+4*, CONVPH+5, CONVPH+6
QUIT DODCK+14~, DODCK+16*, DODCK+22*, DODCK+23*, DODCK+25
>> RF1TYPE RF1+1*, RF1+5, RF1+8, RF1+10, RF1+11, RF1+13, RF1+14, RF1+15, RF1+16, RF1PROC+26
, RF1PROC+31, RF1PROC+36, RF1PROC+42, RF1PROC+43, RF1PROC+45, RF1PROC+46
STFLG ZPD+1~, ZPD+2*, ZPD+20*, ZPD+24
>> TELECOM PID+74
>> TELECOM("BPN" PID+82, PID+83
>> TELECOM("NET" PID+88, PID+89
>> TELECOM("ORN" PID+85, PID+86
>> TELECOM("PRN" PID+129, PID+130, RF1PROC+25
>> TELECOM("VACPN" PID+76, PID+77
>> TELECOM("WPN" PID+79, PID+80
U PID+114, PID+115, PID+117
>> UPDAUPG( ZCT+33*
>> UPDAUPG("CA" RF1PROC+34*
>> UPDAUPG("RA" RF1PROC+38*
>> UPDAUPG("TA" ZTA+45*
>> UPDEPC RF1+20
>> UPDEPC( RF1PROC+45*
>> UPDEPC("SAD" RF1+22, RF1PROC+46*
UPPHN PID+132!, PID+134*, RF1+30!
>> X PID+46*, ZTA+20*, ZGD+13*, ZCT+20*, ZEM+15*
XVAL PID+112~, PID+113*, PID+114*, PID+115*, PID+117*
>> Y PID+124, ZPD+17, ZTA+34, ZAV+8, ZGD+19, ZCT+27, ZEM+21, RF1PROC+33, RF1PROC+37
ZCTTYP ZCT+1~, ZCT+5*, ZCT+6, ZCT+33
>> ZEMADRUP( ZEM+24*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All