MPIFA37 ;BIR/DLR-Utility for processing an ADT-A37 Un-link ID ;DEC 11, 2001
Source file <MPIFA37.m>
Package | Total | Call Graph |
---|---|---|
Clinical Information Resource Network | 2 | PIDP^RGADTP1 (EXC,START,STOP)^RGHLLOG |
Health Level Seven | 2 | $$FMDATE^HLFNC GENACK^HLMA1 |
Master Patient Index VistA | 2 | $$GETDFN^MPIF001 ($$MPILINK,$$MPINODE,$$UPDATE)^MPIFAPI |
Registration | 2 | ($$DELALLTF,$$DELETETF)^VAFCTFU $$SITE^VASITE |
Kernel | 1 | $$IEN^XUAF4 |
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 | 2 | MPIF ADT-A37 CLIENT MPIF ADT-A37 SERVER |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DBIA | ; Supported IA's
|
|
IN | ;Entry point for processing ADT-A37 - unlink patient information
|
|
INIT | ;Process in the Treating Facility MFN msg
|
|
PICK | ;check routine for segment entry point
|
|
MSH | ;;MSH
|
|
EVN | ;;EVN
|
|
PID | ;;PID
|
|
RESP | ;response process logic entry point
|
|
ROUTE | ;routing logic entry point
|
|
REPLACE(ICN1,CMOR1,ICN2,CMOR2,ERROR) | ;
|
Name | Field # of Occurrence |
---|---|
$$FMDATE^HLFNC | EVN+2 |
GENACK^HLMA1 | INIT+16 |
$$GETDFN^MPIF001 | INIT+3, REPLACE+4 |
$$MPILINK^MPIFAPI | ROUTE+1 |
$$MPINODE^MPIFAPI | INIT+3 |
$$UPDATE^MPIFAPI | REPLACE+8 |
PIDP^RGADTP1 | PID+3 |
EXC^RGHLLOG | ROUTE+5 |
START^RGHLLOG | ROUTE+4 |
STOP^RGHLLOG | ROUTE+6 |
$$DELALLTF^VAFCTFU | REPLACE+7 |
$$DELETETF^VAFCTFU | INIT+9 |
$$SITE^VASITE | INIT+5, INIT+7, EVN+2 |
$$IEN^XUAF4 | INIT+7 |
HL7 Protocol Name | Call Tags |
---|---|
MPIF ADT-A37 SERVER | RESP |
MPIF ADT-A37 CLIENT | IN |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | PID+2~, PID+3 |
ARRAY("DFN" | PID+5 |
ARRAY("ICN" | PID+5 |
ARRAY("MPISSITE" | PID+6 |
ARRAY("SSN" | PID+5 |
CMOR1 | REPLACE~ |
CMOR2 | IN+5~, INIT+3*, INIT+5, REPLACE~, REPLACE+6 |
CNT | IN+5~, INIT+12*, INIT+13* |
DFN | IN+5~, INIT+3*, ROUTE+5, REPLACE+4*, REPLACE+8 |
ERROR | IN+5~, IN+6*, INIT+5, INIT+8*, INIT+9*, INIT+10*, INIT+13, REPLACE~, REPLACE+3*, REPLACE+4* , REPLACE+5, REPLACE+7*, REPLACE+8* |
>> HL | PID+3 |
>> HL("ECH" | MSH+2*, MSH+3 |
>> HL("EID" | INIT+16 |
>> HL("EIDS" | INIT+16 |
>> HL("FS" | INIT+13, MSH+2*, MSH+4, EVN+2, PID+4 |
>> HL("MID" | INIT+13 |
>> HLA("HLA" | INIT+13* |
HLCOMP | IN+5~, MSH+3* |
>> HLECH | MSH+2* |
>> HLFS | MSH+2* |
>> HLL("LINKS" | ROUTE+2* |
>> HLMTIEN | ROUTE+4 |
>> HLMTIENS | INIT+16 |
>> HLNEXT | INIT+1 |
>> HLNODE | INIT+1 |
>> HLP | INIT+16 |
>> HLQUIT | INIT+1 |
ICN | IN+5~, IN+6*, INIT+9, PID+5*, PID+6 |
ICN1 | REPLACE~ |
ICN2 | REPLACE~, REPLACE+4, REPLACE+6, REPLACE+7 |
ICNAUTH | IN+4~ |
INST | IN+4~ |
MFUPT | IN+4~ |
MPI | ROUTE+1~*, ROUTE+2, ROUTE+3 |
MPIARR | REPLACE+2~ |
MPIARR( | REPLACE+6* |
MPIARR(992 | REPLACE+6* |
MPIARR(993 | REPLACE+6* |
MPIDFN | IN+5~, IN+6*, PID+5* |
MPIF | IN+4~ |
MPIF( | INIT+1* |
MPIFARR | IN+4~ |
MPIFARR("SEND | ING SITE" , MSH+4* |
MPIFERR | IN+5~, INIT+16 |
MPIFI | IN+4~, INIT+1* |
MPIFX | IN+5~ |
MPIJ | PID+2~, PID+4*, PID+6 |
MPISITE | IN+4~, INIT+7*, INIT+9 |
MPISSN | IN+5~, IN+6*, PID+5* |
MSG | IN+4~, INIT+1*, MSH+2, MSH+4, EVN+2, PID+3, PID+4 |
NODE | IN+5~, INIT+3* |
PDFN | IN+4~, ROUTE+5 |
PDLT | IN+4~ |
PID | IN+5~ |
PID( | PID+6* |
PID(2 | INIT+3, INIT+5, INIT+7, INIT+8, INIT+9 |
RGLOG | ROUTE+4~ |
SG | IN+4~, INIT+1*, PICK+1 |
STATN | IN+4~, EVN+2* |
TFIEN | IN+4~ |
U | ROUTE+2, ROUTE+3 |
X | IN+5~ |