Routine: AMERAGED

Package	Total	Call Graph
IHS Patient Registration	5	CHKRHI^AG $$CHKDEATH^AGEDERR $$NAME^AGMANERS ADDNAM^AGNAMCHG $$S^AGVDF
VA Fileman	5	^%DT NOW^%DTC EN^DDIOL ^DIE ^DIR
IHS Patient	1	NAME^AUPNPED
Kernel	1	$$VERSION^XPDUTL

Package

Total

Call Graph

IHS Patient Registration

CHKRHI^AG $$CHKDEATH^AGEDERR $$NAME^AGMANERS ADDNAM^AGNAMCHG $$S^AGVDF

VA Fileman

^%DT NOW^%DTC EN^DDIOL ^DIE ^DIR

IHS Patient

NAME^AUPNPED

Kernel

$$VERSION^XPDUTL

Package	Total	Caller Graph
Emergency Room	1	AMERVSIT

Package

Total

Caller Graph

Emergency Room

AMERVSIT

Entry Points

Name	Comments	DBIA/ICR reference
NAME(AMERDFN)	; EP - From UPDATPAT^AMERVSIT ; Check for PATIENT REG 7.1 PATCH 2 ; IF IT IS THERE RETURN VALUE FROM PATIENT REG API NAME^AGMANERS(). ; IF NOT, RETURN VALUE FROM AMERNAME() BELOW ; Check for "AG" version 7.1 PATCH 1
DIEDPT(DA,DR)	; GIVEN AN ENTRY NUMBER AND A DR STRING, EDIT THE VA PATIENT FILE
DIEAUPN(DA,DR)	; GIVEN AN ENTRY NUMBER AND A DR STRING, EDIT THE PATIENT FILE
END
AMERNAME(AMERDFN)

External References

Name	Field # of Occurrence
^%DT	END+1
NOW^%DTC	AMERNAME+21
CHKRHI^AG	AMERNAME+4
$$CHKDEATH^AGEDERR	AMERNAME+8
$$NAME^AGMANERS	NAME+18
ADDNAM^AGNAMCHG	AMERNAME+22
$$S^AGVDF	AMERNAME+6
NAME^AUPNPED	AMERNAME+18
EN^DDIOL	AMERNAME+19
^DIE	DIEDPT+5, DIEAUPN+5
^DIR	AMERNAME+12, AMERNAME+35
$$VERSION^XPDUTL	NAME+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$S^AGVDF("RVN"),$$S^AGVDF("BLN"),"This patient has Restricted Health Information",$$S^AGVDF("BLF"),$$S^AGVDF("RVF") Line Location: AMERNAME+6
Function Call: WRITE	Prompt: !!?5,"**** ALERT: DATE OF DEATH ON FILE FOR THIS PATIENT!!" Line Location: AMERNAME+8
Routine Call	DIE Line Location: DIEDPT+5 DIEAUPN+5
Routine Call	DIR Line Location: AMERNAME+12 AMERNAME+35

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^AUPNPAT - [#9000001]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AGPATCH(	AMERNAME+41, END+2, END+3, END+4
^AUPNPAT - [#9000001]	DIEAUPN+4, DIEAUPN+6, AMERNAME+41*
^AUTTSITE(1	END+2
^DIC(9.4 - [#9.4]	NAME+9, NAME+11, NAME+12, NAME+14, NAME+15
^DPT - [#2]	AMERNAME+3, AMERNAME+28, DIEDPT+4, DIEDPT+6
^XTMP(	AMERNAME+30, AMERNAME+32

Name	Line Occurrences
$$AMERNAME	NAME+8, NAME+19
$$DIEDPT	AMERNAME+27, AMERNAME+40
DIEAUPN	AMERNAME+42
END	AMERNAME+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	AMERNAME+21, DIEDPT+1~, DIEAUPN+1~
>> AG("NAMFAIL"	AMERNAME+23
>> AG("NEWNAME"	AMERNAME+15!, AMERNAME+17*, AMERNAME+19!, AMERNAME+26
>> AG("OLDNAME"	AMERNAME+20*, AMERNAME+28, AMERNAME+33, AMERNAME+39
AGDTS	AMERNAME+21, AMERNAME+41, END+1, END+2, END+3, END+4, END+5!
>> AGPTPG	END+2
>> AGTDS	END+1
AMERAGPT	NAME+5~, NAME+13, NAME+14, NAME+15
AMERAGV	NAME+5~, NAME+7*, NAME+8
AMERDFN	NAME~, NAME+8, NAME+18, NAME+19, AMERNAME~, AMERNAME+2
>> AMERH7AG	AMERNAME+31*, AMERNAME+32
>> AMERHL7	AMERNAME+29*, AMERNAME+30
AMEROK	NAME+5~, NAME+10, NAME+11, NAME+14, NAME+15, NAME+18, NAME+19
AMERONAM	AMERNAME+1~, AMERNAME+3*, AMERNAME+11, AMERNAME+14, AMERNAME+20
AMERPNTR	NAME+5~, NAME+9*, NAME+11, NAME+12, NAME+14, NAME+15
AMERPTCH	NAME+5~, NAME+10, NAME+11, NAME+12, NAME+14, NAME+15
>> AMERRTN	NAME+18, NAME+19, NAME+20
AMERRTRN	NAME+5~, NAME+6, NAME+8
D	DIEDPT+2~, DIEAUPN+2~
D0	DIEDPT+2~, DIEAUPN+2~
DA	AMERNAME+24!, AMERNAME+25, AMERNAME+27, AMERNAME+30, AMERNAME+32, AMERNAME+39, AMERNAME+40, AMERNAME+41*, AMERNAME+42, DIEDPT~ , DIEDPT+4, DIEDPT+6, DIEDPT+7!, DIEAUPN~, DIEAUPN+7!
>> DFN	AMERNAME+2*, AMERNAME+3, AMERNAME+8, AMERNAME+9, AMERNAME+25, AMERNAME+28, AMERNAME+39, AMERNAME+41, END+2, END+3 , END+4
DI	DIEDPT+2~, DIEAUPN+2~
DIC	AMERNAME+1~, AMERNAME+24!, DIEDPT+2~, DIEAUPN+2~
DICR	DIEDPT+2~, DIEAUPN+2~
DIE	AMERNAME+24!, AMERNAME+38, DIEDPT+2~, DIEDPT+3, DIEDPT+7!, DIEAUPN+2~, DIEAUPN+3*, DIEAUPN+7!
DIG	DIEDPT+2~, DIEAUPN+2~
DIH	DIEDPT+2~, DIEAUPN+2~
DIR	AMERNAME+12!
DIR("?"	AMERNAME+10*
DIR("A"	AMERNAME+10, AMERNAME+33
DIR("B"	AMERNAME+11, AMERNAME+34
DIR(0	AMERNAME+10, AMERNAME+34
DIU	DIEDPT+2~, DIEAUPN+2~
DIV	DIEDPT+2~, DIEAUPN+2~
DIW	DIEDPT+2~, DIEAUPN+2~
DQ	DIEDPT+2~, DIEAUPN+2~
DR	AMERNAME+24!, AMERNAME+26, AMERNAME+27, AMERNAME+39, AMERNAME+40, AMERNAME+41*, AMERNAME+42, DIEDPT~, DIEDPT+7!, DIEAUPN~ , DIEAUPN+7!
DR(2	AMERNAME+39*
DTOUT	AMERNAME+13!, AMERNAME+36!
DUOUT	AMERNAME+13!, AMERNAME+36!
DUZ	AMERNAME+41
DUZ(2	AMERNAME+41, END+2, END+3, END+4
>> RHIFLAG	AMERNAME+5, AMERNAME+6
U	NAME+12, AMERNAME+3, AMERNAME+28, AMERNAME+41
X	AMERNAME+16, AMERNAME+19, AMERNAME+27, AMERNAME+40, END+1, DIEDPT+1~, DIEDPT+8, DIEAUPN+1~
Y	AMERNAME+13!, AMERNAME+14, AMERNAME+16, AMERNAME+17, AMERNAME+24!, AMERNAME+36!, AMERNAME+37, END+1, DIEDPT+1~, DIEAUPN+1~

Customize PDF page

Package: Emergency Room

Routine: AMERAGED

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: