MPIFXMLS ;OAK/ELZ - MPIF HEALTHEVET XML BUILDING - SEARCH ID (PATIENT) ;19 APR 2012
Source file <MPIFXMLS.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 1 | $$PARAM^HLCS2 |
| Kernel | 1 | ($$FMTHL7,$$HL7TFM,$$NOW)^XLFDT |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Master Patient Index VistA | 1 | MPIFP61 |
| Registration | 1 | DPTLK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PATIENT(RETURN,MPIID) | ; - look up and return PV data from fully qualified id
; such as 1000323423^PI^500^USVHA |
|
| CARDPV(RETURN,MPICARD,EDIPI) | ; - look up PV data from a VIC card number
; pass in the VIC card number or EDIPI in MPICARD, ; EDIPI if set to 1 to indicate EDIPI lookup ; this will return the array: ; RETURN(.01)= patient name ; RETURN(.02)= patient sex ; RETURN(.03)= patient dob ; RETURN(.09)= patient ssn ; RETURN(.092)= patient place of birth (city) ; RETURN(.093)= patient place of birth (state) ; RETURN(.2403)= mother's maiden name ; RETURN(991.01)= patient icn ; RETURN(991.02)= patient icn checksum ; or if not found RETURN=-1 |
|
| DPTLK(RETURN,MPIDATA) | ; - sets up return data for DPTLK needs
|
|
| XMLS(MPIID) | ; setup xml to search
; MPIID =fully qualified ID to search for a patient delaminated with "^" ; Returns XML for the search |
|
| 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) |
|---|---|
| ^DIC(5 - [#5] | DPTLK+3 |
| ^TMP($J | PARSE+4!, PARSE+9*, PARSE+10, PARSE+11! |
| Name | Line Occurrences |
|---|---|
| $$XMLS | PATIENT+9 |
| DPTLK | CARDPV+19 |
| PARSE | PATIENT+11 |
| PATIENT | CARDPV+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| EDIPI | CARDPV~, CARDPV+16 |
| MPIA | SE~ |
| MPIA("code" | SE+5*, SE+12, SE+29 |
| MPIA("extension" | SE+4*, SE+8, SE+9, SE+10, SE+13, SE+14, SE+15, SE+16 |
| MPIA("use" | SE+18 |
| MPIA("value" | SE+30, SE+34 |
| MPIALIAS | PARSE+5~, PARSE+6*, SE+23*, SE+24, SE+27 |
| MPICARD | CARDPV~, CARDPV+16*, CARDPV+17 |
| MPICB | PARSE+5~, PARSE+10 |
| MPICB("CHARACTERS" | PARSE+8* |
| MPICB("STARTELEMENT" | PARSE+7* |
| MPID | PATIENT+7~ |
| MPIDATA | CARDPV+15~, CARDPV+17, CARDPV+18, CARDPV+19, DPTLK~, PARSE~ |
| MPIDATA("DOB" | DPTLK+7, SE+30* |
| MPIDATA("FirstName" | DPTLK+5 |
| MPIDATA("Gender" | DPTLK+6, SE+29* |
| MPIDATA("MBI" | SE+34* |
| MPIDATA("MPIID" | DPTLK+13, DPTLK+14, SE+14* |
| MPIDATA("POBCity" | DPTLK+9 |
| MPIDATA("POBState" | DPTLK+2 |
| MPIDATA("SSN" | DPTLK+8, SE+16* |
| MPIDATA("SSNStatus" | SE+11, SE+12* |
| MPIDATA("Surname" | DPTLK+5, DPTLK+12 |
| MPIID | PATIENT~, PATIENT+9, XMLS~, XMLS+41 |
| MPIN | SE~, SE+3*, SE+8, SE+9, SE+10, SE+11, SE+13, SE+15, SE+17, SE+26 , SE+29, SE+30, SE+31, SE+32, SE+33, SE+34 |
| MPIPCODE | XMLS+7~, XMLS+9*, XMLS+21 |
| MPISITE | XMLS+7~, XMLS+8*, XMLS+31 |
| MPISTATE | DPTLK+1~, DPTLK+2*, DPTLK+3*, DPTLK+11 |
| MPIT | VALUE~, VALUE+1 |
| MPIUSE | PARSE+5~, SE+18*, SE+19*, SE+20, SE+22, SE+24, SE+27 |
| MPIVAR | PARSE+5~, SE+20*, SE+24*, SE+25, SE+27*, SE+28, SE+31*, SE+32*, SE+33*, VALUE+1 |
| MPIXML | PATIENT+7~, PATIENT+9*, PATIENT+10, CARDPV+15~, XMLS+7~, XMLS+10*, XMLS+11*, XMLS+12*, XMLS+13*, XMLS+14* , XMLS+15*, XMLS+16*, XMLS+17*, XMLS+18*, XMLS+19*, XMLS+20*, XMLS+21*, XMLS+22*, XMLS+23*, XMLS+24* , XMLS+25*, XMLS+26*, XMLS+27*, XMLS+28*, XMLS+29*, XMLS+30*, XMLS+31*, XMLS+32*, XMLS+33*, XMLS+34* , XMLS+35*, XMLS+36*, XMLS+37*, XMLS+38*, XMLS+39*, XMLS+40*, XMLS+41*, XMLS+42*, XMLS+43*, XMLS+44* , XMLS+45, PARSE~, PARSE+9 |
| MPIXMLR | PATIENT+7~, PATIENT+10, PATIENT+11, CARDPV+15~ |
| RETURN | PATIENT~, PATIENT+8*, PATIENT+11, PATIENT+14!*, CARDPV~, CARDPV+18*, CARDPV+19, DPTLK~ |
| RETURN( | DPTLK+5*, DPTLK+6*, DPTLK+7*, DPTLK+8*, DPTLK+9*, DPTLK+11*, DPTLK+12*, DPTLK+13*, DPTLK+14* |
| RETURN("DOB" | PATIENT+14, PATIENT+17* |
| RETURN("SSN" | PATIENT+14 |
| RETURN("Surname" | PATIENT+14 |