Routine: AGEDERR

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
IHS Patient Registration	3	($$CURRUPD,$$DECEASED,$$FACCHK,$$HASELIG,$$PTACTIVE)^AGEDERR2 $$ISACTIVE^AGINS $$S^AGVDF
VA Fileman	2	DD^%DT $$GET1^DIQ
IHS Patient	1	$$AGE^AUPNPAT

Package	Total	Caller Graph
IHS Patient Registration	33	AG AGED1 AGED10A AGED11A AGED2 AGED3 AGED4 AGED42 AGED4PD AGED6 AGED62 AGED6PD AGED7B AGEDBEB AGEDBEC AGEDBED AGEDBEE AGEDBEF AGEDBEG AGEDBEH AGEDERR1 AGEDERR3 AGEDGUAR AGEDIT AGEDMCD AGEDPRV AGEDPRVB AGEDTPL AGEDWC AGELA AGFULAUD AGMANERS AGRPTPDP
Patient Registration GUI	2	AGGEDCHK AGGRPTDP
Emergency Room	1	AMERAGED

Package

Total

Caller Graph

IHS Patient Registration

AG  AGED1  AGED10A  AGED11A  AGED2  AGED3  AGED4  AGED42
AGED4PD  AGED6  AGED62  AGED6PD  AGED7B  AGEDBEB  AGEDBEC  AGEDBED
AGEDBEE  AGEDBEF  AGEDBEG  AGEDBEH  AGEDERR1  AGEDERR3  AGEDGUAR  AGEDIT
AGEDMCD  AGEDPRV  AGEDPRVB  AGEDTPL  AGEDWC  AGELA  AGFULAUD  AGMANERS
AGRPTPDP

Patient Registration GUI

AGGEDCHK AGGRPTDP

Emergency Room

AMERAGED

Entry Points

Name	Comments	DBIA/ICR reference
PATREFBC(DFN)	;EP
DISPLAY(ERRORS)	;EP
GUARADD(GUARINFO)	;EP
SEQMAN(SITE)	;EP
MCRELINC(DFN,FINDCALL)	;EP
CHECKRTN(ERRCALL)	;EP
OVERRIDE(ERROR,RECORD)	;
CHKAGINS(PIECE,ERROR,FORMAT,RETPIECE)	;EP
CHKDEATH(DFN)	;EP - CHECK IF DATE OF DEATH FIELD IS POPULATED
PHNAME(DFN,FINDCALL)	;EP
ISMINOR(DFN)	;EP - CHECK IF PATIENT IS A MINOR AGE PER SANDRI LAHI
PAREMPL(DFN)	;EP
MCGRTMS(DFN,FINDCALL)	;EP
EDITCHEK(ERRORS,VARS,DISPLAY)	;EP
MCDCOVMS(DFN,FINDCALL)	;EP
FETCHERR(PAGENUM,ARRAY)	;EP
ERRDATA(ERR)	;EP
PATBENIN(DFN,FINDCALL)	;EP
PHNMCHK(AGINS)	;EP
FINDALL(DFN,AGINS)	;EP
NONIND(DFN)	;EP

External References

Name	Field # of Occurrence
DD^%DT	PATREFBC+13
$$CURRUPD^AGEDERR2	MCRELINC+5, MCDCOVMS+5, MCGRTMS+5, PATBENIN+5, SEQMAN+4, PATREFBC+4, PAREMPL+5, PHNAME+8, ISMINOR+5
$$DECEASED^AGEDERR2	MCRELINC+6, MCDCOVMS+3, MCGRTMS+3, PATBENIN+3, SEQMAN+2, PATREFBC+2, PAREMPL+3, PHNAME+6, ISMINOR+3
$$FACCHK^AGEDERR2	SEQMAN+6
$$HASELIG^AGEDERR2	MCRELINC+3, MCDCOVMS+6, MCGRTMS+6, PATBENIN+6, SEQMAN+5, PATREFBC+5, PAREMPL+6, PHNAME+9, ISMINOR+6
$$PTACTIVE^AGEDERR2	MCRELINC+4, MCDCOVMS+4, MCGRTMS+4, PATBENIN+4, SEQMAN+3, PATREFBC+3, PAREMPL+4, PHNAME+7, ISMINOR+4
$$ISACTIVE^AGINS	MCRELINC+21, CHKAGINS+9
$$S^AGVDF	DISPLAY+14, DISPLAY+20
$$AGE^AUPNPAT	MCRELINC+31
$$GET1^DIQ	EDITCHEK+11

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ALL CALLS TO THIS ROUTINE SHOULD BE DONE VIA TAG EPs" Line Location: AGEDERR+16
Function Call: WRITE	Prompt: $$S^AGVDF("RVN") Line Location: DISPLAY+14
Function Call: WRITE	Prompt: $$S^AGVDF("RVF") Line Location: DISPLAY+20

FileNo	Call Tags
^AGEDERRS - [#9009061.5]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	CHECKRTN+2
^AGEDERRS - [#9009061.5]	OVERRIDE+2, OVERRIDE+3, EDITCHEK+6, EDITCHEK+8, EDITCHEK+9, EDITCHEK+10, FETCHERR+4, ERRDATA+1
^AGEDERRS("AB"	FETCHERR+6
^AUPNBENR - [#9000044]	PATREFBC+11, PATREFBC+12
^AUPNBENR("B"	PATREFBC+8
^AUPNMCR - [#9000003]	MCRELINC+29
^AUPNMSP("C"	MCRELINC+32
^AUPNPAT - [#9000001]	MCRELINC+35, PAREMPL+10, NONIND+3
^AUTTBEN - [#9999999.25]	NONIND+5
^DD(2	ISMINOR+9
^DPT - [#2]	CHKDEATH+1

Label References

Name	Line Occurrences
$$CHKAGINS	MCDCOVMS+18, MCGRTMS+21, PATBENIN+18, PATBENIN+19, PHNMCHK+2, PHNMCHK+4
$$ERRDATA	MCRELINC+39, PATREFBC+15, CHKAGINS+17, DISPLAY+7
$$ISMINOR	PAREMPL+8
$$OVERRIDE	CHKAGINS+14
$$PHNMCHK	PHNAME+29, PHNAME+39
@(	MCRELINC+17, MCDCOVMS+17, MCGRTMS+17, PATBENIN+17, PHNAME+36, PHNAME+37, FINDALL+7
DISPLAY	EDITCHEK+17
FINDALL	MCRELINC+16, MCDCOVMS+16, MCGRTMS+16, PATBENIN+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AGERNODE	EDITCHEK+8*
>> AGERRCAL	EDITCHEK+6, EDITCHEK+7, EDITCHEK+13, EDITCHEK+14
>> AGERRMSG	EDITCHEK+10*
>> AGERRSOL	EDITCHEK+11*, EDITCHEK+15
>> AGERRTYP	EDITCHEK+9*, EDITCHEK+15
AGINS	MCRELINC+1~, MCRELINC+16, MCRELINC+38!, MCDCOVMS+1~, MCDCOVMS+16, MCDCOVMS+19!, MCGRTMS+1~, MCGRTMS+16, MCGRTMS+23!, PATBENIN+1~ , PATBENIN+16, PATBENIN+20!, PHNAME+1~, PHNAME+29, PHNAME+39, PHNAME+40!, PHNMCHK~, FINDALL~
AGINS(	MCRELINC+19, MCRELINC+21, MCRELINC+23, MCRELINC+24, MCRELINC+25, MCRELINC+26, MCRELINC+27, CHKAGINS+4, CHKAGINS+9, CHKAGINS+14 , CHKAGINS+15, CHKAGINS+16, CHKAGINS+18
AGINS(1	MCRELINC+10, MCDCOVMS+10, MCGRTMS+10, PATBENIN+10, PHNAME+29*
>> AGOPT("VERSION"	FINDALL+5
>> AGSELECT	MCRELINC+10, MCDCOVMS+10, MCGRTMS+10, PATBENIN+10, PHNAME+29
ARRAY	FETCHERR~
ARRAY(	FETCHERR+4, FETCHERR+6
>> CASEREC	PATREFBC+12*, PATREFBC+13, PATREFBC+14
CLASS	NONIND+1~, NONIND+3*, NONIND+4, NONIND+5
CLASSNAM	NONIND+1~, NONIND+5*, NONIND+6
>> D0	ISMINOR+8*
DFN	MCRELINC~, MCRELINC+2, MCRELINC+3, MCRELINC+4, MCRELINC+5, MCRELINC+6, MCRELINC+14, MCRELINC+16, MCRELINC+29, MCRELINC+31 , MCRELINC+32, MCRELINC+35, MCDCOVMS~, MCDCOVMS+2, MCDCOVMS+3, MCDCOVMS+4, MCDCOVMS+5, MCDCOVMS+6, MCDCOVMS+14, MCDCOVMS+16 , MCGRTMS~, MCGRTMS+2, MCGRTMS+3, MCGRTMS+4, MCGRTMS+5, MCGRTMS+6, MCGRTMS+14, MCGRTMS+16, PATBENIN~, PATBENIN+2 , PATBENIN+3, PATBENIN+4, PATBENIN+5, PATBENIN+6, PATBENIN+14, PATBENIN+16, SEQMAN+2, SEQMAN+3, SEQMAN+4, SEQMAN+5 , SEQMAN+6, PATREFBC~, PATREFBC+2, PATREFBC+3, PATREFBC+4, PATREFBC+5, PATREFBC+8, PAREMPL~, PAREMPL+1, PAREMPL+3 , PAREMPL+4, PAREMPL+5, PAREMPL+6, PAREMPL+8, PAREMPL+10, PHNAME~, PHNAME+2, PHNAME+6, PHNAME+7, PHNAME+8 , PHNAME+9, PHNAME+33, PHNAME+36, CHKDEATH~, CHKDEATH+1, ISMINOR~, ISMINOR+1, ISMINOR+3, ISMINOR+4, ISMINOR+5 , ISMINOR+6, ISMINOR+8, FINDALL~, FINDALL+6, NONIND~, NONIND+2, NONIND+3
DISPLAY	EDITCHEK~, EDITCHEK+17
>> DPTPTR	GUARADD+13*, GUARADD+14, GUARADD+15
>> DTREF	PATREFBC+13*, PATREFBC+15
ERR	ERRDATA~, ERRDATA+1
ERRCALL	CHECKRTN~, CHECKRTN+1
>> ERRCODE	DISPLAY+8*, DISPLAY+16
>> ERRINFO	DISPLAY+11*, DISPLAY+13
>> ERRMESG	DISPLAY+10, DISPLAY+12, DISPLAY+13, DISPLAY+19
ERRNODE	DISPLAY+1~, DISPLAY+4, DISPLAY+5, DISPLAY+7, DISPLAY+8, DISPLAY+9, DISPLAY+10, DISPLAY+11
ERRNUM	DISPLAY+1~, DISPLAY+2, DISPLAY+3, DISPLAY+4, DISPLAY+7, FETCHERR+1~, FETCHERR+3, FETCHERR+4, FETCHERR+5, FETCHERR+6
ERROR	CHKAGINS~, CHKAGINS+9, CHKAGINS+14, CHKAGINS+17, OVERRIDE~, OVERRIDE+2, OVERRIDE+3
>> ERRORNUM	EDITCHEK+4, EDITCHEK+5, EDITCHEK+6, EDITCHEK+7, EDITCHEK+8, EDITCHEK+9, EDITCHEK+10, EDITCHEK+11, EDITCHEK+15, EDITCHEK+16
ERRORS	EDITCHEK~, EDITCHEK+17, DISPLAY~
ERRORS(	EDITCHEK+5, EDITCHEK+7, EDITCHEK+15, EDITCHEK+16*, DISPLAY+3, DISPLAY+4
ERRORS("C"	EDITCHEK+15*
ERRTYPE	DISPLAY+1~, DISPLAY+9*, DISPLAY+14, DISPLAY+15, DISPLAY+20
FINDCALL	MCRELINC~, MCRELINC+7, MCRELINC+14, MCRELINC+16, MCRELINC+17, MCDCOVMS~, MCDCOVMS+7, MCDCOVMS+14, MCDCOVMS+16, MCDCOVMS+17 , MCGRTMS~, MCGRTMS+7, MCGRTMS+14, MCGRTMS+16, MCGRTMS+17, PATBENIN~, PATBENIN+7, PATBENIN+14, PATBENIN+16, PATBENIN+17 , PHNAME~, PHNAME+3, PHNAME+33, PHNAME+36, PHNAME+37, FINDALL+3, FINDALL+5, FINDALL+6*, FINDALL+7
FORMAT	MCDCOVMS+19!, MCGRTMS+22!, MCGRTMS+23!, CHKAGINS~, CHKAGINS+15, CHKAGINS+16
GUARINFO	GUARADD~, GUARADD+2, GUARADD+4, GUARADD+13
>> GUARPTR	GUARADD+4, GUARADD+5, GUARADD+6, GUARADD+12, GUARADD+15, GUARADD+16
>> INNAME	MCRELINC+23*, MCRELINC+39
MISSING	MCRELINC+1~, MCRELINC+18, MCRELINC+19, MCRELINC+25, MCRELINC+26, MCRELINC+27, MCRELINC+30, MCRELINC+33, MCRELINC+36, MCRELINC+39 , MCDCOVMS+1~, MCDCOVMS+18, MCDCOVMS+20, MCGRTMS+1~, MCGRTMS+21, MCGRTMS+24, PATBENIN+1~, PATBENIN+18, PATBENIN+19, PATBENIN+21 , PATREFBC+10, PATREFBC+11, PATREFBC+14, PATREFBC+15, PHNAME+1~, PHNAME+4, PHNAME+29, PHNAME+36, PHNAME+39, PHNAME+41 , PHNMCHK+2, PHNMCHK+4, PHNMCHK+5, CHKAGINS+2~, CHKAGINS+3, CHKAGINS+4, CHKAGINS+14, CHKAGINS+15, CHKAGINS+16, CHKAGINS+17* , CHKAGINS+18, CHKAGINS+19, EDITCHEK+15, GUARADD+1~, GUARADD+3, GUARADD+5, GUARADD+7, GUARADD+8, GUARADD+9, GUARADD+10 , GUARADD+11, GUARADD+12, GUARADD+14, GUARADD+17, GUARADD+18, GUARADD+19, GUARADD+20, GUARADD+21*, GUARADD+22
OVERRIDE	OVERRIDE+1~
>> P	CHKAGINS+18*
PAGENUM	FETCHERR~, FETCHERR+2, FETCHERR+6
PIECE	CHKAGINS~, CHKAGINS+15, CHKAGINS+16
>> POLNUM	MCRELINC+24*, MCRELINC+39
RECORD	OVERRIDE~
>> RET	CHKAGINS+18*
RETPIECE	CHKAGINS~, CHKAGINS+1*, CHKAGINS+18
RETURN	OVERRIDE+1~, OVERRIDE+4
SEL	MCRELINC+15, MCDCOVMS+15, MCGRTMS+15, PATBENIN+15, PHNAME+34, FINDALL+1~, FINDALL+2
SEQ	MCRELINC+1~, MCRELINC+18, MCRELINC+19, MCRELINC+21, MCRELINC+23, MCRELINC+24, MCRELINC+25, MCRELINC+26, MCRELINC+27, MCDCOVMS+1~ , MCGRTMS+1~, PATBENIN+1~, PHNAME+1~, CHKAGINS+2~, CHKAGINS+3, CHKAGINS+4, CHKAGINS+9, CHKAGINS+14, CHKAGINS+15, CHKAGINS+16 , CHKAGINS+18
SITE	SEQMAN~
>> SUBREC	PATREFBC+10, PATREFBC+11, PATREFBC+12
TRUE	DISPLAY+1~, DISPLAY+5*, DISPLAY+6
U	MCRELINC+14, MCRELINC+21, MCRELINC+23, MCRELINC+24, MCRELINC+25, MCRELINC+26, MCRELINC+27, MCRELINC+29, MCRELINC+35, MCRELINC+39 , MCDCOVMS+14, MCGRTMS+14, PATBENIN+14, PATREFBC+13, PATREFBC+14, PATREFBC+15, PAREMPL+11, PHNAME+29, PHNAME+33, PHNAME+36 , CHKDEATH+1, ISMINOR+9, FINDALL+6, CHKAGINS+9, CHKAGINS+15, CHKAGINS+16, CHKAGINS+17, CHKAGINS+18, EDITCHEK+6, EDITCHEK+7 , EDITCHEK+9, EDITCHEK+10, DISPLAY+5, DISPLAY+7, DISPLAY+8, DISPLAY+9, DISPLAY+10, CHECKRTN+1, ERRDATA+1, NONIND+3 , NONIND+5, GUARADD+4, GUARADD+8, GUARADD+9, GUARADD+10, GUARADD+11, GUARADD+13, GUARADD+18, GUARADD+19, GUARADD+20 , GUARADD+21
VAR	EDITCHEK+2, EDITCHEK+3~
VARS	EDITCHEK~
VARS(	EDITCHEK+3
X	MCRELINC+1~, MCRELINC+28~, MCRELINC+29, MCRELINC+30, MCRELINC+32, MCRELINC+33, MCRELINC+34~, MCRELINC+35, MCRELINC+36, MCRELINC+37~ , MCDCOVMS+1~, MCGRTMS+1~, PATBENIN+1~, PATREFBC+7~, PATREFBC+8, PATREFBC+9, PATREFBC+11, PATREFBC+12, PAREMPL+9~, PAREMPL+10* , PAREMPL+11, PHNAME+1~, ISMINOR+10, CHKAGINS+2~, CHKAGINS+16, DISPLAY+1~, DISPLAY+16, DISPLAY+17, DISPLAY+18, CHECKRTN+1 , GUARADD+6, GUARADD+7, GUARADD+8, GUARADD+9, GUARADD+10, GUARADD+11, GUARADD+16, GUARADD+17, GUARADD+18, GUARADD+19 , GUARADD+20, GUARADD+21
>> X1	EDITCHEK+3*
>> Y	PATREFBC+13*

Customize PDF page

Package: IHS Patient Registration

Routine: AGEDERR

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 36

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: