Routine: AGEDERR2

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
IHS Patient Registration	7	($$CHOM,$$CMIG)^AGED10A $$CLANG^AGED10B ($$DECEASED,$$PTACTIVE)^AGEDERR2 ($$RQETH,$$RQPRF,$$RQPRM,$$RQRACE)^AGEDERR4 $$ISACTIVE^AGINS $$NEEDTOSQ^AGUTILS ($$INSTYP,$$RACE)^AGUTL
VA Fileman	2	^%DTC ($$GET1,GETS)^DIQ
IHS Patient	1	$$AGE^AUPNPAT

Package	Total	Caller Graph
IHS Patient Registration	12	AGAGERP3 AGED42 AGED62 AGED8 AGEDERR AGEDERR1 AGEDERR2 AGEDERR3 AGEDERR4 AGEDGUAR AGEDIT AGEROVR
Patient Registration GUI	2	AGGEXPRT AGGPTUPD

Package

Total

Caller Graph

IHS Patient Registration

AGAGERP3 AGED42 AGED62 AGED8 AGEDERR AGEDERR1 AGEDERR2 AGEDERR3
AGEDERR4 AGEDGUAR AGEDIT AGEROVR

Patient Registration GUI

AGGEXPRT AGGPTUPD

Entry Points

Name	Comments	DBIA/ICR reference
ISDEPEND(DFN)	;EP - IF PATIENT IS LISTED AS A DEPENDENT IN THE POLICY HOLDER
LPREE(DFN)	;EP
ACTELIG(DFN,ELIGSTR)	;EP - DOES THE PATIENT HAVE ACTIVE ELIGIBILITY?
PETHNICE(DFN)	;EP
HIP(DFN)	;EP
PMIG(DFN)	;EP
GUARADD(GUARINFO)	;EP
DECEASED(DFN)	;EP - IS THE PATIENT DECEASED?
LPRE(DFN)	;EP
LPRM(DFN)	;EP
PRACEE(DFN)	;EP
LPRME(DFN)	;EP
OVER65(DFN)	;EP - CHECK TO SEE IF PATIENT IS OVER 65 YEARS OLD
WEB(DFN)	;
ISMCD(INSPTR)	;EP - RETURN TRUE IF MEDICAID INSURER
HASELIG(DFN)	;EP - DOES THE PATIENT HAVE ELIGIBILITY AT ALL
PHOM(DFN)	;EP
CURRUPD(DFN,DAYS)	;EP - HAS THE PATIENT BEEN UPDATED IN THE PAST YEAR
PETHNIC(DFN)	;EP
PRACE(DFN)	;EP
PTACTIVE(DFN)	;EP - SEE IF PATIENT IS ACTIVE IN AT LEAST ONE FACILTY
AOBCHEK(DFN)	;EP - DETERMINE AOB DATE TO CHECK FOR OVERDUE
FACCHK(DFN)	;EP - CALLED BY SEQMAN^AGEDERR TO FIND FAC FOR EDIT CHECK # 33

External References

Name	Field # of Occurrence
^%DTC	CURRUPD+6, WEB+8
$$CHOM^AGED10A	PHOM+10
$$CMIG^AGED10A	PMIG+10
$$CLANG^AGED10B	LPRM+10, LPRME+10, LPRE+11, LPREE+11
$$DECEASED^AGEDERR2	WEB+2, PRACE+7, PRACEE+7, PETHNIC+7, PETHNICE+7, PMIG+4, PHOM+4, LPRM+7, LPRME+7, LPRE+7 , LPREE+7, HIP+4
$$PTACTIVE^AGEDERR2	WEB+3, PRACE+8, PRACEE+8, PETHNIC+8, PETHNICE+8, PMIG+5, PHOM+5, LPRM+8, LPRME+8, LPRE+8 , LPREE+8, HIP+5
$$RQETH^AGEDERR4	PETHNIC+5, PETHNICE+5
$$RQPRF^AGEDERR4	LPRE+5, LPREE+5
$$RQPRM^AGEDERR4	LPRM+5, LPRME+5
$$RQRACE^AGEDERR4	PRACE+5, PRACEE+5
$$ISACTIVE^AGINS	ACTELIG+9, AOBCHEK+11
$$NEEDTOSQ^AGUTILS	FACCHK+5
$$INSTYP^AGUTL	ISMCD+3
$$RACE^AGUTL	PRACE+13, PRACEE+13
$$AGE^AUPNPAT	OVER65+1
$$GET1^DIQ	PETHNIC+11, PETHNIC+12, PETHNICE+11, PETHNICE+12, HIP+8, HIP+10
GETS^DIQ	LPRE+20, LPREE+20

FileNo	Call Tags
2.06	GET1^DIQ
^AUPNPAT - [#9000001]	GET1^DIQ
9000001.86	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPN3PPH("C"	ISDEPEND+7
^AUPNMCD("B"	HASELIG+3, HASELIG+5
^AUPNMCR("B"	HASELIG+3, HASELIG+4
^AUPNPAT - [#9000001]	CURRUPD+2, CURRUPD+3, PTACTIVE+3, PTACTIVE+4, FACCHK+4, WEB+4
^AUPNPRVT - [#9000006]	ISDEPEND+6, ISDEPEND+7
^AUPNPRVT("B"	HASELIG+3, HASELIG+7, ISDEPEND+4
^AUPNRRE("B"	HASELIG+3, HASELIG+6
^DPT - [#2]	DECEASED+1, PETHNIC+10, PETHNICE+10

Name	Line Occurrences
$$ACTELIG	HASELIG+8
@(	ACTELIG+5, AOBCHEK+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIVE	ACTELIG+1~, ACTELIG+2, ACTELIG+3, ACTELIG+6, ACTELIG+8, ACTELIG+9, ACTELIG+10, AOBCHEK+1~, AOBCHEK+2, AOBCHEK+5* , PTACTIVE+1, PTACTIVE+3, PTACTIVE+4, PTACTIVE+5
AGINS	ACTELIG+1~, AOBCHEK+1~
AGINS(	ACTELIG+8, ACTELIG+9, AOBCHEK+8, AOBCHEK+9, AOBCHEK+10
>> AGOPT(22	HIP+7
>> AGOPT(26	PMIG+8
>> AGOPT(27	PHOM+8
ALLMISS	GUARADD+1~, GUARADD+2, GUARADD+8, GUARADD+9*, GUARADD+10
BEGDT	AOBCHEK+1~, AOBCHEK+9*, AOBCHEK+11, AOBCHEK+12
CALL	ACTELIG+1~, ACTELIG+4, ACTELIG+5, AOBCHEK+1~, AOBCHEK+3, AOBCHEK+4
DAYS	CURRUPD~, CURRUPD+7
DEF	LPRE+1~, LPRE+11, LPRE+12, LPRE+16, LPRE+17, LPREE+1~, LPREE+11, LPREE+12, LPREE+16, LPREE+17
DFN	HASELIG~, HASELIG+3, HASELIG+4, HASELIG+5, HASELIG+6, HASELIG+7, HASELIG+8, ACTELIG~, ACTELIG+4, AOBCHEK~ , AOBCHEK+3, ISDEPEND~, ISDEPEND+4, ISDEPEND+6, ISDEPEND+7, CURRUPD~, CURRUPD+2, CURRUPD+3, OVER65~, OVER65+1 , DECEASED~, DECEASED+1, PTACTIVE~, PTACTIVE+3, PTACTIVE+4, FACCHK~, FACCHK+4, FACCHK+5, WEB~, WEB+1 , WEB+2, WEB+3, WEB+4, PRACE~, PRACE+2, PRACE+7, PRACE+8, PRACE+13, PRACEE~, PRACEE+2 , PRACEE+7, PRACEE+8, PRACEE+13, PETHNIC~, PETHNIC+2, PETHNIC+7, PETHNIC+8, PETHNIC+10, PETHNIC+11, PETHNIC+12 , PETHNICE~, PETHNICE+2, PETHNICE+7, PETHNICE+8, PETHNICE+10, PETHNICE+11, PETHNICE+12, PMIG~, PMIG+2, PMIG+4 , PMIG+5, PMIG+10, PHOM~, PHOM+2, PHOM+4, PHOM+5, PHOM+10, LPRM~, LPRM+2, LPRM+7 , LPRM+8, LPRM+10, LPRME~, LPRME+2, LPRME+7, LPRME+8, LPRME+10, LPRE~, LPRE+2, LPRE+7 , LPRE+8, LPRE+11, LPRE+20, LPREE~, LPREE+2, LPREE+7, LPREE+8, LPREE+11, LPREE+20, HIP~ , HIP+2, HIP+4, HIP+5, HIP+8, HIP+10
DT	CURRUPD+4, CURRUPD+5, WEB+7
DUZ(2	PRACE+5, PRACEE+5, PETHNIC+5, PETHNICE+5, LPRM+5, LPRME+5, LPRE+5, LPREE+5
ELIGSTR	ACTELIG~, ACTELIG+3
ENDDT	AOBCHEK+1~, AOBCHEK+10*, AOBCHEK+11, AOBCHEK+13
ERROR	LPRE+1~, LPREE+1~
ETHNIC	PETHNIC+1~, PETHNIC+10, PETHNIC+11, PETHNIC+12, PETHNIC+13, PETHNICE+1~, PETHNICE+10, PETHNICE+11, PETHNICE+12, PETHNICE+13
FAC	PTACTIVE+2, PTACTIVE+3, PTACTIVE+4, FACCHK+1~, FACCHK+3, FACCHK+4, FACCHK+5
FND	LPRE+1~, LPRE+21, LPRE+23, LPRE+24, LPREE+1~, LPREE+21, LPREE+23, LPREE+24
GUARINFO	GUARADD~, GUARADD+3, GUARADD+4
>> GUARPTR	GUARADD+4*, GUARADD+5, GUARADD+6, GUARADD+7
HIC	HIP+1~, HIP+8*, HIP+9
HIP	HIP+1~, HIP+10*, HIP+11
HOM	PHOM+1~, PHOM+10*, PHOM+11, PHOM+15
HSTS	PHOM+1~, PHOM+11*, PHOM+12, PHOM+13, PHOM+16
HTYP	PHOM+1~, PHOM+15*, PHOM+16
IEN	LPRE+1~, LPRE+16, LPRE+20, LPRE+21, LPRE+22, LPREE+1~, LPREE+16, LPREE+20, LPREE+21, LPREE+22
INSPTR	ISMCD~, ISMCD+1, ISMCD+3
ISDEPEND	ISDEPEND+2~, ISDEPEND+3, ISDEPEND+6, ISDEPEND+7, ISDEPEND+8
LNG	LPRM+1~, LPRM+11, LPRM+12, LPRM+13, LPRM+14, LPRME+1~, LPRME+11, LPRME+12, LPRME+13, LPRME+14 , LPRE+1~, LPRE+22, LPRE+23, LPREE+1~, LPREE+22, LPREE+23
>> LSTUPD	WEB+4*, WEB+5, WEB+6
MIG	PMIG+1~, PMIG+10*, PMIG+11, PMIG+15
MOC	PETHNIC+1~, PETHNIC+11, PETHNICE+1~, PETHNICE+11
MSTREEDT	AOBCHEK+1~, AOBCHEK+6, AOBCHEK+13
MSTRESDT	AOBCHEK+1~, AOBCHEK+6, AOBCHEK+12, AOBCHEK+14
MSTS	PMIG+1~, PMIG+11*, PMIG+12, PMIG+13, PMIG+16
MTYP	PMIG+1~, PMIG+15*, PMIG+16
OLNG	LPRE+1~, LPREE+1~
OLNG("9000001.8605"	LPRE+21, LPRE+22, LPREE+21, LPREE+22
PIECE	ACTELIG+1~, ACTELIG+3*
PRE	LPRE+1~, LPRE+12, LPRE+13, LPRE+18, LPRE+23, LPREE+1~, LPREE+12, LPREE+13, LPREE+18, LPREE+23
PRMX	LPRE+1~, LPRE+17, LPRE+18, LPREE+1~, LPREE+17, LPREE+18
>> REC	ISDEPEND+5, ISDEPEND+6, ISDEPEND+7
SEL	ACTELIG+1~, ACTELIG+2, AOBCHEK+1~, AOBCHEK+2
SEQ	ACTELIG+1~, ACTELIG+7, ACTELIG+8, ACTELIG+9, AOBCHEK+1~, AOBCHEK+7, AOBCHEK+8, AOBCHEK+9, AOBCHEK+10
>> SEQREQ	FACCHK+2, FACCHK+4, FACCHK+5, FACCHK+6
TARDT	AOBCHEK+1~, AOBCHEK+14*, AOBCHEK+15
>> TYPE	ACTELIG+3*, ACTELIG+4
U	HASELIG+2, HASELIG+4, HASELIG+5, HASELIG+6, HASELIG+7, HASELIG+8, ACTELIG+3, ACTELIG+4, ACTELIG+9, AOBCHEK+9 , AOBCHEK+10, ISDEPEND+7, CURRUPD+2, CURRUPD+3, DECEASED+1, PTACTIVE+4, GUARADD+4, GUARADD+9, PMIG+11, PMIG+15 , PHOM+11, PHOM+15, LPRM+11, LPRM+13, LPRM+14, LPRME+11, LPRME+13, LPRME+14, LPRE+12, LPRE+16 , LPRE+17, LPREE+12, LPREE+16, LPREE+17
VAL	LPRM+1~, LPRM+10, LPRM+11, LPRM+13, LPRM+14, LPRME+1~, LPRME+10, LPRME+11, LPRME+13, LPRME+14
X	HASELIG+1~, HASELIG+2, HASELIG+4, HASELIG+5, HASELIG+6, HASELIG+7, HASELIG+8, CURRUPD+1~, CURRUPD+7, GUARADD+7 , GUARADD+8, GUARADD+9, WEB+9
X1	CURRUPD+1~, CURRUPD+5, WEB+7
X2	CURRUPD+1~, CURRUPD+2, CURRUPD+3, CURRUPD+4, WEB+6

Customize PDF page

Package: IHS Patient Registration

Routine: AGEDERR2

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 14

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: