MPIFXMLP ;OAK/ELZ - MPIF PROBLISTIC SEARCH ;21 May 2020 1:20 PM
Source file <MPIFXMLP.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | ($$FMTHL7,$$HL7TFM,$$NOW)^XLFDT STDNAME^XLFNAME |
| Health Level Seven | 1 | $$PARAM^HLCS2 |
| M XML Parser | 1 | EN^MXMLPRSE |
| Master Patient Index VistA | 1 | POST^MPIFHWSC |
| Registration | 1 | $$SITE^VASITE |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PATIENT(RETURN,MPIARR) | ; - query for patients based on traits
; MPIARR("")="" |
|
| XMLBLD(MPIARR) | ; setup xml to search
; MPIARR - Array of traits for seach ; Returns XML for the search |
|
| IFADD(MPIVAR,MPIARR,MPIXML,MPIXMLN) | ;check if there, if so add it to the XML
; MPIVAR is the MPIARR variable name ; MPIXMLN is the name of the XML to encase ; modifies MPIXML to add if it is there |
|
| CONV(FIELD) | ;check for &, ', > and <
|
|
| CONVA(FIELD,ENCHAR) | ;handle <<pob city>>
|
|
| PARSE(MPIDATA,MPIXML) | ; - parse the data
|
|
| SE(MPIN,MPIA) | ; - used for the parser to call back with STARTELEMENT
|
|
| VALUE(MPIT) | ; - used by the parser to call back with CHARACTERS
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | PARSE+4!, PARSE+9*, PARSE+10, PARSE+11! |
| ^VA(200 - [#200] | XMLBLD+11 |
| Name | Line Occurrences |
|---|---|
| $$CONV | XMLBLD+69, XMLBLD+79, XMLBLD+81, XMLBLD+83, XMLBLD+85, XMLBLD+96 |
| $$CONVA | CONV+3, CONV+4 |
| $$XMLBLD | PATIENT+6 |
| IFADD | XMLBLD+44, XMLBLD+45, XMLBLD+46, XMLBLD+47, XMLBLD+72, XMLBLD+73, XMLBLD+80, XMLBLD+82, XMLBLD+84, XMLBLD+86 , XMLBLD+87, XMLBLD+88, XMLBLD+89, XMLBLD+90, XMLBLD+91 |
| PARSE | PATIENT+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DUZ | XMLBLD+11, XMLBLD+37 |
| ENCHAR | CONVA~, CONVA+2 |
| FIELD | CONV~, CONV+1*, CONV+2*, CONV+3*, CONV+4*, CONV+5, CONVA~, CONVA+2 |
| I | CONVA+1~, CONVA+2* |
| MPIA | SE~ |
| MPIA("name" | SE+6*, SE+22 |
| MPIA("subtype" | SE+5*, SE+12, SE+18, SE+42, SE+44, SE+46 |
| MPIA("type" | SE+4*, SE+12, SE+18, SE+19, SE+27, SE+42, SE+43, SE+44, SE+46, SE+61 , SE+62, SE+63, SE+64, SE+66, SE+68, SE+72, SE+73, SE+74, SE+76, SE+77 , SE+82, SE+84, SE+85 |
| MPIA("value" | SE+7*, SE+22 |
| MPIALIAS | PARSE+5~, SE+25*, SE+28*, SE+35, SE+36, SE+37, SE+38, SE+39, SE+50 |
| MPIARR | PATIENT~, PATIENT+6, XMLBLD~, XMLBLD+44, XMLBLD+45, XMLBLD+46, XMLBLD+47, XMLBLD+72, XMLBLD+73, XMLBLD+80 , XMLBLD+82, XMLBLD+84, XMLBLD+86, XMLBLD+87, XMLBLD+88, XMLBLD+89, XMLBLD+90, XMLBLD+91, IFADD~ |
| MPIARR( | IFADD+4, IFADD+5 |
| MPIARR("DOB" | XMLBLD+55, XMLBLD+57 |
| MPIARR("DOD" | XMLBLD+102, XMLBLD+104 |
| MPIARR("Gender" | XMLBLD+58, XMLBLD+60 |
| MPIARR("MBI" | XMLBLD+64, XMLBLD+66 |
| MPIARR("MMN" | XMLBLD+61, XMLBLD+63 |
| MPIARR("MPIVar" | XMLBLD+69*, XMLBLD+70, XMLBLD+79*, XMLBLD+81*, XMLBLD+83*, XMLBLD+85*, XMLBLD+96*, XMLBLD+97, XMLBLD+99, XMLBLD+108! |
| MPIARR("POBCity" | XMLBLD+69 |
| MPIARR("POBState" | XMLBLD+70 |
| MPIARR("ResAddCity" | XMLBLD+77, XMLBLD+85 |
| MPIARR("ResAddL1" | XMLBLD+77, XMLBLD+79 |
| MPIARR("ResAddL2" | XMLBLD+77, XMLBLD+81 |
| MPIARR("ResAddL3" | XMLBLD+77, XMLBLD+83 |
| MPIARR("ResAddState" | XMLBLD+77 |
| MPIARR("ResAddZip4" | XMLBLD+77 |
| MPIARR("ResPhone" | XMLBLD+95, XMLBLD+96 |
| MPIARR("SSN" | XMLBLD+51, XMLBLD+53 |
| MPICB | PARSE+5~, PARSE+10 |
| MPICB("CHARACTERS" | PARSE+8* |
| MPICB("STARTELEMENT" | PARSE+7* |
| MPID | PATIENT+4~ |
| MPIDATA | PARSE~ |
| MPIDATA( | SE+22* |
| MPIDATA("Result" | SE+12* |
| MPIDT | XMLBLD+6~, XMLBLD+10*, XMLBLD+34, XMLBLD+39 |
| MPIDUZ | XMLBLD+6~, XMLBLD+11* |
| MPIDUZ("FAMILY" | XMLBLD+38 |
| MPIDUZ("GIVEN" | XMLBLD+38 |
| MPIIDS | PARSE+5~, PARSE+6*, SE+25*, SE+46*, SE+54, SE+56, SE+58, SE+59 |
| MPIIGNID | PARSE+5~, SE+41!, SE+48*, SE+56 |
| MPILOC | PARSE+5~, SE+25*, SE+46, VALUE+1 |
| MPIN | SE~, SE+3*, SE+12, SE+14, SE+16, SE+17, SE+18, SE+19, SE+22, SE+25 , SE+26, SE+29, SE+30, SE+31, SE+32, SE+33, SE+34, SE+35, SE+36, SE+37 , SE+38, SE+39, SE+40, SE+49, SE+56, SE+58, SE+59, SE+60, SE+69, SE+71 , SE+78, SE+79, SE+80, SE+81, SE+82, SE+84, SE+85, SE+86, SE+87, SE+88 , SE+89, SE+90, SE+91 |
| MPIPAT | PATIENT+4~, PATIENT+13*, PARSE+5~, PARSE+6*, SE+25* |
| MPIPRID | XMLBLD+6~, XMLBLD+9*, XMLBLD+28, XMLBLD+35 |
| MPISITE | XMLBLD+6~, XMLBLD+8*, XMLBLD+17, XMLBLD+37 |
| MPIT | VALUE~, VALUE+1 |
| MPITHRES | XMLBLD+6~, XMLBLD+12*, XMLBLD+22 |
| MPIUSE | PARSE+5~, SE+9*, SE+27*, SE+28, SE+29, SE+30, SE+31, SE+32, SE+33, SE+34 , SE+35, SE+36, SE+37, SE+38, SE+39, SE+42*, SE+43*, SE+44*, SE+46*, SE+48* , SE+50, SE+51!, SE+52!, SE+53!, SE+54, SE+58, SE+59, SE+61*, SE+62*, SE+63* , SE+64*, SE+66*, SE+68*, SE+69!, SE+70, SE+72*, SE+73*, SE+74*, SE+76*, SE+77* , SE+78, SE+79, SE+80, SE+81, SE+82*, SE+84*, SE+85*, SE+86, SE+87, SE+88 , SE+89, SE+90, SE+91 |
| MPIVAR | IFADD~, IFADD+4, IFADD+5, PARSE+5~, SE+29*, SE+30*, SE+31*, SE+32*, SE+33*, SE+34* , SE+35*, SE+36*, SE+37*, SE+38*, SE+39*, SE+48!, SE+50*, SE+51*, SE+52*, SE+53* , SE+54*, SE+56*, SE+58*, SE+59*, SE+70*, SE+78*, SE+79*, SE+80*, SE+81*, SE+86* , SE+87*, SE+88*, SE+89*, SE+90*, SE+91*, VALUE+1! |
| MPIXML | PATIENT+4~, PATIENT+6*, PATIENT+7, XMLBLD+6~, XMLBLD+15*, XMLBLD+16*, XMLBLD+17*, XMLBLD+18*, XMLBLD+19*, XMLBLD+20* , XMLBLD+21*, XMLBLD+22*, XMLBLD+23*, XMLBLD+24*, XMLBLD+25*, XMLBLD+26*, XMLBLD+27*, XMLBLD+28*, XMLBLD+30*, XMLBLD+31* , XMLBLD+32*, XMLBLD+33*, XMLBLD+34*, XMLBLD+35*, XMLBLD+36*, XMLBLD+37*, XMLBLD+38*, XMLBLD+39*, XMLBLD+40*, XMLBLD+43* , XMLBLD+44, XMLBLD+45, XMLBLD+46, XMLBLD+47, XMLBLD+48*, XMLBLD+52*, XMLBLD+53*, XMLBLD+54*, XMLBLD+56*, XMLBLD+57* , XMLBLD+59*, XMLBLD+60*, XMLBLD+62*, XMLBLD+63*, XMLBLD+65*, XMLBLD+66*, XMLBLD+71*, XMLBLD+72, XMLBLD+73, XMLBLD+74* , XMLBLD+78*, XMLBLD+80, XMLBLD+82, XMLBLD+84, XMLBLD+86, XMLBLD+87, XMLBLD+88, XMLBLD+89, XMLBLD+90, XMLBLD+91 , XMLBLD+92*, XMLBLD+98*, XMLBLD+99*, XMLBLD+103*, XMLBLD+104*, XMLBLD+107*, XMLBLD+109, IFADD~, IFADD+5*, PARSE~ , PARSE+9 |
| MPIXMLN | IFADD~, IFADD+5 |
| MPIXMLR | PATIENT+4~, PATIENT+7, PATIENT+8, PATIENT+9 |
| QUOTE | XMLBLD+6~, XMLBLD+7*, XMLBLD+15, XMLBLD+16, XMLBLD+17, XMLBLD+18, XMLBLD+19, XMLBLD+20, XMLBLD+21, XMLBLD+22 , XMLBLD+23, XMLBLD+24, XMLBLD+25, XMLBLD+26, XMLBLD+27, XMLBLD+28, XMLBLD+31, XMLBLD+32, XMLBLD+43, XMLBLD+52 , XMLBLD+53, XMLBLD+56, XMLBLD+59, XMLBLD+62, XMLBLD+65, XMLBLD+71, XMLBLD+78, XMLBLD+98, XMLBLD+103 |
| RETURN | PATIENT~, PATIENT+5!, PATIENT+8*, PATIENT+9 |
| RETURN( | PATIENT+13* |
| VAL | CONVA+1~, CONVA+2*, CONVA+3 |
| X | CONVA+1~, CONVA+2* |