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 |