RGADTP1 ;BIR/DLR-ADT PROCESSOR TO RETRIGGER A08 or A04 MESSAGES WITH AL/AL (COMMIT/APPLICATION) ACKNOWLEDGEMENTS - CONTINUED ;7/19/21 12:43
Source file <RGADTP1.m>
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 |
---|---|---|
Master Patient Index VistA | 3 | MPIFA24 MPIFA37 MPIFA43 |
Clinical Information Resource Network | 1 | RGADTP |
Name | Comments | DBIA/ICR reference |
---|---|---|
PIDP(MSG,ARRAY,HL) | ;process PID segment
|
|
IDSARR | ;parse ids ;**61 MVI_2970 (dri)
|
|
NAMARR | ;parse legal and alias names ;**61 MVI_2970 (dri)
|
|
QTON(X) | ;**71,Story 841921 (mko): Convert two quotes to null
|
Name | Field # of Occurrence |
---|---|
$$FMDATE^HLFNC | PIDP+77, PIDP+118 |
$$FMNAME^HLFNC | PIDP+71, NAMARR+11, NAMARR+20 |
$$GETFLAG^MPIFNAMC | NAMARR+21 |
$$FMTNAME^RGADTP3 | NAMARR+27 |
$$COUNTY^RGRSPARS | PIDP+98 |
$$FREE^RGRSPARS | PIDP+71, PIDP+72, PIDP+90, PIDP+91, PIDP+92, PIDP+93, PIDP+94, PIDP+96, PIDP+99, PIDP+100 , PIDP+102, PIDP+118 |
$$MARITAL^RGRSPARS | PIDP+106 |
$$RELIG^RGRSPARS | PIDP+113 |
$$STATE^RGRSPARS | PIDP+95, PIDP+103 |
$$IEN^XUAF4 | PIDP+48 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | PIDP+35~, PIDP+36*, PIDP+38*, PIDP+53~, PIDP+54*, PIDP+56*, IDSARR+3, NAMARR+3 |
AA | PIDP+48~*, PIDP+49 |
ACNT | PIDP+35~, PIDP+36*, IDSARR+16* |
ADDR | PIDP+86~, PIDP+88*, PIDP+90*, PIDP+91, PIDP+92, PIDP+93, PIDP+94, PIDP+95, PIDP+96, PIDP+102 , PIDP+103 |
ADRTYPE | PIDP+86~, PIDP+88*, PIDP+89, PIDP+101 |
AL | PIDP+48~*, PIDP+49 |
ALIAS | NAMARR+22~, NAMARR+27 |
ALIAS("FIRST" | NAMARR+24* |
ALIAS("MIDDLE" | NAMARR+25* |
ALIAS("SUFFIX" | NAMARR+26* |
ALIAS("SURNAME" | NAMARR+23* |
ALIASNC | NAMARR+18~, NAMARR+19*, NAMARR+20*, NAMARR+23, NAMARR+24, NAMARR+25, NAMARR+26, NAMARR+29 |
ALIASNM | NAMARR+18~, NAMARR+20*, NAMARR+21, NAMARR+27*, NAMARR+28 |
ALISWKD | PIDP+53~, PIDP+54*, NAMARR+2*, NAMARR+3* |
ARRAY | PIDP~ |
ARRAY( | PIDP+91*, PIDP+92*, PIDP+93*, PIDP+94*, PIDP+95*, PIDP+96*, PIDP+98*, PIDP+99*, PIDP+100*, PIDP+106* , PIDP+113*, PIDP+118*, IDSARR+11* |
ARRAY("ALIAS" | IDSARR+16*, NAMARR+28*, NAMARR+29* |
ARRAY("CLAIMN" | PIDP+21*, IDSARR+19* |
ARRAY("DFN" | PIDP+21*, IDSARR+13* |
ARRAY("DFNLOC" | IDSARR+13* |
ARRAY("FIN" | IDSARR+23* |
ARRAY("FIRST" | NAMARR+7* |
ARRAY("ICN" | PIDP+21*, IDSARR+11* |
ARRAY("ITIN" | IDSARR+26* |
ARRAY("MBI" | PIDP+109* |
ARRAY("MIDDLE" | NAMARR+8* |
ARRAY("MMN" | PIDP+70*, PIDP+71*, PIDP+72* |
ARRAY("MPIDOB" | PIDP+76*, PIDP+77* |
ARRAY("MPIDOD" | PIDP+118* |
ARRAY("MPISSITE" | IDSARR+11* |
ARRAY("NAME" | NAMARR+11* |
ARRAY("OID" | PIDP+43*, PIDP+45*, PIDP+46*, PIDP+47, PIDP+48, PIDP+49*, IDSARR+12* |
ARRAY("POBCITY" | PIDP+102* |
ARRAY("POBSTATE" | PIDP+103* |
ARRAY("PREFERREDNAME" | NAMARR+15* |
ARRAY("PREFIX" | NAMARR+9* |
ARRAY("SEX" | PIDP+82* |
ARRAY("SSN" | PIDP+21*, IDSARR+15* |
ARRAY("SUFFIX" | NAMARR+10* |
ARRAY("SURNAME" | NAMARR+6* |
ARRAY("TIN" | IDSARR+22* |
CNT | PIDP+19~, PIDP+35~, PIDP+36*, PIDP+42*, PIDP+43*, PIDP+45, PIDP+46*, PIDP+85*, IDSARR+12* |
CNTYCODE | PIDP+97~*, PIDP+98 |
COMP | PIDP+19~, PIDP+22*, PIDP+48, PIDP+70, PIDP+71, PIDP+72, PIDP+88, PIDP+91, PIDP+92, PIDP+93 , PIDP+94, PIDP+95, PIDP+96, PIDP+102, PIDP+103, IDSARR+5, IDSARR+6, NAMARR+4, NAMARR+6, NAMARR+7 , NAMARR+8, NAMARR+9, NAMARR+10, NAMARR+11, NAMARR+13, NAMARR+15, NAMARR+17, NAMARR+19, NAMARR+20, NAMARR+23 , NAMARR+24, NAMARR+25, NAMARR+26, NAMARR+29 |
HL | PIDP~ |
HL("ECH" | PIDP+20, PIDP+22, PIDP+71 |
HL("FS" | PIDP+20, PIDP+23, PIDP+24, PIDP+26 |
HL("Q" | PIDP+71, PIDP+72, PIDP+76, PIDP+81, PIDP+109, IDSARR+15, IDSARR+22, IDSARR+23, IDSARR+26, NAMARR+15 |
HLECH | PIDP+19~, PIDP+20*, PIDP+71* |
HLFS | PIDP+19~, PIDP+20* |
>> I | NAMARR+19* |
ID | PIDP+1~, PIDP+19~, PIDP+35~, PIDP+48~*, PIDP+49, IDSARR+1*, IDSARR+3*, IDSARR+5, IDSARR+6*, IDSARR+11 , IDSARR+12, IDSARR+13, IDSARR+15, IDSARR+16, IDSARR+19, IDSARR+22, IDSARR+23, IDSARR+26 |
IDCNT | PIDP+53~, PIDP+54*, NAMARR+28, NAMARR+29, NAMARR+30* |
IDS | PIDP+1~, PIDP+19~, PIDP+35~, PIDP+37*, PIDP+38*, IDSARR+1 |
IDSWKD | PIDP+35~, PIDP+36*, IDSARR+2*, IDSARR+3* |
LASTID | PIDP+35~, PIDP+37*, PIDP+38*, IDSARR+1, IDSARR+3 |
LASTNAM | PIDP+53~, PIDP+55*, PIDP+56*, NAMARR+1, NAMARR+3 |
LNGTH | PIDP+19~, PIDP+23*, PIDP+24*, PIDP+25 |
LNGTH1 | PIDP+19~, PIDP+28*, PIDP+30* |
LNGTH2 | PIDP+19~, PIDP+28*, PIDP+30* |
MPIJ | PIDP+19~ |
MSG | PIDP~, PIDP+23 |
MSG( | PIDP+24, PIDP+26 |
NAME | PIDP+19~, PIDP+53~, NAMARR+1*, NAMARR+3*, NAMARR+4, NAMARR+6, NAMARR+7, NAMARR+8, NAMARR+9, NAMARR+10 , NAMARR+11, NAMARR+13, NAMARR+15, NAMARR+17, NAMARR+19 |
NAMES | PIDP+53~, PIDP+55*, PIDP+56*, NAMARR+1 |
NXT | PIDP+19~, PIDP+26*, PIDP+28*, PIDP+29, PIDP+30*, PIDP+31 |
PID | PIDP+19~ |
PID( | PIDP+23*, PIDP+27, PIDP+28*, PIDP+29*, PIDP+30*, PIDP+31* |
PID(12 | PIDP+87, PIDP+88 |
PID(13 | PIDP+97 |
PID(14 | PIDP+99 |
PID(15 | PIDP+100 |
PID(17 | PIDP+106 |
PID(18 | PIDP+113 |
PID(25 | PIDP+109 |
PID(30 | PIDP+118 |
PID(4 | PIDP+34, PIDP+37, PIDP+38, IDSARR+3 |
PID(5 | PIDP+41, PIDP+43, PIDP+44, PIDP+45, PIDP+46 |
PID(6 | PIDP+52, PIDP+55, PIDP+56, NAMARR+3 |
PID(7 | PIDP+70 |
PID(8 | PIDP+76*, PIDP+77 |
PID(9 | PIDP+81*, PIDP+82 |
PID1 | PIDP+19~ |
PIDAA | PIDP+1~, PIDP+19~, PIDP+35~, IDSARR+5*, IDSARR+9, IDSARR+12, IDSARR+14, IDSARR+18, IDSARR+21, IDSARR+25 |
PIDNTC | PIDP+1~, PIDP+19~, PIDP+35~, IDSARR+5*, IDSARR+10, IDSARR+13, IDSARR+15, IDSARR+16, IDSARR+19, IDSARR+22 , IDSARR+23, IDSARR+26 |
PIDSITE | PIDP+19~, PIDP+35~, IDSARR+5*, IDSARR+11, IDSARR+12, IDSARR+13 |
PIDXDT | PIDP+19~, PIDP+35~, IDSARR+5*, IDSARR+11, IDSARR+12, IDSARR+15, IDSARR+16 |
PNAME | NAMARR+14~, NAMARR+15* |
REP | PIDP+19~, PIDP+22*, PIDP+37, PIDP+38, PIDP+43, PIDP+45, PIDP+46, PIDP+55, PIDP+56, PIDP+87 , PIDP+88, IDSARR+1, IDSARR+3, NAMARR+1, NAMARR+3 |
SEQ | PIDP+19~, PIDP+23*, PIDP+25*, PIDP+27, PIDP+28, PIDP+29, PIDP+30, PIDP+31 |
SEQ1 | PIDP+19~, PIDP+24*, PIDP+25*, PIDP+28*, PIDP+29, PIDP+30 |
SUBCOMP | PIDP+19~, PIDP+22*, PIDP+48, IDSARR+5 |
X | PIDP+19~, PIDP+24*, PIDP+26, PIDP+35~, PIDP+43*, PIDP+46*, PIDP+47*, PIDP+48, PIDP+49, PIDP+53~ , PIDP+87*, PIDP+88, IDSARR+1*, IDSARR+3, NAMARR+1*, NAMARR+3, QTON~, QTON+1 |
Y | PIDP+19~, PIDP+25*, PIDP+26, PIDP+44*, PIDP+45, PIDP+46 |