Routine: AGMPHMFN

Information

AGMPHMFN ; IHS/SD/TPF - HLO MPI MFN-M05 PROCESSING RTN ;

Source Information

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
VA Fileman	6	^%DT NOW^%DTC ^DIC (,UPDATE)^DIE ^DIK $$GET1^DIQ
Patient Registration MPI	3	ADDICN^AGMPHLVQ MSGCMPLT^AGMPIBGP (CREATMSG,NOTIF)^AGMPIHLO
Health Level Seven	1	($$NEXTSEG,$$STARTMSG)^HLOPRS
Kernel	1	$$FMTE^XLFDT

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Patient Registration MPI	2	AGMPHLU AGMPIBGP

Entry Points

Name	Comments	DBIA/ICR reference
GETLOCAL(DATA,LSTATNUM)	;EP - GET LOCAL
UPD	;EP - UPDATE BASED ON INSTITUTION LOOKUP
MSGERR(LOCALID,MSGIEN,HLMSGIEN,ERROR)	;EP - ERROR OCURRED IN A28 ACK
UPDEUID(LOCALID,EUID)
DELPTREC(LOCALID)	;EP - DELETE RECORDS FOR LOCAL ID
ADD	;EP - ADD ENTRY TO TREATING FACILITY LIST
GETVARS(SEGIEN)	;EP - SET VARIABLES
DEL	;EP - DELETE ENTRY
PARSE(DATA,MIEN,HLMSTATE)	;EP
DELEUID(LOCALID)	;DELETE ICN FROM PATIENT RECORD
PROC(HLMSGIEN,SUCCESS)	;EP - PROCESS MFN-M05 TREATING FACILITY UPDATE MESSAGE FROM MPI

External References

Name	Field # of Occurrence
^%DT	GETVARS+15
NOW^%DTC	PROC+6, UPDEUID+17
ADDICN^AGMPHLVQ	UPDEUID+6
MSGCMPLT^AGMPIBGP	PROC+48
CREATMSG^AGMPIHLO	PROC+47
NOTIF^AGMPIHLO	MSGERR+2
^DIC	UPDEUID+12
^DIE	DELEUID+5, UPD+7
UPDATE^DIE	ADD+8
^DIK	DEL+11, DELPTREC+7
$$GET1^DIQ	UPDEUID+2, UPD+8
$$NEXTSEG^HLOPRS	PARSE+5
$$STARTMSG^HLOPRS	PARSE+2
$$FMTE^XLFDT	PROC+7

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls, GET1^DIQ
^DGCN(391.91 - [#391.91]	Classic Fileman Calls, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGCN(391.91 - [#391.91]	UPD+3, DEL+3, DELPTREC+6
^DIC(4 - [#4]	GETVARS+25
^DPT - [#2]	UPDEUID+22*, DELEUID+1

Label References

Name	Line Occurrences
$$GETLOCAL	PROC+22
ADD	PROC+46, UPD+4
DEL	PROC+45
DELEUID	PROC+43
DELPTREC	PROC+26
GETVARS	PROC+39
MSGERR	PROC+13, PROC+16, PROC+25, PROC+37, PROC+50, UPDEUID+14, ADD+11, UPD+11, DEL+7, GETVARS+5 , GETVARS+10, GETVARS+20, GETVARS+24, GETVARS+28, GETVARS+33
PARSE	PROC+4
UPD	PROC+44
UPDEUID	PROC+42

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PROC+6, UPDEUID+17
%DT	GETVARS+15!
ACKIEN	PROC+9~
AGERROR	PROC+1~, MSGERR+1*, MSGERR+2
>> AGNOW	UPDEUID+17*, UPDEUID+22
CNT	PARSE+1~, PARSE+4, PARSE+6, PARSE+7
CURICN	UPDEUID+1~, UPDEUID+2*, UPDEUID+5, UPDEUID+11, UPDEUID+14
DA	UPDEUID+7!, UPDEUID+15, UPDEUID+22, UPDEUID+23!, DELEUID+2~, DELEUID+3, ADD+1!, UPD+1!, UPD+3, UPD+4 , UPD+8, DEL+1!, DEL+3, DEL+4, DELPTREC+1~, DELPTREC+5, DELPTREC+6
DA(1	UPDEUID+8*, UPDEUID+9, UPDEUID+22
DATA	PROC+1~, PROC+4, PROC+5, PROC+22, GETLOCAL~, PARSE~
DATA(	PROC+30, PROC+31, PROC+34!, PROC+42, GETLOCAL+4, GETLOCAL+5, GETLOCAL+7, GETLOCAL+9, GETLOCAL+10, GETVARS+2 , GETVARS+7, GETVARS+11, GETVARS+13, GETVARS+17, GETVARS+21, GETVARS+30, PARSE+7*
DATA("HDR"	PROC+22, PROC+41, ADD+12, UPD+12, DEL+8, DEL+12, GETVARS+35, PARSE+3*
DATA(1	PROC+10, PROC+14
DD	ADD+1!
DIC	UPDEUID+7!, UPDEUID+9*, UPDEUID+16!, UPDEUID+23!, ADD+1!, UPD+1!, DEL+1!
DIC(0	UPDEUID+10*
DIE	UPDEUID+7!, UPDEUID+16!, UPDEUID+23!, DELEUID+2~, DELEUID+3, UPD+1!, UPD+5, DEL+1!
DIK	DEL+10, DELPTREC+1~, DELPTREC+4
DIR	UPDEUID+7!, UPDEUID+16!, UPDEUID+23!, UPD+1!, DEL+1!
DO	ADD+1!
DR	UPDEUID+7!, UPDEUID+16!, UPDEUID+23!, DELEUID+2~, DELEUID+4, UPD+1!, UPD+6, DEL+1!
>> DTLASTTR	ADD+4, UPD+6, GETVARS+11, GETVARS+12, GETVARS+15, GETVARS+16
ERROR	PROC+1~, PROC+13, PROC+16, PROC+25, PROC+36, PROC+37, PROC+49, PROC+50, ADD+11, UPD+11* , DEL+7*, MSGERR~, MSGERR+1
EUID	GETLOCAL+1~, GETLOCAL+3, GETLOCAL+10, UPDEUID~, UPDEUID+5, UPDEUID+6, ADD+6, GETVARS+17*, GETVARS+18
FDA	ADD+1!
FDA(1	ADD+2, ADD+3, ADD+4, ADD+5, ADD+6*
FDAIEN	ADD+1!
GARBLED	PROC+1~, PROC+28, PROC+35, PROC+38
HLMSGIEN	PROC~, PROC+4, PROC+13, PROC+16, PROC+25, PROC+37, PROC+48, PROC+50, UPDEUID+14, ADD+11 , UPD+11, DEL+7, GETVARS+5, GETVARS+10, GETVARS+20, GETVARS+24, GETVARS+28, GETVARS+33, MSGERR~, MSGERR+1
HLMSTATE	PROC+1~, PROC+4, PARSE~, PARSE+2, PARSE+5
HLMSTATE("HDR"	PARSE+3
ICNEUID	PROC+1~, PROC+9~, PROC+42*
IEN	DELPTREC+1~
>> INST	ADD+3, ADD+10, UPD+3, UPD+9, DEL+3, DEL+6, GETVARS+25*, GETVARS+26
LOCALID	PROC+9~, PROC+22, PROC+24, PROC+26, PROC+47, PROC+50, GETLOCAL+1~, GETLOCAL+3, GETLOCAL+9*, GETLOCAL+13 , UPDEUID~, UPDEUID+2, UPDEUID+6, UPDEUID+8, UPDEUID+14, DELEUID~, DELEUID+1, DELEUID+3, ADD+2, ADD+10 , ADD+11, UPD+3, UPD+9, UPD+11, DEL+3, DEL+6, DEL+7, GETVARS+5, GETVARS+10, GETVARS+20 , GETVARS+24, GETVARS+28, GETVARS+33, DELPTREC~, DELPTREC+6, MSGERR~, MSGERR+2
LSTATNUM	GETLOCAL~, GETLOCAL+8
MFK	PROC+1~, PROC+5*
MFK(	PROC+34!, ADD+12, UPD+12, DEL+8, DEL+12, GETVARS+35*
MFNCTLID	GETVARS+1~, GETVARS+7*, GETVARS+8
MFNERR	PROC+1~
MFNERR(	ADD+10, ADD+11, ADD+12, UPD+9, UPD+11, UPD+12, DEL+6, DEL+7, DEL+8, DEL+12 , GETVARS+4, GETVARS+5, GETVARS+9, GETVARS+10, GETVARS+19, GETVARS+20, GETVARS+23, GETVARS+24, GETVARS+27, GETVARS+28 , GETVARS+32*, GETVARS+33, GETVARS+34, GETVARS+35
MIEN	PARSE~, PARSE+2
MSGID	PROC+1~
MSGIEN	MSGERR~
MSGSEG	PROC+1~
NOW	PROC+6, PROC+7, PROC+8*, UPDEUID+1~, ADD+12, UPD+12, DEL+8, DEL+12, GETVARS+35
NXT	PROC+9~
OSTANAME	PROC+9~
OSTANUMB	PROC+9~
>> REMOTEID	PROC+41, PROC+42, PROC+43, ADD+5, GETVARS+30*, GETVARS+31
RESULT	ADD+1!
SEG	PARSE+1~, PARSE+5, PARSE+7
SEGIEN	PROC+9~, PROC+29, PROC+30, PROC+31, PROC+34, PROC+39, PROC+42, GETLOCAL+1~, GETLOCAL+3, GETLOCAL+4 , GETLOCAL+5, GETLOCAL+7, GETLOCAL+9, GETLOCAL+10, ADD+10, ADD+11, ADD+12, UPD+9, UPD+11, UPD+12 , DEL+6, DEL+7, DEL+8, DEL+12, GETVARS~, GETVARS+2, GETVARS+4, GETVARS+5, GETVARS+7, GETVARS+9 , GETVARS+10, GETVARS+11, GETVARS+13, GETVARS+17, GETVARS+19, GETVARS+20, GETVARS+21, GETVARS+23, GETVARS+24, GETVARS+27 , GETVARS+28, GETVARS+30, GETVARS+32, GETVARS+33, GETVARS+34, GETVARS+35
SEGMENT	PROC+9~, PROC+10, PROC+11, PROC+12, PROC+31, PROC+32, PROC+33, GETLOCAL+1~, GETLOCAL+5*, GETLOCAL+6
SETICN	PROC+9~
STATNUM	PROC+41, GETLOCAL+1~, GETLOCAL+7, GETLOCAL+8, ADD+12, UPD+12, DEL+8, DEL+12, GETVARS+21, GETVARS+22 , GETVARS+25, GETVARS+27, GETVARS+35
SUCCESS	PROC~, PROC+3*, PROC+47, PROC+48
>> TIMELST	GETVARS+13*, GETVARS+16
>> TYPEUPD	PROC+14*, PROC+15, PROC+26
U	UPDEUID+22, DELEUID+1
UPDERR	ADD+1!
UPDERR("DIERR"	ADD+9, ADD+10
>> UPDTYPE	PROC+42, PROC+43, PROC+44, PROC+45, PROC+46, ADD+12, UPD+12, DEL+8, DEL+12, GETVARS+2* , GETVARS+3, GETVARS+35
>> X	UPDEUID+11, GETVARS+15
>> Y	UPDEUID+13, UPDEUID+15, GETVARS+15

Customize PDF page

Package: Patient Registration MPI

Routine: AGMPHMFN

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: