IVMPRECA ;ALB/KCL,BRM,PJR,RGL,CKN,TDM,KUM - DEMOGRAPHICS MESSAGE CONSISTENCY CHECK ;1/06/18 11:16AM
Source file <IVMPRECA.m>
Package | Total | Call Graph |
---|---|---|
Income Verification Match | 4 | ACK^IVMPREC BLDPID^IVMPREC6 ($$CHKEMAIL,$$CNTRCONV)^IVMPREC8 ($$MATCH,PARSPID3)^IVMUFNC |
Kernel | 2 | $$FIPSCHK^XIPUTIL $$NOW^XLFDT |
Registration | 2 | $$CODE2PTR^DGUTL4 ZIPIN^VAFADDR |
Health Level Seven | 1 | $$FMDATE^HLFNC |
VA FileMan | 1 | $$FIND1^DIC |
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 | IVMCMC IVMPREC3 IVMPREC6 IVMPREC8 |
Enrollment Application System | 1 | EASPREC6 |
Registration | 1 | DGENUPL |
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) |
Name | Field # of Occurrence |
---|---|
$$CODE2PTR^DGUTL4 | PID10+20, PID10+21 |
$$FIND1^DIC | EN+78 |
$$FMDATE^HLFNC | EN+50, EN+74 |
ACK^IVMPREC | ENQ+1 |
BLDPID^IVMPREC6 | EN+17 |
$$CHKEMAIL^IVMPREC8 | PID13+18 |
$$CNTRCONV^IVMPREC8 | ADDRCHK+10 |
$$MATCH^IVMUFNC | EN+46 |
PARSPID3^IVMUFNC | EN+43 |
ZIPIN^VAFADDR | ADDRCHK+37 |
$$FIPSCHK^XIPUTIL | ADDRCHK+35 |
$$NOW^XLFDT | EN+74 |
FileNo | Call Tags |
---|---|
^DI(.85 - [#.85] | FIND1^DIC |
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 |
^TMP($J | NEXT+1 |
Name | Field # of Occurrence |
---|---|
^( | NEXT+1 |
>> | 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 |
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, PID13+19 |
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 |
>> 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, PID13+19 |
>> 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*, PID13+19* |
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 |
>> 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 |
>> IVMDFN | EN+47* |
IVMEG | EN+2~ |
IVMFLAG | EN+2~ |
IVMFLD | EN+2~ |
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 |
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* |
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* |
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* |
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 |
TCFLG | EN+3~, PID13+2*, PID13+5, PID13+6*, PID13+9*, PID13+14 |
>> TELECOM( | PID13+8*, PID13+11*, PID13+15, PID13+17, PID13+19 |
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, PID13+19* |
ZGD3 | EN+80~, EN+81*, EN+85 |