Routine: AMERSAV1

Package	Total	Call Graph
VA Fileman	4	(H,NOW)^%DTC ^DIC FILE^DICN ^DIE
Emergency Room	1	($$DT,$$VAL)^AMERSAV1

Package	Total	Caller Graph
Emergency Room	8	AMER0 AMEREDIT AMEREDTA AMERERS AMERFIX AMERSAV AMERSAV1 AMERTIME
IHS Emergency Dept Dashboard	1	BEDDUTIS

Entry Points

Name	Comments	DBIA/ICR reference
TIMESTMP(AMERIEN)
MULT(AMERDA)	; SUBENTRIES
VAL(Q,N)	; EP - ENTRY POINT THIS ROUTINE ; GETS A NUMERIC/DATE VALUE FROM THE DR STRING
C0	; REVOLVING DOOR
INJ	; EP - ENTRY POINT CALLED BY AMERSAV ;INJURY ENTRIES
CEXIT
DT(X,Y,T)	; EP - ENTRY POINT FROM AMERFIX ;TIME DIFFERENCE ; X=T2,Y=T1,T="D":DAYS,T="M":MINUTES
COMP	; COMPUTED FIELDS
DIE(DA,DR)	; GIVEN AN ENTRY NUMBER AND A DR STRING, EDIT THE ER VISIT FILE
DIE1
KILL
EXIT
DIC(X)	; GIVEN A ADMISSION TIMESTAMP, CREATE AN ENTRY IN THE ER VISIT FILE AND RETURN THE IEN
TRANS	; HER TRANSFER FIELDS
C3	; TRIAGE WAIT
C2	; DOC WAIT
C1	; INJURY TRANSPORT LAG
RUN()	; EP from AMERSAVE
C4	; VISIT DURATION

External References

Name	Field # of Occurrence
H^%DTC	DT+5, DT+6
NOW^%DTC	TIMESTMP+5
$$DT^AMERSAV1	C0+5
$$VAL^AMERSAV1	C1+1
^DIC	MULT+3, MULT+7, MULT+12, MULT+16, MULT+23
FILE^DICN	DIC+5
^DIE	DIE1+1, MULT+10, TIMESTMP+9

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AMERVSIT - [#9009080]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMER(2.3 - [#9009082.3]	VAL+3, VAL+4, INJ+7, INJ+8
^AMERVSIT - [#9009080]	DIE1, DIE1+2, C0+3, TIMESTMP+8, TIMESTMP+10
^AMERVSIT("AC"	C0+3
^DD(9009080	MULT+2, MULT+4, MULT+11, MULT+13, MULT+20
^TMP("AMER"	INJ+3

Label References

Name	Line Occurrences
$$DIC	RUN+3
$$DT	C1+2, C2+2, C3+2, C4+2
$$VAL	C2+1, C3+1, C4+1
C1	C0+4
C2	C1+1
C3	C2+1
C4	C3+1
CEXIT	C4+1
COMP	RUN+1
DIE	RUN+4, RUN+6
DIE1	MULT+19, MULT+25
EXIT	RUN+11
KILL	RUN+10
MULT	RUN+9
TIMESTMP	RUN+8
TRANS	RUN+2

Naked Globals

Name	Field # of Occurrence
^(	INJ+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RUN+4, RUN+6, C0+1~, C0+3, C0+4, C0+5, C0+6, C1+2, C2+2, C3+2* , C4+2, CEXIT!, DIE+1~, MULT+8, MULT+9, DT+4~, DT+8, DT+9, DT+10, DT+11 , VAL+2~, VAL+3, VAL+4, VAL+5, VAL+6, INJ+1~, INJ+9, INJ+10, TRANS+1~, TRANS+2 , TRANS+3, TRANS+4*, TRANS+5, TRANS+6, TIMESTMP+2~, TIMESTMP+6
%H	C0+1~, CEXIT!, DT+4~, DT+5, DT+6
%T	C0+1~, DT+4~, DT+5, DT+6
%Y	C0+1~, DT+4~
A	CEXIT!, DT+4~, DT+5, DT+7, DT+8
AMERDA	RUN+3*, RUN+4, RUN+6, RUN+8, RUN+9, RUN+12, MULT~, MULT+2, MULT+4, MULT+11 , MULT+13, MULT+20
AMERDFN	C0+1~*, C0+3
AMERDR	EXIT!
AMERDR(	RUN+3, RUN+4, C0+2, VAL+6
AMERDR(1	C0+1, TRANS+2
AMERDR(12	C2+2, C3+2, C4+2*
AMERDR(18	MULT+21, TRANS+7*
AMERDR(2	C0+6, C1+2, TRANS+4
AMERDR(3	MULT+14, MULT+17
AMERDR(4	MULT+3
AMERDR(5	MULT+12
AMERDR(6	MULT+5, MULT+8
AMERDRI	EXIT+1!
AMERDRI(	RUN+6, VAL+5
AMERI	MULT+1~, MULT+3, MULT+5, MULT+8, MULT+12, MULT+14, MULT+17, MULT+21*
AMERIEN	TIMESTMP~, TIMESTMP+4, TIMESTMP+8, TIMESTMP+10
AMERX	RUN+4, RUN+6, EXIT!, MULT+1~, MULT+3, MULT+5, MULT+6, MULT+12, MULT+14, MULT+15 , MULT+21*, MULT+22
AMERY	MULT+1~, MULT+17, MULT+18, MULT+22, MULT+24
AMERY2	MULT+1~, MULT+17*, MULT+18
B	CEXIT!, DT+4~, DT+5, DT+7, DT+8
C	CEXIT!, DT+4~, DT+6*, DT+8
D	DIE+2~, MULT+1~, TIMESTMP+3~
D0	DIE+2~, MULT+1~, TIMESTMP+3~
DA	DIE~, MULT+1~, MULT+9, MULT+18, MULT+24, TIMESTMP+3~, TIMESTMP+4, TIMESTMP+11!
DA(1	MULT+2, MULT+4, MULT+11, MULT+13, MULT+20*
DD	DIC+4!
DI	DIE+2~, TIMESTMP+3~
>> DIADD	DIC+3*
DIC	DIC+2~, DIC+3, DIE+2~, MULT+1~, MULT+2, MULT+4, MULT+9, MULT+11, MULT+13, MULT+18 , MULT+20, MULT+24, TIMESTMP+3~
DIC("P"	MULT+2, MULT+4, MULT+11, MULT+13, MULT+20*
DIC(0	DIC+3, MULT+2, MULT+4, MULT+11, MULT+13, MULT+20
DICR	DIE+2~, MULT+1~, TIMESTMP+3~
DIE	DIE+2~, DIE+3, MULT+1~, MULT+9, MULT+18, MULT+24, TIMESTMP+3~, TIMESTMP+7*, TIMESTMP+11!
DIG	DIE+2~, MULT+1~, TIMESTMP+3~
DIH	DIE+2~, MULT+1~, TIMESTMP+3~
DIU	DIE+2~, MULT+1~, TIMESTMP+3~
DIV	DIE+2~, MULT+1~, TIMESTMP+3~
DIW	DIE+2~, MULT+1~, TIMESTMP+3~
DO	DIC+4!
DQ	DIE+2~, MULT+1~, TIMESTMP+3~
DR	DIE~, MULT+1~, MULT+9, MULT+18, MULT+24, TIMESTMP+6, TIMESTMP+11!
E	CEXIT!, DT+4~, DT+6*, DT+7, DT+8
F	INJ+1~, INJ+8*, INJ+10
G	INJ+1~, INJ+2*, INJ+9, INJ+10
N	VAL~, VAL+5, VAL+6, INJ+1~, INJ+8*
Q	VAL~, VAL+3, VAL+5
STG	TRANS+1~, TRANS+3, TRANS+5, TRANS+6, TRANS+7
T	DT~, DT+3*, DT+9
U	MULT+2, MULT+3, MULT+4, MULT+5, MULT+11, MULT+12, MULT+13, MULT+14, MULT+20, MULT+21 , VAL+4, INJ+8, TRANS+5
V	INJ+1~, INJ+3*, INJ+10
X	C0+1~, C0+3, C1+1, C1+2, C2+1, C2+2, C3+1, C3+2, C4+1, C4+2 , CEXIT!, DIC~, DIC+1, DIE+1~, MULT+1~, MULT+3, MULT+6, MULT+12, MULT+15, MULT+22 , DT~, DT+2, DT+5, VAL+2~, VAL+5, VAL+6, VAL+7, INJ+1~, INJ+2, INJ+3* , INJ+7, INJ+8, TIMESTMP+2~
Y	C0+1~, C0+3, DIC+2~, DIC+6, DIC+7, DIE+1~, MULT+1~, MULT+9, MULT+16, MULT+18 , MULT+23, MULT+24, DT~, DT+2, DT+5, INJ+1~, INJ+7, TIMESTMP+2~
Z	C0+1~, C0+2, C0+3, C0+5, C1+2, C2+2, C3+2, C4+2, CEXIT!, INJ+1~ , INJ+7, INJ+8
ZTDESC	EXIT!
ZTDTH	EXIT!
ZTIO	EXIT!
>> ZTQUEUED	KILL
>> ZTREQ	KILL*
ZTRTN	EXIT!
ZTSAVE	EXIT!

Customize PDF page

Package: Emergency Room

Routine: AMERSAV1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 9

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: