Routine: AG71A

Package	Total	Call Graph
IHS Patient Registration	9	$$INSTALLD^AG71ENV ^AG71POST ^AGCNVAOB ^AGCNVBEN ^AGCNVIMP ^AGCNVMOD ^AGCNVTPL START^AGCNVWC ^AGMCDCNT
Kernel	3	$$HTE^XLFDT $$ADD^XPDMENU (BMES,MES)^XPDUTL
VA Fileman	2	(,WP)^DIE ^DIK
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP - From KIDS.
PRVT	;CLEAR ANY PRIVATE ELIG RECORDS MISSING INSURER POINTER
SINGLE(K)	;EP - Get holders of a single key K.
RRE	;FIX "B" X-REF ENTRIES WITH NO ZERO RECORD
MCD	;CLEAR MCD RECORDS MISSING .01 FIELD
TS
STATEMSG(ARRAY,LN)	;EP - SEND MSG ABOUT MEDICAID ENTRIES MISSING STATE FIELD
MAIL	;Send install mail message.
POST	;EP - From KIDS.
AGFAC	;POPULATE NEW REGISTRATION PARAMETERS IF BLANK
OPTRES(AGM)	;
MCR	;

External References

Name	Field # of Occurrence
$$INSTALLD^AG71ENV	POST+54, POST+59
^AG71POST	POST+52
^AGCNVAOB	POST+47
^AGCNVBEN	POST+42
^AGCNVIMP	POST+27
^AGCNVMOD	POST+21
^AGCNVTPL	POST+32
START^AGCNVWC	POST+37
^AGMCDCNT	POST+18
^DIE	MCD+8
WP^DIE	AGFAC+14
^DIK	PRVT+7, PRVT+9
$$HTE^XLFDT	TS
^XMD	MAIL+14
$$ADD^XPDMENU	OPTRES+5
BMES^XPDUTL	POST+1, POST+5, POST+8, POST+11, POST+14, POST+17, POST+20, POST+26, POST+31, POST+36 , POST+41, POST+46, POST+51, POST+55, POST+57, POST+63, POST+67, OPTRES+1, OPTRES+3, OPTRES+5
MES^XPDUTL	TS

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNMCD - [#9000004]	Classic Fileman Calls
^AUPNPRVT - [#9000006]	Classic Fileman Calls
^AGFAC - [#9009061]	WP^DIE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AGEDERRS - [#9009061.5]	PRE+3!
^AGFAC - [#9009061]	AGFAC+5, AGFAC+6, AGFAC+7, AGFAC+8, AGFAC+13
^AGFAC("B"	AGFAC+2, AGFAC+4
^AUPNMCD - [#9000004]	MCD+5, MCD+6!, MCD+8, MCD+9, MCD+11, MCD+12!, MCD+19!
^AUPNMCD("AB"	MCD+15, MCD+16, MCD+17, MCD+18, MCD+19!
^AUPNMCR - [#9000003]	MCR+3!, MCR+5, MCR+6!
^AUPNMCR("B"	MCR+2, MCR+3!, MCR+6!
^AUPNPAT - [#9000001]	MCD+9
^AUPNPRVT - [#9000006]	PRVT+3, PRVT+5, PRVT+6!, PRVT+7, PRVT+8, PRVT+12!
^AUPNPRVT("B"	PRVT+10, PRVT+11, PRVT+12!
^AUPNRRE - [#9000005]	RRE+4!, RRE+6, RRE+7!
^AUPNRRE("B"	RRE+3, RRE+4!, RRE+7!
^DPT - [#2]	MCD+9
^TMP("AG71MS"	MAIL+2!, MAIL+3, MAIL+4, MAIL+5, MAIL+6, MAIL+11, MAIL+15!, STATEMSG+4
^XTMP("AG71"	OPTRES+3, OPTRES+5
^XTMP("XPDI"	MAIL+11
^XUSEC(	SINGLE+3, SINGLE+4

Label References

Name	Line Occurrences
AGFAC	POST+3
MAIL	POST+56, POST+65
MCD	POST+12
MCR	POST+15
OPTRES	POST+61
PRVT	POST+6
RRE	POST+9
SINGLE	MAIL+13
STATEMSG	MAIL+8
TS	POST+1, POST+5, POST+8, POST+11, POST+14, POST+17, POST+20, POST+26, POST+31, POST+36 , POST+41, POST+46, POST+51, POST+55, POST+57, POST+61, POST+63, POST+67

Naked Globals

Name	Field # of Occurrence
^(	MAIL+11, OPTRES+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	MAIL+10, MAIL+11, MAIL+13*
AG	OPTRES+2~, OPTRES+4, OPTRES+5
AGERRLST	MAIL+8, MAIL+9!, MCD+2!
AGERRLST(	MCD+9*
AGFAC	AGFAC+1, AGFAC+2, AGFAC+4, AGFAC+15!
AGFACPTR	AGFAC+3, AGFAC+4, AGFAC+5, AGFAC+6, AGFAC+7, AGFAC+8, AGFAC+13, AGFAC+14, AGFAC+15!
AGI	OPTRES+2~, OPTRES+5*
AGM	OPTRES~, OPTRES+1, OPTRES+3, OPTRES+5
AGVAL	AGFAC+15!
AGVAL("TMP"	AGFAC+9, AGFAC+10, AGFAC+11, AGFAC+12
ARRAY	STATEMSG~
ARRAY(	STATEMSG+3, STATEMSG+4
>> CNT	MAIL+7*, MAIL+8, MAIL+11
>> D1	PRVT+4, PRVT+5, PRVT+6, PRVT+7, MCD+10, MCD+11, MCD+12
>> DA	PRVT+7, PRVT+9, MCD+8*
>> DA(1	PRVT+7*
DFN	MCD+3~, MCD+9, MCD+14, MCD+15*, MCD+16, MCD+17, MCD+18, MCD+19
>> DIE	MCD+8*
DIFROM	MAIL+1~
>> DIK	PRVT+7, PRVT+9
>> DR	MCD+8*
DUZ	MAIL+12
DUZ(2	MCD+9
HRN	MCD+3~
IEN	PRE+3, PRVT+11, PRVT+12, STATEMSG+1~, STATEMSG+2, STATEMSG+3, STATEMSG+4
K	SINGLE~, SINGLE+3, SINGLE+4
LN	STATEMSG~, STATEMSG+3*, STATEMSG+4
MCDNUM	MCD+3~, MCD+17*, MCD+18, MCD+19
>> RECNO	PRVT+2, PRVT+3, PRVT+5, PRVT+6, PRVT+7, PRVT+8, PRVT+9, PRVT+10, PRVT+11, PRVT+12 , MCD+4, MCD+5, MCD+6, MCD+8, MCD+9, MCD+11, MCD+12, MCD+18, MCD+19, RRE+2* , RRE+3, RRE+4, RRE+5, RRE+6, RRE+7, MCR+1, MCR+2, MCR+3, MCR+4, MCR+5* , MCR+6
ST	MCD+3~, MCD+16*, MCD+17, MCD+18, MCD+19
U	OPTRES+5, AGFAC+5, AGFAC+6, AGFAC+7, AGFAC+8, PRVT+6, PRVT+7, PRVT+12, MCD+6, MCD+8 , MCD+9, MCD+12, MCD+19, RRE+4, RRE+7, MCR+3, MCR+6, STATEMSG+4
XMDUZ	MAIL+1~, MAIL+12*
XMSUB	MAIL+1~, MAIL+12*
XMTEXT	MAIL+1~, MAIL+12*
XMY	MAIL+1~
XMY(	MAIL+12, SINGLE+4
XMY(1	MAIL+12*
>> XPDA	MAIL+11
>> XPDBLD	MAIL+11
Y	SINGLE+1~, SINGLE+2, SINGLE+4

Marked Items

Name	Field # of Occurrence
$T(	MAIL+12

Customize PDF page

Package: IHS Patient Registration

Routine: AG71A

Information

Source Information

Call Graph

Call Graph Total: 15

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items