Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AGMPIHLO

Package: Patient Registration MPI

Routine: AGMPIHLO


Information

AGMPIHLO ;IHS/SD/TPF - Patient Registration MPI HLO Interface ALL HLO MESSAGES

Source Information

Source file <AGMPIHLO.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Patient Registration MPI 4 UPDMSGQ^AGMPCHK  $$DEMOPAT^AGMPHLU  (MRG,PID,ZPD)^AGMPIHL1  $$MPINODE^AGMPIPID  
Health Level Seven 3 ($$HLDATE,$$HLNAME,$$HLPHONE)^HLFNC  ($$ADDSEG,$$NEWMSG,SET)^HLOAPI  $$SENDONE^HLOAPI1  
Kernel 3 $$HLNAME^XLFNAME  SETUP^XQALERT  $$NS^XUAF4  
Registration 2 $$ADDR^VAFHLFNC  $$SITE^VASITE  
VA Fileman 2 NOW^%DTC  $$GET1^DIQ  
Toolkit 1 ($$GET,EN)^XPAR  

Caller Graph

Caller Graph Total: 16

Package Total Caller Graph
Patient Registration MPI 13 AGMPCHK  AGMPHL01  AGMPHL03  AGMPHLBU  AGMPHLEU  AGMPHLU  AGMPHLU1  AGMPHLVQ  
AGMPHMFN  AGMPIACK  AGMPIBGP  AGMPIHL1  AGMPPRST  
IHS Patient Merge 2 BPMXFX1  BPMXMPI  
IHS Patient Registration 1 AG0  

Entry Points

Name Comments DBIA/ICR reference
AACK ; EP - Application ACK callback - called when AA, AE or AR is received.
NOTIF(DFN,MSG) ;EP
OBX(DFN) ;EP - OBSERVATION/RESULT
MYSET(ARY,V,F,R,C,S) ;EP
PV1(DFN) ;EP - PATIENT VISIT
MFA(SEG) ;EP - FOR MFK RESPONSE TO MFN
ERR ;
PD1(DFN) ;EP
EVN(EVNTTYPE) ;Create the EVN segment
CREATMSG(DFN,EVNTTYPE,DFN2,SUCCESS) ;EP - START FOR MOST PAT REG TRIGGERS
DOSEND ;EP
MFE(SEG) ;EP - FOR MFK RESPONSE TO MFN
MFI(SEG) ;EP - FOR MFK RESPONSE TO MFN
NEWMSG(BPMRY) ;EP - FOR PATIENT MERGE
NK1(DFN) ;EP
CACK ; EP - Commit ACK callback - called when CA, CE or CR is received.

External References

Name Field # of Occurrence
NOW^%DTC EVN+2
UPDMSGQ^AGMPCHK CREATMSG+9
$$DEMOPAT^AGMPHLU CREATMSG+20, CREATMSG+21
MRG^AGMPIHL1 CREATMSG+92
PID^AGMPIHL1 CREATMSG+84
ZPD^AGMPIHL1 CREATMSG+90
$$MPINODE^AGMPIPID PD1+3
$$GET1^DIQ DOSEND+19, DOSEND+20, DOSEND+22, DOSEND+23, DOSEND+24, EVN+4, EVN+7
$$HLDATE^HLFNC EVN+3
$$HLNAME^HLFNC EVN+8
$$HLPHONE^HLFNC NK1+27, NK1+32
$$ADDSEG^HLOAPI EVN+23, PD1+13, PV1+7, OBX+6, NK1+39, MFI+8, MFA+9, MFE+12
$$NEWMSG^HLOAPI CREATMSG+51
SET^HLOAPI MYSET+1
$$SENDONE^HLOAPI1 DOSEND+35
$$ADDR^VAFHLFNC NK1+24
$$SITE^VASITE EVN+20, EVN+22
$$HLNAME^XLFNAME NK1+15
$$GET^XPAR NOTIF+14
EN^XPAR NOTIF+17, NOTIF+18
SETUP^XQALERT AACK+10, CACK+9, NOTIF+12
$$NS^XUAF4 PD1+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Site "_DUZ(2)_" / "_$G(^AGMPCHK(DUZ(2)))_" is disabled in ^AGMPCHK, the message was not sent!"
  • Line Location: CREATMSG+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^AGFAC - [#9009061] GET1^DIQ
^AUTTLOC - [#9999999.06] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AGMPCHK CREATMSG+5, CREATMSG+7, CREATMSG+10, CREATMSG+11, CREATMSG+12, CREATMSG+13, CREATMSG+15, CREATMSG+16*
^AGMPCHK(0 CREATMSG+5
^AUPNPAT - [#9000001] NK1+19
^AUTTRLSH - [#9999999.36] NK1+21
^DPT - [#2] NEWMSG+4, NEWMSG+8, CREATMSG+28, CREATMSG+29, NOTIF+5, NK1+6, NK1+7
^HLB - [#778] AACK+3, AACK+4, CACK+2, CACK+3

Label References

Name Line Occurrences
@( CREATMSG+78
CREATMSG NEWMSG+9
DOSEND CREATMSG+80
EVN CREATMSG+83
MYSET EVN+10, EVN+11, EVN+12, EVN+13, EVN+14, EVN+15, EVN+16, EVN+17, EVN+18, EVN+19
, EVN+20, EVN+21, EVN+22, PD1+8, PD1+9, PD1+10, PD1+11, PD1+12, PV1+4, PV1+5
, PV1+6, OBX+4, OBX+5, NK1+10, NK1+11, NK1+17, NK1+23, NK1+26, NK1+29, NK1+30
, NK1+31, NK1+34, NK1+35, NK1+36, NK1+37, NK1+38, MFI+2, MFI+4, MFI+5, MFI+6
, MFA+4, MFA+5, MFA+6, MFA+7, MFA+8, MFE+2, MFE+5, MFE+6, MFE+7, MFE+8
, MFE+9, MFE+10, MFE+11
NK1 CREATMSG+93
NOTIF NEWMSG+3, NEWMSG+4, NEWMSG+7, NEWMSG+8, CREATMSG+7, CREATMSG+15, CREATMSG+26, CREATMSG+27, CREATMSG+28, CREATMSG+29
, CREATMSG+52, CREATMSG+79, DOSEND+30, DOSEND+33, DOSEND+38, DOSEND+42, EVN+24, PD1+14, PV1+8, OBX+7
, NK1+40
PD1 CREATMSG+85
PV1 CREATMSG+87

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EVN+1~, EVN+3
A40ERR NEWMSG+3*, NEWMSG+4*, NEWMSG+7*, NEWMSG+8*, CREATMSG+22~, CREATMSG+24*, CREATMSG+25, CREATMSG+26*, CREATMSG+27*, CREATMSG+28*
, CREATMSG+29*
AACK AACK+1~, AACK+4*, AACK+5, AACK+8
ADDR NK1+2~, NK1+24*, NK1+25
>> AGMPCHKFLG CREATMSG+5
AGMPIFR NEWMSG+1~, NEWMSG+6*, NEWMSG+7, NEWMSG+8, NEWMSG+9
AGMPITO NEWMSG+1~, NEWMSG+2*, NEWMSG+3, NEWMSG+4, NEWMSG+6, NEWMSG+9
>> AGMPSTOP CREATMSG+18
APPARMS CREATMSG+30~, DOSEND+35
APPARMS("ACCE PT ACK RESPONSE" , DOSEND+8*, DOSEND+11*, PT ACK TYPE" , DOSEND+5*
APPARMS("APP ACK RESPONSE" , DOSEND+7*, DOSEND+10*, ACK TYPE" , DOSEND+12*
APPARMS("QUEUE" DOSEND+13*
APPARMS("RECE IVING APPLICATION" , DOSEND+14*
APPARMS("SEND ING APPLICATION" , DOSEND+4*, ING FACILITY" , DOSEND+19*
ARY CREATMSG+30~, EVN+10, EVN+11, EVN+12, EVN+13, EVN+14, EVN+15, EVN+16, EVN+17, EVN+18
, EVN+19, EVN+20, EVN+21, EVN+22, EVN+23, PD1+8, PD1+9, PD1+10, PD1+11, PD1+12
, PD1+13, PV1+4, PV1+5, PV1+6, PV1+7, OBX+4, OBX+5, OBX+6, NK1+10, NK1+11
, NK1+17, NK1+23, NK1+26, NK1+29, NK1+30, NK1+31, NK1+34, NK1+35, NK1+36, NK1+37
, NK1+38, NK1+39, MFI+2, MFI+4, MFI+5, MFI+6, MFI+8, MFA+4, MFA+5, MFA+6
, MFA+7, MFA+8, MFA+9, MFE+2, MFE+5, MFE+6, MFE+7, MFE+8, MFE+9, MFE+10
, MFE+11, MFE+12, MYSET~, MYSET+1
BPMRY NEWMSG~, NEWMSG+2, NEWMSG+6
C MYSET~, MYSET+1
CACK CACK+1~, CACK+3*, CACK+4, CACK+7
>> CMOR PD1+4*, PD1+5
CNT NK1+2~, NK1+3*, NK1+9*, NK1+11
>> COMP CREATMSG+56*, EVN+13, EVN+14
DATA AACK+1~
DFN CREATMSG~, CREATMSG+9, CREATMSG+20, CREATMSG+26, CREATMSG+27, CREATMSG+28, CREATMSG+29, CREATMSG+52, CREATMSG+79, CREATMSG+84
, CREATMSG+85, CREATMSG+87, CREATMSG+90, CREATMSG+93, DOSEND+30, DOSEND+33, DOSEND+38, DOSEND+42, NOTIF~, NOTIF+5
, NOTIF+9, NOTIF+10, NOTIF+16, EVN+24, PD1~, PD1+1, PD1+3, PD1+14, PV1~, PV1+1
, PV1+8, OBX~, OBX+1, OBX+7, NK1~, NK1+6, NK1+7, NK1+12, NK1+19, NK1+40
DFN2 CREATMSG~, CREATMSG+8*, CREATMSG+9, CREATMSG+21, CREATMSG+26, CREATMSG+28, CREATMSG+92
DGNAME NK1+2~, NK1+15
DGNAME("FIELD" NK1+13*
DGNAME("FILE" NK1+12*
DGNAME("IENS" NK1+12*
DUZ EVN+6, EVN+12
DUZ(2 CREATMSG+5, CREATMSG+7, CREATMSG+9, CREATMSG+10, CREATMSG+11, CREATMSG+12, CREATMSG+13, CREATMSG+15, CREATMSG+16, DOSEND+19
, DOSEND+20, DOSEND+22, DOSEND+23, DOSEND+24, EVN+4
ERR CREATMSG+30~, CREATMSG+51, CREATMSG+52, CREATMSG+73, CREATMSG+79, CREATMSG+84, CREATMSG+85, CREATMSG+86, CREATMSG+90, CREATMSG+92
, CREATMSG+93, DOSEND+1, DOSEND+35, DOSEND+38, DOSEND+39, DOSEND+40, DOSEND+42, EVN+23, EVN+24, PD1+13
, PD1+14, PV1+7, PV1+8, OBX+6, OBX+7, NK1+39, NK1+40, MFI+3*, MFE+3*, MFE+4*
EVNTTYPE CREATMSG~, CREATMSG+3, CREATMSG+9, CREATMSG+25, CREATMSG+34, CREATMSG+38, CREATMSG+40, CREATMSG+41, CREATMSG+43, CREATMSG+70
, CREATMSG+83, CREATMSG+85, CREATMSG+86, CREATMSG+90, CREATMSG+92, CREATMSG+93, DOSEND+6, EVN~, EVN+11
F MYSET~, MYSET+1
>> FACNAME EVN+4*, EVN+19
FLD CREATMSG+31~, EVN+1~, NK1+2~, NK1+15*, NK1+16
HL1 CREATMSG+31~
HL1("ECH" CREATMSG+55*, CREATMSG+56, CREATMSG+57, EVN+8
HL1("FS" CREATMSG+58*, MFA+5, MFA+6, MFA+7, MFA+8
HL1("Q" CREATMSG+59*, NK1+4
HL1("VER" CREATMSG+60*
HLECH CREATMSG+30~, CREATMSG+54*, CREATMSG+55, NK1+16, NK1+22, NK1+25
HLFS CREATMSG+30~, CREATMSG+53*, CREATMSG+58
HLMSGIEN CREATMSG+30~, AACK+2, AACK+3, AACK+4, CACK+2, CACK+3
HLPM CREATMSG+30~, CREATMSG+51
HLPM("ENCODIN G CHARACTERS" , CREATMSG+50*, CREATMSG+54
HLPM("EVENT" CREATMSG+40*, CREATMSG+43*, CREATMSG+46*
HLPM("FIELD S EPARATOR" , CREATMSG+49*, CREATMSG+53
HLPM("MESSAGE TYPE" , CREATMSG+39*, CREATMSG+42*, CREATMSG+45*
HLPM("VERSION" CREATMSG+48*, CREATMSG+60
HLQ CREATMSG+30~, NK1+2~, NK1+4*
HLST CREATMSG+30~, CREATMSG+51, DOSEND+35, EVN+23, PD1+13, PV1+7, OBX+6, NK1+39, MFI+8, MFA+9
, MFE+12
HLST("SYSTEM" DOSEND+23*, DOSEND+24*, DOSEND+28, DOSEND+31
HRCN CREATMSG+31~
K NK1+2~, NK1+5*, NK1+6, NK1+7, NK1+13, NK1+19, NK1+37, NK1+38
LN CREATMSG+31~, CREATMSG+32*
LP CREATMSG+31~, NK1+16*, NK1+17, NK1+22*, NK1+23, NK1+25*, NK1+26
MFA MFA+1~, MFA+9*
MFASEG MFA+1~, MFA+2*, MFA+5, MFA+6, MFA+7, MFA+8
MFE MFE+1~, MFE+12*
MFI MFI+1~, MFI+8*
>> MFK( CREATMSG+73, CREATMSG+74, MFI+3, MFI+4, MFI+5, MFI+6, MFA+5, MFA+6, MFA+7, MFA+8
, MFE+3, MFE+4, MFE+5, MFE+6, MFE+7, MFE+8, MFE+9, MFE+10, MFE+11
MSG NOTIF~, NOTIF+8, NOTIF+16
MSGID AACK+1~, AACK+3*, AACK+6, AACK+7, CACK+1~, CACK+2*, CACK+5, CACK+6
NK1 NK1+2~, NK1+39*
NODE NK1+2~, NK1+6*, NK1+7*, NK1+8, NK1+24, NK1+27, NK1+32
OBX OBX+2~, OBX+6*
PD1 PD1+2~, PD1+13*
PHONE NK1+2~, NK1+27*, NK1+28, NK1+29, NK1+32*, NK1+33, NK1+34
PNAM NOTIF+1~, NOTIF+4*, NOTIF+5*, NOTIF+6*, NOTIF+7
PV1 PV1+2~, PV1+7*
PVDIEN NOTIF+1~
R MYSET~, MYSET+1
REL NK1+2~
RET NOTIF+1~
S MYSET~, MYSET+1
SAVE NOTIF+1~, NOTIF+16*, NOTIF+17
>> SDT PV1+6
SEG CREATMSG+71~, CREATMSG+72*, CREATMSG+73*, CREATMSG+74, CREATMSG+76, CREATMSG+77, MFI~, MFI+3, MFI+4, MFI+5
, MFI+6, MFA~, MFA+2, MFE~, MFE+3, MFE+4, MFE+5, MFE+6, MFE+7, MFE+8
, MFE+9, MFE+10, MFE+11
SHIP NK1+2~, NK1+19*, NK1+20, NK1+21
>> SITE PD1+5*, PD1+6*, PD1+9, PD1+10, PD1+12
>> SUBCOMP CREATMSG+57*
SUCCESS NEWMSG+9, CREATMSG~, CREATMSG+3*, CREATMSG+6*, CREATMSG+18*, CREATMSG+20*, CREATMSG+21*, CREATMSG+23*, DOSEND+29*, DOSEND+32*
, DOSEND+35*, DOSEND+37, DOSEND+40*, DOSEND+41*, NOTIF+3*
TAG CREATMSG+71~, CREATMSG+74*, CREATMSG+75, CREATMSG+76*, CREATMSG+77*, CREATMSG+78, CREATMSG+79
>> TCHCK CREATMSG+12*, CREATMSG+13*, CREATMSG+14
U DOSEND+40, AACK+3, AACK+5, AACK+8, CACK+2, CACK+4, CACK+7, NOTIF+5, PD1+9, PD1+10
, NK1+19, NK1+21, NK1+24, NK1+27, NK1+32
>> USERNAME EVN+6*, EVN+7*, EVN+8*, EVN+13, EVN+14
V MYSET~, MYSET+1
>> VAFCMN PD1+3*, PD1+4
VAL EVN+1~, NK1+16*, NK1+17, NK1+22*, NK1+23, NK1+25*, NK1+26
WHO CREATMSG+30~, DOSEND+35
WHO("FACILITY LINK NAME" , DOSEND+16*
WHO("IE LINK NAME" , DOSEND+18*
WHO("RECEIVIN G APPLICATION" , DOSEND+15*
WHO("SENDING FACILITY" , DOSEND+20*
WHO("STATION NUMBER" , DOSEND+17*
WHO("STATION" DOSEND+22*
X CREATMSG+31~, NOTIF+1~, NOTIF+14*, NOTIF+15*, NOTIF+17, NOTIF+18, EVN+1~, EVN+3*, EVN+23*, NK1+21*
, NK1+22
XQA AACK+1~, CACK+1~, NOTIF+2~
XQA("G.AGMP M PI" , NOTIF+11*
XQA("G.AGMPI MPI" , AACK+9*, CACK+8*
XQADATA NOTIF+2~
XQAID AACK+1~, AACK+7*, CACK+1~, CACK+6*, NOTIF+2~, NOTIF+9*
XQAMSG AACK+1~, AACK+6*, CACK+1~, CACK+5*, NOTIF+2~, NOTIF+7*, NOTIF+8*
XQDATA AACK+1~, AACK+8*, CACK+1~, CACK+7*, NOTIF+10*
>> ZTQUEUED CREATMSG+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All