Routine: AMER0

Package	Total	Call Graph
Emergency Room	8	($$CAT,$$STG)^AMER0 $$ERCHCKIN^AMERBSDU LOG^AMERBUSA (SYNCHERA,SYNCHERD,SYNCHERP,SYNCHERX)^AMERERS ($$EXISTING,$$FINDVSIT,SAVPCCA,VISITIN)^AMERPCC $$AMERDHD^AMERREPT TIMESTMP^AMERSAV1 VER^AMERVER
VA Fileman	7	EN^DDIOL (,IX)^DIC FILE^DICN ^DIE ^DIK EN1^DIP ^DIR
IHS Emergency Dept Dashboard	2	XML^BEDD2X01 NEW^BEDDUTW

Package	Total	Caller Graph
Emergency Room	15	AMER AMER0 AMER1 AMER1B AMER2 AMER2A AMER2B AMER3 AMERD AMEREDAU AMEREDTA AMEREDTD AMEREDTI AMEREDTU AMERENV1
IHS Emergency Dept Dashboard	1	BEDDUTIS

Entry Points

Name	Comments	DBIA/ICR reference
CAT(X)	; EP FROM MULTIPLE AMER ROUTINES ; GIVEN AN ER CATEGORY, RETURN ITS IEN
PAT	; ENTRY POINT TO VIEW A SINGLE ENTRY FROM THE ER LOG
PEXIT
SETADM(AMERSTG,AMERPCMP)
TRF(DA)	; DR STRINGS RELATED TO TRANSFER
STG(AMERPCMP)	; EP FROM SAVE^AMER0
UTL(E)	; ENTRY POINT FROM AMER ; CONVERT ADMISSION FILE ENTRY BACK TO TMP GLOBALS
TEST
SAVE
OPT(X,C)	; ENTRY POINT FROM AMER1 ; GIVEN A CATEGORY AND OPTION NAME, RETURN OPTION IEN

External References

Name	Field # of Occurrence
$$CAT^AMER0	OPT+3
$$STG^AMER0	SAVE
$$ERCHCKIN^AMERBSDU	SAVE+25
LOG^AMERBUSA	PAT+15
SYNCHERA^AMERERS	PAT+18
SYNCHERD^AMERERS	PAT+20
SYNCHERP^AMERERS	PAT+25
SYNCHERX^AMERERS	PAT+19
$$EXISTING^AMERPCC	SETADM+57
$$FINDVSIT^AMERPCC	PAT+12
SAVPCCA^AMERPCC	SAVE+27
VISITIN^AMERPCC	SAVE+28
$$AMERDHD^AMERREPT	PAT+29
TIMESTMP^AMERSAV1	PAT+21
VER^AMERVER	SAVE+32, SETADM+67
XML^BEDD2X01	STG+15, SETADM+34
NEW^BEDDUTW	STG+14, SETADM+33
EN^DDIOL	SAVE+39, SAVE+40
^DIC	PAT+3, CAT+3, OPT+4
IX^DIC	PAT+7
FILE^DICN	SAVE+11
^DIE	TRF+11, SETADM+62
^DIK	SAVE+38
EN1^DIP	PAT+30
^DIR	PAT+31

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: PAT+6
Function Call: WRITE	Prompt: $$STG Line Location: TEST+0
Routine Call	DIE Line Location: TRF+11 SETADM+62
Routine Call	DIC Line Location: PAT+3 CAT+3 OPT+4
Routine Call	DIR Line Location: PAT+31
Routine Call	DIC Line Location: PAT+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^AMERVSIT - [#9009080]	Classic Fileman Calls
^AMERADM - [#9009081]	Classic Fileman Calls
^AMER(2 - [#9009082]	Classic Fileman Calls
^AMER(3 - [#9009083]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMER(2.3 - [#9009082.3]	STG+5, STG+6, UTL+3, TRF+8
^AMER(2.5 - [#9009082.5]	SAVE+25
^AMERADM - [#9009081]	SAVE+8, UTL+8, UTL+9, UTL+15, SETADM+8
^AMERVSIT - [#9009080]	PAT+24
^AUPNPAT - [#9000001]	SAVE+5
^DD(9009081	STG+8, UTL+5
^DPT - [#2]	SAVE+6, SAVE+7
^FILE(9009081	SETADM+60, SETADM+63
^TMP("AMER"	SAVE+5, SAVE+17, SAVE+19, SAVE+30, STG+1, STG+9, UTL+11, UTL+15*, TRF+2, TRF+8

Label References

Name	Line Occurrences
$$STG	TEST
PEXIT	PAT+4, PAT+5, PAT+8, PAT+9
SETADM	SAVE+8
TRF	SAVE+8, SAVE+17

Naked Globals

Name	Field # of Occurrence
^(	UTL+3, TRF+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SAVE, SAVE+4, SAVE+5, SAVE+6, SAVE+7, STG+4~, STG+5, STG+6, STG+8, STG+9 , STG+16, STG+17, UTL+2~, UTL+5, UTL+6, UTL+7, UTL+8, UTL+9, UTL+10, UTL+11 , TRF+2, TRF+6~, TRF+9*, TRF+10
A	STG+4~, STG+16, STG+17, STG+18, TRF+1, TRF+2, TRF+3, TRF+6~, TRF+8, TRF+9
AGE	PEXIT+1!
AMERACTY	SETADM+3~, SETADM+55*, SETADM+56
AMERADM	SAVE+2~, SAVE+3*, SAVE+12, SAVE+15, TRF+3
AMERAMBB	SETADM+2~, SETADM+49*, SETADM+50
AMERAMBC	SETADM+3~, SETADM+53*, SETADM+54
AMERAMBN	SETADM+2~, SETADM+47*, SETADM+48
AMERCHRT	SETADM+1~, SETADM+13*, SETADM+14
AMERCMPL	SETADM+1~
AMERDA	SAVE+2~, SAVE+18, SAVE+37, PAT+1~, PAT+11, PAT+12, PAT+18, PAT+19, PAT+20, PAT+21 , PAT+24, PAT+25, PAT+28
AMERDFN	SAVE+5, SAVE+6, SAVE+7, SAVE+8, SAVE+9, SAVE+25, SAVE+27, SAVE+28, SAVE+32, SETADM+1~ , SETADM+6, SETADM+7, SETADM+8, SETADM+9, SETADM+57, SETADM+59, SETADM+67
AMERDOB	SETADM+1~, SETADM+10*, SETADM+11, SETADM+12
AMERDR	SETADM+3~, SETADM+8, SETADM+9, SETADM+11, SETADM+12, SETADM+14, SETADM+16, SETADM+18, SETADM+20, SETADM+25* , SETADM+30, SETADM+35, SETADM+38, SETADM+40, SETADM+42, SETADM+44, SETADM+46, SETADM+48, SETADM+50, SETADM+52 , SETADM+54, SETADM+56, SETADM+58*, SETADM+59
AMERDR("VISIT"	SAVE+4!
AMERDUZ	SETADM+2~, SETADM+45*, SETADM+46
AMERMOD	SETADM+3~, SETADM+24*, SETADM+25
>> AMERPAT	PAT+24*, PAT+25
AMERPCC	SAVE+2~, SAVE+25, SAVE+26, SAVE+27, SAVE+28, SAVE+30, SAVE+32, SAVE+36, PAT+1~, PAT+12 , PAT+15, PAT+17, PAT+18, PAT+19, PAT+20, SETADM+1~, SETADM+57*, SETADM+58, SETADM+67
AMERPCMP	SAVE~, SAVE+8, SAVE+15, STG~, STG+1*, SETADM~, SETADM+30, SETADM+35
AMERPRTM	SETADM+2~, SETADM+43*, SETADM+44
>> AMERQUIT	SAVE+41, PAT+4, PAT+8*
AMERSEX	SETADM+1~, SETADM+17*, SETADM+18
AMERSTG	SAVE+7*, SAVE+8, SAVE+12, SETADM~, SETADM+6, SETADM+10, SETADM+13, SETADM+15, SETADM+17, SETADM+19 , SETADM+24, SETADM+37, SETADM+39, SETADM+41, SETADM+43, SETADM+45, SETADM+47, SETADM+49, SETADM+51, SETADM+53 , SETADM+55
AMERTIME	SAVE+2~, SAVE+19, SAVE+20, SAVE+25, SETADM+15, SETADM+16
AMERTRAN	SETADM+2~, SETADM+51*, SETADM+52
AMERTRGN	SETADM+2~, SETADM+37*, SETADM+38
AMERTRGP	SETADM+2~, SETADM+39*, SETADM+40
AMERTRNS	SETADM+1~
AMERTRTM	SETADM+2~, SETADM+41*, SETADM+42
AMERVTYP	SETADM+1~, SETADM+19*, SETADM+20
AUPNDAYS	PEXIT!
AUPNDOB	PEXIT!
AUPNDOD	PEXIT!
AUPNPAT	PEXIT!
AUPNSEX	PEXIT!
>> BY	PAT+28*
C	OPT~, OPT+3
D	PAT+6*, TRF+6~
D0	TRF+6~
D1	TRF+6~
DA	SAVE+37, PEXIT!, TRF~, TRF+3, SETADM+59
DD	SAVE+10!
>> DHD	PAT+29*
DI	TRF+6~
DIC	SAVE+9, SAVE+11!, PAT+2, PAT+3!, PAT+6, PAT+7!, PAT+28, PEXIT!, CAT+2~, CAT+3* , OPT+2~, OPT+3*, TRF+6~
DIC("A"	PAT+2*
DIC("S"	OPT+3*
DIC(0	SAVE+9, PAT+2, PAT+6, CAT+3, OPT+3*
DIE	TRF+6~, TRF+7, SETADM+1~, SETADM+59
DIJ	PEXIT!
>> DIK	SAVE+37*
>> DINUM	SAVE+9*
>> DIR(0	PAT+31*
DISYS	PEXIT!
DK	PEXIT!
DO	SAVE+10!, PEXIT+1!, TRF+6~
DP	PEXIT!
DQ	TRF+6~
DR	TRF+6~, TRF+10, SETADM+59
DTO	TRF+6~
DTOUT	PAT+4!, PAT+8!, TRF+6~
DUOUT	PAT+4!, PAT+8!
DUZ	SAVE+7
DUZ(2	SAVE+5, SAVE+25
E	UTL~, UTL+8, UTL+9, UTL+15
>> FLDS	PAT+28*
>> FR	PAT+28*
I	STG+4~, STG+8, STG+17, UTL+2~, UTL+7, UTL+8, UTL+9, TRF+2*
IOST	PAT+31
N	STG+4~, STG+7, STG+9, UTL+2~, UTL+4, UTL+11, TRF+6~
POP	PEXIT+1!
S	UTL+2~, UTL+6*, UTL+8, UTL+9
SEX	PEXIT+1!
SSN	PEXIT+1!
>> TO	PAT+28*
U	SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, PAT+24, STG+7, STG+8, STG+16, STG+17 , UTL+4, UTL+5, UTL+8, TRF+2, TRF+9, SETADM+6, SETADM+10, SETADM+13, SETADM+15, SETADM+17 , SETADM+19, SETADM+24, SETADM+37, SETADM+39, SETADM+41, SETADM+43, SETADM+45, SETADM+47, SETADM+49, SETADM+51 , SETADM+53, SETADM+55
>> V	TRF+8*, TRF+10
X	SAVE+9, PAT+6, PEXIT!, CAT~, OPT~, STG+4~, STG+5, STG+6, STG+13, UTL+2~ , UTL+3, TRF+6~, TRF+8*
Y	SAVE+5, SAVE+11, SAVE+12, SAVE+15, SAVE+17, SAVE+18, PAT+5, PAT+6, PAT+9, PAT+11 , PEXIT!, CAT+2~, CAT+4, OPT+2~, OPT+5, STG+4~, STG+6, STG+7, UTL+2~, UTL+3* , UTL+4, TRF+6~
Z	STG+4~, STG+7, STG+8, UTL+2~, UTL+4, UTL+5, TRF+6~, TRF+8*

Marked Items

Customize PDF page

Package: Emergency Room

Routine: AMER0

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 16

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(NEW^BEDDUTW	STG+14, SETADM+33
$T(XML^BEDD2X01	STG+15, SETADM+34