Routine: AGMPIHL1

Package	Total	Call Graph
Patient Registration MPI	3	$$CONDT^AGMPHLU NOTIF^AGMPIHLO ($$MPINODE,BLDPID)^AGMPIPID
Health Level Seven	2	$$HLDATE^HLFNC ($$ADDSEG,SET)^HLOAPI
Kernel	1	$$HLNAME^XLFNAME
Registration	1	$$SITE^VASITE
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
Patient Registration MPI	3	AGMPHLEU AGMPHLU AGMPIHLO

Entry Points

Name	Comments	DBIA/ICR reference
SALIAS(IEN)	;EP - GET ALIASES
FILLSTR(STR,LENGTH,JUST,FILLER)	;EP - FILL STRING TO FIXED LENGTH
SCHART(IEN)	;EP - GET ACTIVE CHARTS
MRG(DFN2)	;EP - CREATE MERGE SEGMENT
CONTPID	;EP -
MYSET(ARY,V,F,R,C,S)	;EP
PID(DFN)	;EP
PARSE(ALIASREC)	;EP - PARSE ALIAS NAME
VTQ(DFN)	;EP - CREATE VTQ DIRECT CONNECT EXACT MATCH QUERY
RDF(DFN)	;EP - CRATED RDF SEGMENT FOR VTQ MESSAGE
ZPD(DFN)	;EP - RPMS SPECIFIC DATA

External References

Name	Field # of Occurrence
$$CONDT^AGMPHLU	SCHART+13
NOTIF^AGMPIHLO	CONTPID+2, VTQ+46, RDF+84, ZPD+18, MRG+30
$$MPINODE^AGMPIPID	MRG+2
BLDPID^AGMPIPID	PID+18
$$GET1^DIQ	PID+16, ZPD+3, ZPD+4, ZPD+5, ZPD+6, ZPD+7, ZPD+8, SCHART+11, SCHART+14
$$HLDATE^HLFNC	VTQ+9
$$ADDSEG^HLOAPI	CONTPID+1, VTQ+45, RDF+83, ZPD+17, MRG+29
SET^HLOAPI	MYSET+1
$$SITE^VASITE	PID+28, PID+35, PID+42, PID+49, MRG+15, MRG+23
$$HLNAME^XLFNAME	VTQ+12, MRG+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^AUPNPAT - [#9000001]	GET1^DIQ
^AUTTTRI - [#9999999.03]	GET1^DIQ
^AUTTLOC - [#9999999.06]	GET1^DIQ
^AUTTBEN - [#9999999.25]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AGFAC - [#9009061]	SCHART+7
^AUPNPAT - [#9000001]	SCHART+6, SCHART+8, SCHART+10, SCHART+12
^DPT - [#2]	PID+3, PID+4, VTQ+7, VTQ+8, VTQ+10, VTQ+11, SALIAS+6, SALIAS+7, PARSE+2, MRG+4
^VA(20 - [#20]	SALIAS+10, SALIAS+11

Label References

Name	Line Occurrences
$$FILLSTR	SCHART+9
MYSET	PID+20, PID+21, PID+22, PID+23, PID+24, PID+25, PID+26, PID+27, PID+28, PID+29 , PID+30, PID+31, PID+32, PID+33, PID+34, PID+35, PID+36, PID+37, PID+38, PID+39 , PID+40, PID+41, PID+42, PID+43, PID+44, PID+45, PID+46, PID+47, PID+48, PID+49 , PID+50, PID+51, PID+52, PID+53, PID+54, PID+55, PID+56, PID+57, PID+58, PID+59 , PID+60, PID+61, PID+62, PID+63, PID+64, PID+65, PID+66, PID+67, PID+68, PID+69 , PID+70, PID+71, PID+72, PID+73, PID+74, PID+75, PID+76, PID+77, PID+79, PID+80 , PID+81, PID+82, PID+83, PID+84, PID+85, PID+91, PID+92, PID+93, PID+94, PID+95 , PID+96, PID+97, PID+98, PID+99, PID+100, PID+101, PID+102, PID+103, PID+104, PID+105 , PID+106, PID+107, VTQ+17, VTQ+18, VTQ+19, VTQ+20, VTQ+21, VTQ+22, VTQ+23, VTQ+24 , VTQ+25, VTQ+26, VTQ+27, VTQ+28, VTQ+29, VTQ+30, VTQ+31, VTQ+32, VTQ+33, VTQ+34 , VTQ+35, VTQ+36, VTQ+37, VTQ+38, VTQ+39, VTQ+40, VTQ+41, VTQ+42, VTQ+43, VTQ+44 , RDF+9, RDF+10, RDF+11, RDF+12, RDF+13, RDF+14, RDF+15, RDF+16, RDF+17, RDF+18 , RDF+19, RDF+20, RDF+21, RDF+22, RDF+23, RDF+24, RDF+25, RDF+26, RDF+27, RDF+28 , RDF+29, RDF+30, RDF+31, RDF+32, RDF+33, RDF+34, RDF+35, RDF+36, RDF+37, RDF+38 , RDF+39, RDF+40, RDF+41, RDF+42, RDF+43, RDF+44, RDF+45, RDF+46, RDF+47, RDF+48 , RDF+49, RDF+50, RDF+51, RDF+52, RDF+53, RDF+54, RDF+55, RDF+56, RDF+57, RDF+58 , RDF+59, RDF+60, RDF+61, RDF+62, RDF+63, RDF+64, RDF+65, RDF+66, RDF+67, RDF+68 , RDF+69, RDF+70, RDF+71, RDF+72, RDF+73, RDF+74, RDF+75, RDF+76, RDF+77, RDF+78 , RDF+79, RDF+80, RDF+81, RDF+82, ZPD+9, ZPD+10, ZPD+11, ZPD+12, ZPD+13, ZPD+14 , SCHART+15, SCHART+16, SCHART+17, SCHART+18, SCHART+19, SALIAS+20, SALIAS+21, SALIAS+22, SALIAS+23, SALIAS+24 , PARSE+6, PARSE+7, PARSE+8, MRG+9, MRG+10, MRG+11, MRG+12, MRG+13, MRG+14, MRG+15 , MRG+16, MRG+17, MRG+18, MRG+19, MRG+20, MRG+21, MRG+22, MRG+23, MRG+24, MRG+25 , MRG+26, MRG+27, MRG+28
PARSE	SALIAS+8
SALIAS	PID+88
SCHART	ZPD+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ALIAS	PARSE+2*, PARSE+3, PARSE+4, PARSE+5
ALIASDAT	SALIAS+1~, SALIAS+11*, SALIAS+12, SALIAS+14, SALIAS+15, SALIAS+16, SALIAS+17, SALIAS+18
>> ALIASFST	SALIAS+15, SALIAS+21, PARSE+4, PARSE+7
>> ALIASLST	SALIAS+14, SALIAS+20, PARSE+3, PARSE+6
>> ALIASMID	SALIAS+16, SALIAS+22, PARSE+5, PARSE+8
>> ALIASPRE	SALIAS+17*, SALIAS+23
ALIASREC	SALIAS+1~, SALIAS+4, SALIAS+6, SALIAS+7, SALIAS+8, PARSE~, PARSE+2
>> ALIASSUF	SALIAS+18*, SALIAS+24
ARY	PID+20, PID+21, PID+22, PID+23, PID+24, PID+25, PID+26, PID+27, PID+28, PID+29 , PID+30, PID+31, PID+32, PID+33, PID+34, PID+35, PID+36, PID+37, PID+38, PID+39 , PID+40, PID+41, PID+42, PID+43, PID+44, PID+45, PID+46, PID+47, PID+48, PID+49 , PID+50, PID+51, PID+52, PID+53, PID+54, PID+55, PID+56, PID+57, PID+58, PID+59 , PID+60, PID+61, PID+62, PID+63, PID+64, PID+65, PID+66, PID+67, PID+68, PID+69 , PID+70, PID+71, PID+72, PID+73, PID+74, PID+75, PID+76, PID+77, PID+79, PID+80 , PID+81, PID+82, PID+83, PID+84, PID+85, PID+91, PID+92, PID+93, PID+94, PID+95 , PID+96, PID+97, PID+98, PID+99, PID+100, PID+101, PID+102, PID+103, PID+104, PID+105 , PID+106, PID+107, CONTPID+1, VTQ+17, VTQ+18, VTQ+19, VTQ+20, VTQ+21, VTQ+22, VTQ+23 , VTQ+24, VTQ+25, VTQ+26, VTQ+27, VTQ+28, VTQ+29, VTQ+30, VTQ+31, VTQ+32, VTQ+33 , VTQ+34, VTQ+35, VTQ+36, VTQ+37, VTQ+38, VTQ+39, VTQ+40, VTQ+41, VTQ+42, VTQ+43 , VTQ+44, VTQ+45, RDF+9, RDF+10, RDF+11, RDF+12, RDF+13, RDF+14, RDF+15, RDF+16 , RDF+17, RDF+18, RDF+19, RDF+20, RDF+21, RDF+22, RDF+23, RDF+24, RDF+25, RDF+26 , RDF+27, RDF+28, RDF+29, RDF+30, RDF+31, RDF+32, RDF+33, RDF+34, RDF+35, RDF+36 , RDF+37, RDF+38, RDF+39, RDF+40, RDF+41, RDF+42, RDF+43, RDF+44, RDF+45, RDF+46 , RDF+47, RDF+48, RDF+49, RDF+50, RDF+51, RDF+52, RDF+53, RDF+54, RDF+55, RDF+56 , RDF+57, RDF+58, RDF+59, RDF+60, RDF+61, RDF+62, RDF+63, RDF+64, RDF+65, RDF+66 , RDF+67, RDF+68, RDF+69, RDF+70, RDF+71, RDF+72, RDF+73, RDF+74, RDF+75, RDF+76 , RDF+77, RDF+78, RDF+79, RDF+80, RDF+81, RDF+82, RDF+83, ZPD+9, ZPD+10, ZPD+11 , ZPD+12, ZPD+13, ZPD+14, ZPD+17, SCHART+15, SCHART+16, SCHART+17, SCHART+18, SCHART+19, SALIAS+20 , SALIAS+21, SALIAS+22, SALIAS+23, SALIAS+24, PARSE+6, PARSE+7, PARSE+8, MRG+9, MRG+10, MRG+11 , MRG+12, MRG+13, MRG+14, MRG+15, MRG+16, MRG+17, MRG+18, MRG+19, MRG+20, MRG+21 , MRG+22, MRG+23, MRG+24, MRG+25, MRG+26, MRG+27, MRG+28, MRG+29, MYSET~, MYSET+1
ASU	PID+1~
BENCLASS	ZPD+1~, ZPD+2, ZPD+7, ZPD+13
BENPTR	ZPD+1~, ZPD+6*, ZPD+7
C	MYSET~, MYSET+1
COMP	PID+1~, VTQ+12, VTQ+13, VTQ+14, VTQ+15, PARSE+1*, MRG+5, MRG+6, MRG+7, MRG+8
COMPTR	SALIAS+1~, SALIAS+7*, SALIAS+8, SALIAS+10, SALIAS+11
>> DATEINAC	SCHART+12, SCHART+13, SCHART+19
DFN	PID~, PID+2, PID+3, PID+4, PID+18, PID+37, PID+88, CONTPID+2, VTQ~, VTQ+4 , VTQ+7, VTQ+8, VTQ+10, VTQ+11, VTQ+18, VTQ+46, RDF~, RDF+6, RDF+84, ZPD~ , ZPD+3, ZPD+5, ZPD+6, ZPD+8, ZPD+16, ZPD+18, MRG+30
DFN2	MRG~, MRG+2, MRG+4, MRG+17
DOB	VTQ+5~, VTQ+8, VTQ+9, VTQ+36
DUZ(2	PID+16
DUZ2	SCHART+1~, SCHART+4, SCHART+6, SCHART+7, SCHART+8, SCHART+10, SCHART+12, SCHART+14
ELIGSTAT	ZPD+1~, ZPD+2, ZPD+5, ZPD+12
ERR	PID+2, PID+3, PID+4*, PID+17!, PID+18, CONTPID+1, CONTPID+2, VTQ+45, VTQ+46, RDF+83 , RDF+84, ZPD+17, ZPD+18, MRG+29, MRG+30
F	MYSET~, MYSET+1
>> FACNAME	PID+16*, PID+27, PID+34, PID+41, PID+48
FILL	FILLSTR+1~, FILLSTR+5*, FILLSTR+6, FILLSTR+7
FILLER	FILLSTR~, FILLSTR+5
FIRSTNAM	VTQ+5~, VTQ+14, VTQ+32, MRG+7, MRG+26
FIRSTNM	MRG+1~
FLD	PID+1~
>> HL1	PID+18
>> HL1("FS"	PID+22, PID+23, PID+44, PID+52, PID+53, PID+54, PID+55, PID+56, PID+57, PID+58 , PID+59, PID+60, PID+61, PID+62, PID+63, PID+64, PID+65, PID+66, PID+67, PID+68 , PID+69, PID+70, PID+71, PID+72, PID+73, PID+74, PID+75, PID+76, PID+77, PID+91 , PID+92, PID+93, PID+94, PID+95, PID+96, PID+97, PID+98, PID+99, PID+100, PID+101 , PID+102, PID+103, PID+104, PID+105, PID+106, PID+107
>> HLST	CONTPID+1, VTQ+45, RDF+83, ZPD+17, MRG+29
HRCN	PID+1~
>> HRN	SCHART+8, SCHART+9, SCHART+16
>> HRNFAC	SCHART+10*, SCHART+11, SCHART+17
HRNREC	SCHART+1~
ICN	MRG+1~, MRG+3*, MRG+10
IEN	SCHART~, SCHART+6, SCHART+8, SCHART+10, SCHART+12, SALIAS~, SALIAS+6, SALIAS+7, PARSE+2
INACTIVE	SCHART+1~, SCHART+2*
JUST	FILLSTR~, FILLSTR+2*, FILLSTR+6
LASTNAM	VTQ+5~, VTQ+13*, MRG+1~
>> LASTNAME	VTQ+24, MRG+6*, MRG+25
LENGTH	FILLSTR~, FILLSTR+2*, FILLSTR+3, FILLSTR+4, FILLSTR+5
LP	PID+1~
MIDNAME	VTQ+5~, VTQ+15, VTQ+44, MRG+1~, MRG+8, MRG+27
NAME	VTQ+5~, VTQ+11, VTQ+12, VTQ+13, VTQ+14, VTQ+15, MRG+1~, MRG+4, MRG+5, MRG+6 , MRG+7, MRG+8
NODE	MRG+1~, MRG+2*, MRG+3
PID	PID+17!, PID+18
PID(1	PID+19*, PID+22, PID+23, PID+30, PID+44, PID+52, PID+53, PID+54, PID+55, PID+56 , PID+57, PID+58, PID+59, PID+60, PID+61, PID+62, PID+63, PID+64, PID+65, PID+66 , PID+67, PID+68, PID+69, PID+70, PID+71, PID+72, PID+73, PID+74, PID+75, PID+76 , PID+77, PID+79, PID+80, PID+81, PID+82, PID+83, PID+84, PID+91, PID+92, PID+93 , PID+94, PID+95, PID+96, PID+97, PID+98, PID+99, PID+100, PID+101, PID+102, PID+103 , PID+104, PID+105, PID+106, PID+107
PID(2	PID+19
QUANTUM	ZPD+1~, ZPD+2, ZPD+8, ZPD+14
R	MYSET~, MYSET+1
RDF	RDF+7~, RDF+83*
S	MYSET~, MYSET+1
SALIAS	SALIAS+1~, SALIAS+3*
SCHART	SCHART+1~, SCHART+3*
SEQ	SCHART+1~, SCHART+6, SCHART+15, SCHART+16, SCHART+17, SCHART+18, SCHART+19, SALIAS+5, SALIAS+8, SALIAS+13 , SALIAS+20, SALIAS+21, SALIAS+22, SALIAS+23, SALIAS+24, PARSE+6, PARSE+7, PARSE+8
SEX	VTQ+5~, VTQ+7*, VTQ+40
SSN	VTQ+5~, VTQ+10*, VTQ+28
STAT	SCHART+1~, SCHART+14*, SCHART+15
STR	FILLSTR~, FILLSTR+3, FILLSTR+4, FILLSTR+5, FILLSTR+6, FILLSTR+7*, FILLSTR+8
SUBCOMP	PID+1~
TRIBECOD	ZPD+1~, ZPD+2, ZPD+4, ZPD+11
TRIBEPTR	ZPD+1~, ZPD+3*, ZPD+4
U	PID+4, VTQ+7, VTQ+8, VTQ+10, VTQ+11, SCHART+7, SCHART+8, SCHART+10, SCHART+12, SALIAS+7 , SALIAS+14, SALIAS+15, SALIAS+16, SALIAS+17, SALIAS+18, PARSE+2, MRG+3, MRG+4
UNIQID	SCHART+1~, SCHART+11*, SCHART+18
V	MYSET~, MYSET+1
VAL	PID+1~
VTQ	VTQ+5~, VTQ+45*
>> X	CONTPID+1, ZPD+17, MRG+29*

Customize PDF page

Package: Patient Registration MPI

Routine: AGMPIHL1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 3

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: