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: IVMPRECA

Package: Income Verification Match

Routine: IVMPRECA


Information

IVMPRECA ;ALB/KCL,BRM,PJR,RGL,CKN,TDM,KUM - DEMOGRAPHICS MESSAGE CONSISTENCY CHECK ;7/06/24 11:16AM

Source Information

Source file <IVMPRECA.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Income Verification Match 6 $$AUTODOD^IVMLDEMD  ACK^IVMPREC  BLDPID^IVMPREC6  ($$CHKEMAIL,$$CNTRCONV)^IVMPREC8  ($$AUTOLANG,$$AUTORINC,$$LANGCK,STORE)^IVMPREC9  ($$MATCH,PARSPID3)^IVMUFNC  
Registration 3 $$CODE2PTR^DGUTL4  DEM^VADPT  ZIPIN^VAFADDR  
Kernel 2 $$FIPSCHK^XIPUTIL  $$NOW^XLFDT  
VA FileMan 2 $$FIND1^DIC  GETS^DIQ  
Health Level Seven 1 ($$FMDATE,$$FMNAME)^HLFNC  

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: 6

Package Total Caller Graph
Income Verification Match 4 IVMCMC  IVMPREC3  IVMPREC6  IVMPREC8  
Enrollment Application System 1 EASPREC6  
Registration 1 DGENUPL  

Entry Points

Name Comments DBIA/ICR reference
EN ; - Entry point to create temp array and perform msg consistency checks
ENQ ; - send acknowledgement (ACK) 'AE' msg to the IVM Center
ADDRCHK ; - validate address fields sent by IVM Center
NEXT ; - get the next HL7 segment in the message from HL7 Transmission (#772) file
PID10 ; Perform consistency checks for seq. 10
; Get all Race data from seq. 10 of PID segment
PID11 ; Perform consistency check for seq. 11
PID13 ; Perform consistency checks for seq. 13
CLEARF(NODE,DEL,IGNORE) ;
; Input: NODE - SEGMENT/SEQ.
; DEL - Delimiter (optional - default is ^)
; IGNORE - String of seq # to avoid (optional)
ZPDPA ; compare ZPD with DHCP
; IVM*2.0*215 - Moved ZPD tag from IVMPREC8 and renamed it to ZPDPA tag to fix size error
; ZPD tag in IVMPREC8 now calls ZPDPA
DODCK(DFN) ;this will check if Date of Death needs to be uploaded or not.
; IVM*2.0*215 - Moved DODCK tag from IVMPREC8 to fix size error

External References

Name Field # of Occurrence
$$CODE2PTR^DGUTL4 PID10+20, PID10+21
$$FIND1^DIC EN+78
GETS^DIQ DODCK+20
$$FMDATE^HLFNC EN+50, EN+74, ZPDPA+15
$$FMNAME^HLFNC ZPDPA+18
$$AUTODOD^IVMLDEMD ZPDPA+28
ACK^IVMPREC ENQ+1
BLDPID^IVMPREC6 EN+17
$$CHKEMAIL^IVMPREC8 PID13+18
$$CNTRCONV^IVMPREC8 ADDRCHK+10
$$AUTOLANG^IVMPREC9 ZPDPA+30
$$AUTORINC^IVMPREC9 ZPDPA+27
$$LANGCK^IVMPREC9 ZPDPA+8
STORE^IVMPREC9 ZPDPA+24, ZPDPA+26
$$MATCH^IVMUFNC EN+46
PARSPID3^IVMUFNC EN+43
DEM^VADPT ZPDPA+21
ZIPIN^VAFADDR ADDRCHK+37
$$FIPSCHK^XIPUTIL ADDRCHK+35
$$NOW^XLFDT EN+74

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DI(.85 - [#.85] FIND1^DIC
^DPT - [#2] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(10.2 - [#10.2] EN+61
^DIC(13 - [#13] EN+58
^DIC(5 - [#5] ADDRCHK+29, ADDRCHK+31
^DPT - [#2] EN+74
^IVM(301.92 - [#301.92] ZPDPA+23
^TMP($J NEXT+1

Label References

Name Line Occurrences
$$CLEARF EN+22, EN+23
$$DODCK ZPDPA+6
ADDRCHK PID11+29
ENQ EN+11, EN+25, EN+29, EN+31, EN+39, EN+46, EN+50, EN+52, EN+55, EN+56
, EN+58, EN+61, EN+62, EN+70, EN+74, EN+78, EN+83, EN+84, EN+85
NEXT EN+11, EN+15, EN+29, EN+34, EN+36
PID10 EN+68
PID11 EN+67
PID13 EN+69

Naked Globals

Name Field # of Occurrence
^( NEXT+1
^(1 ZPDPA+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADDRESS PID11+28
>> ADDRESS( PID11+10*, PID11+21*, PID11+29
>> ADDRESS("CA" PID11+13*, PID11+23*
ADDRTYPE EN+3~, ADDRCHK+8, ADDRCHK+21, ADDRCHK+22, ADDRCHK+23, ADDRCHK+25, ADDRCHK+30, ADDRCHK+36, ADDRCHK+37, PID11+6*
, PID11+7, PID11+9, PID11+10, PID11+12, PID11+14, PID11+17*, PID11+18, PID11+20, PID11+21, PID11+22
, PID11+24, PID11+29*
ADDSEQ EN+3~, PID11+4*, PID11+5, PID11+6, PID11+10, PID11+13
>> CKDEL DODCK+17*
CNTR EN+3~, EN+12*, EN+16*, EN+19*, EN+20, EN+21, EN+22, EN+23, EN+24
CNTR2 EN+3~, EN+21*, EN+22
>> CNTRY ADDRCHK+9*, ADDRCHK+10, ADDRCHK+11
COMMTYPE EN+3~, PID13+15*, PID13+16, PID13+17
COMP EN+3~
>> CONFADCT PID11+1*, PID11+14*, PID11+15, PID11+24*, PID11+25
>> CONFADCT( PID11+15*, PID11+25*
DEL CLEARF~, CLEARF+5*, CLEARF+6, CLEARF+8
DFN EN+2~, EN+44*, EN+46, EN+47, EN+74, ZPDPA+6, ZPDPA+8, ZPDPA+27, ZPDPA+28, ZPDPA+30
, DODCK~, DODCK+20, DODCK+21
>> DOD DODCK+21*, DODCK+22, DODCK+23, DODCK+24
DODARRAY DODCK+15~
DODARRAY(2 DODCK+21
>> DODSEG EN+7*, EN+28*, EN+66
DT EN+50
>> ERRMSG EN+46
>> FORFLG ADDRCHK+11*, ADDRCHK+16, ADDRCHK+17, ADDRCHK+18, ADDRCHK+28
>> GUARSEG EN+8*, EN+27*, EN+66
>> HLECH EN+22, EN+23, EN+61, ADDRCHK+9, ADDRCHK+12, ADDRCHK+13, ADDRCHK+16, ADDRCHK+17, ADDRCHK+19, ADDRCHK+21
, ADDRCHK+22, ADDRCHK+23, ADDRCHK+25, ADDRCHK+29, ADDRCHK+37, PID10+8, PID10+12, PID10+13, PID11+6, PID11+17
, PID13+7, PID13+8, PID13+10, PID13+11, PID13+17, ZPDPA+18
>> HLERR EN+11*, EN+25*, EN+29*, EN+31*, EN+39*, EN+46*, EN+50*, EN+52*, EN+56*, EN+59*
, EN+62*, EN+67, EN+68, EN+70, EN+74*, EN+78*, EN+83*, EN+84*, EN+85*, ENQ+1
, ADDRCHK+9*, ADDRCHK+10*, ADDRCHK+12*, ADDRCHK+13*, ADDRCHK+16*, ADDRCHK+17*, ADDRCHK+18, ADDRCHK+20*, ADDRCHK+21*, ADDRCHK+22*
, ADDRCHK+23*, ADDRCHK+25*, ADDRCHK+28, ADDRCHK+30*, ADDRCHK+31, ADDRCHK+36*, ADDRCHK+37*, PID10+6, PID10+9*, PID10+12*
, PID10+14*, PID10+16, PID10+19, PID10+22*, PID11+4, PID11+5*, PID11+7*, PID11+16*, PID11+18*, PID11+26
, PID11+28*, PID11+29, PID13+5, PID13+7*, PID13+10*, PID13+12, PID13+15, PID13+18*
HLERRDEF ADDRCHK+1~, ADDRCHK+8*, ADDRCHK+9, ADDRCHK+10, ADDRCHK+12, ADDRCHK+13, ADDRCHK+16, ADDRCHK+17, ADDRCHK+20
>> HLFS EN+12, EN+26, EN+27, EN+28, EN+32, EN+40, EN+74, EN+76, EN+81, EN+82
, CLEARF+5, ZPDPA+10, ZPDPA+12
>> HLQ EN+24, EN+83, EN+85, CLEARF+8
I EN+14*, CLEARF+4~, CLEARF+6*, CLEARF+7, CLEARF+8
>> ICN EN+44*, EN+46
IGNORE CLEARF~, CLEARF+7
>> IVMALADT( PID11+9, PID11+10, PID11+12, PID11+14, PID11+20, PID11+21, PID11+22, PID11+24
IVMCNTY EN+2~, ADDRCHK+19*, ADDRCHK+20, ADDRCHK+31, ADDRCHK+35
IVMCR EN+2~
>> IVMDA EN+6
>> IVMDEMDA ZPDPA+23
>> IVMDFN EN+47*
>> IVMDHCP ZPDPA+23*, ZPDPA+24
IVMEG EN+2~
IVMFLAG EN+2~
IVMFLD EN+2~, ZPDPA+12*, ZPDPA+15*, ZPDPA+18*, ZPDPA+24
IVMNUM EN+2~, EN+6*, NEXT+1*
>> IVMPID EN+17
>> IVMPID( EN+19, EN+20, EN+21, EN+22*, EN+23*, EN+24*
>> IVMPID(10 PID10+4, PID10+5, PID10+6, PID10+7, PID10+8, PID10+10, PID10+11, PID10+12, PID10+13, PID10+15
>> IVMPID(11 PID11+2, PID11+3, PID11+4, PID11+5, PID11+6, PID11+10, PID11+13, PID11+16, PID11+17, PID11+21
, PID11+23
>> IVMPID(13 PID13+3, PID13+4, PID13+5, PID13+6, PID13+7, PID13+8, PID13+9, PID13+10, PID13+11
>> IVMPID(16 EN+55
>> IVMPID(17 EN+58
>> IVMPID(22 EN+61
>> IVMPID(3 EN+43
>> IVMPID(7 EN+50
>> IVMPID(8 EN+52
>> IVMPIECE ZPDPA+5*, ZPDPA+10, ZPDPA+12, ZPDPA+25
IVMRACE EN+5!
IVMRACE(1 PID10+10*, PID10+15*, PID10+19, PID10+23
IVMRACE(2 PID10+23*
>> IVMRTN NEXT+1
IVMSEG EN+2~, EN+35*, ZPDPA+10, ZPDPA+12, ZPDPA+25, DODCK+19, DODCK+23, DODCK+24
IVMSTPTR EN+2~, ADDRCHK+29*, ADDRCHK+30, ADDRCHK+31, ADDRCHK+33
IVMSTR EN+2~, EN+11, EN+12, EN+15, EN+16, EN+25, EN+26, EN+29, EN+31, EN+32
, EN+35, EN+39, EN+40, NEXT+1*
IVMSTR("ZGD" EN+40*, EN+81, EN+82
IVMSTR("ZPD" EN+26*, EN+27, EN+28, EN+74, EN+76
IVMSTR("ZTA" EN+32*
>> IVMXREF ZPDPA+5, ZPDPA+6, ZPDPA+8, ZPDPA+15, ZPDPA+18, ZPDPA+26, ZPDPA+27, ZPDPA+28, ZPDPA+30
MULTDONE EN+4~
NODE CLEARF~, CLEARF+6, CLEARF+8*, CLEARF+9
NOPID EN+3~, EN+12*, EN+14, EN+15*
PID3ARRY EN+3~
PID3ARY EN+43, EN+45!
PID3ARY("NI" EN+44
PID3ARY("PI" EN+44
>> PIDSTR EN+17
>> PIDSTR( EN+12*, EN+16*
QUIT DODCK+15~, DODCK+17*, DODCK+23*, DODCK+24*, DODCK+26
RACEDA PID10+2~, PID10+20*, PID10+21*, PID10+22, PID10+23
RACEFLG PID10+2~, PID10+3*, PID10+6, PID10+7*, PID10+11*, PID10+18
RACESQ PID10+2~, PID10+6*, PID10+7, PID10+8, PID10+10
RACEVAL PID10+2~, PID10+8*, PID10+9, PID10+10, PID10+13*, PID10+14, PID10+15, PID10+19*, PID10+20, PID10+21
, PID10+23
STFIPS ADDRCHK+32~, ADDRCHK+33*, ADDRCHK+34*, ADDRCHK+35
STFLG ZPDPA+3~, ZPDPA+4*, ZPDPA+24*, ZPDPA+27
TCFLG EN+3~, PID13+2*, PID13+5, PID13+6*, PID13+9*, PID13+14
>> TELECOM( PID13+8*, PID13+11*, PID13+15, PID13+17
TELESEQ EN+3~, PID13+5*, PID13+6, PID13+7, PID13+8
TMPARRY EN+3~, EN+43, EN+45!
TMPARRY(3 EN+43*
X EN+2~, EN+50*, EN+52*, EN+55*, EN+58*, EN+61*, EN+74*, EN+76*, EN+77*, EN+78
, EN+82*, EN+83, EN+84, EN+85, ADDRCHK+9, ADDRCHK+12, ADDRCHK+13, ADDRCHK+16, ADDRCHK+17, ADDRCHK+19
, ADDRCHK+21, ADDRCHK+22, ADDRCHK+23, ADDRCHK+25, ADDRCHK+29, ADDRCHK+37*, PID11+29*, PID13+17*, PID13+18
>> Y ZPDPA+23
ZGD3 EN+80~, EN+81*, EN+85
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