Routine: AMEREDTI

Package	Total	Call Graph
Emergency Room	7	$$CAT^AMER0 $$TCK^AMER2A QD33^AMER2B UPDPOV^AMER31 ($$EDAUDIT,$$EDDISPL,DIEREC)^AMEREDAU DIE^AMEREDIT ($$POV,$$S)^AMERUTIL
VA Fileman	4	EN^DDIOL ^DIC $$GET1^DIQ ^DIR

Package	Total	Caller Graph
Emergency Room	1	AMEREDIT

Entry Points

External References

Name	Field # of Occurrence
$$CAT^AMER0	INJ2+5, INJ3+8
$$TCK^AMER2A	INJ4+21
QD33^AMER2B	INJ1+12
UPDPOV^AMER31	INJUPD+28, INJUPD+54
$$EDAUDIT^AMEREDAU	INJ+34, INJ1+22, INJ2+20, INJ3+21, INJ4+28, INJ5+21, INJ6+20, INJ7+20, INJ8+20, INJ9+20 , INJ10+20, INJ11+20
$$EDDISPL^AMEREDAU	INJ+34, INJ1+22, INJ2+20, INJ3+21, INJ4+28
DIEREC^AMEREDAU	INJ+37, INJ1+25, INJ2+24, INJ3+24, INJ4+32, INJ5+25, INJ6+24, INJ7+24, INJ8+24, INJ9+24 , INJ10+24, INJ11+24
DIE^AMEREDIT	INJ+35, INJ1+23, INJ2+22, INJ3+22, INJ4+30, INJ5+23, INJ6+22, INJ7+22, INJ8+22, INJ9+22 , INJ10+22, INJ11+22
$$POV^AMERUTIL	INJUPD+3
$$S^AMERUTIL	INJUPD+33, INJUPD+35
EN^DDIOL	INJ+7, INJ1+6
^DIC	INJ2+8, INJ3+10
$$GET1^DIQ	INJ+10, INJ1+2, INJ1+3, INJ1+9, INJ2+3, INJ2+4, INJ3+4, INJ3+5, INJ4+4, INJ4+8 , INJ5+4, INJ6+4, INJ7+4, INJ8+4, INJ9+4, INJ10+4, INJ11+4, INJUPD+12, INJUPD+16, INJUPD+20
^DIR	INJ+13, INJ4+15, INJ5+9, INJ6+10, INJ7+10, INJ8+10, INJ9+10, INJ10+10, INJ11+10, INJUPD+45

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$S^AMERUTIL("RVN") Line Location: INJUPD+33
Function Call: WRITE	Prompt: !!,"Current POV information on file:" Line Location: INJUPD+34
Function Call: WRITE	Prompt: $$S^AMERUTIL("RVF") Line Location: INJUPD+35
Function Call: WRITE	Prompt: !!,"# ",?3,"P/S",?7,"Code",?18,"Description",?50,"Provider Narrative" Line Location: INJUPD+36
Function Call: WRITE	Prompt: !,CNT,?3,$P(AMERPOV(CNT),U,2),?7,$P(AMERPOV(CNT),U),?18,$E($P(AMERPOV(CNT),U,5),1,30),?50,$E($P(AMERPOV(CNT),U,3),1,29) Line Location: INJUPD+39
Function Call: WRITE	Prompt: ! Line Location: INJUPD+44
Routine Call	DIC Line Location: INJ2+8 INJ3+10
Routine Call	DIR Line Location: INJ+13 INJ4+15 INJ5+9 INJ6+10 INJ7+10 INJ8+10 INJ9+10 INJ10+10 INJ11+10 INJUPD+45

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNVSIT - [#9000010]	GET1^DIQ
^AMERVSIT - [#9009080]	GET1^DIQ
^AMER(3 - [#9009083]	Classic Fileman Calls, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	INJ4+5
^ICD9 - [#80]	INJ1+15
^TMP("AMER"	INJUPD+9!, INJUPD+13, INJUPD+17, INJUPD+21*

Label References

Name	Line Occurrences
INJ	INJ1
INJ1	INJ2
INJ10	INJ11
INJ2	INJ3
INJ3	INJ4
INJ4	INJ5
INJ5	INJ6
INJ6	INJ7
INJ7	INJ8
INJ8	INJ9
INJ9	INJ10
INJUPD	INJ+3, INJ1, INJ2, INJ3, INJ4, INJ5, INJ6, INJ7, INJ8, INJ9 , INJ10, INJ11
INJURY	EDINJRY+3
XINJURY	INJUPD+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMERAIEN	EDINJRY~, EDINJRY+3, INJURY~, INJ+37, INJ1+25, INJ2+24, INJ3+24, INJ4+32, INJ5+25, INJ6+24 , INJ7+24, INJ8+24, INJ9+24, INJ10+24, INJ11+24
AMERDA	EDINJRY~, EDINJRY+3, INJURY~, INJ+10, INJ+35, INJ1+2, INJ1+9, INJ1+23, INJ2+3, INJ2+22 , INJ3+4, INJ3+22, INJ4+4, INJ4+8, INJ4+30, INJ5+4, INJ5+23, INJ6+4, INJ6+22, INJ7+4 , INJ7+22, INJ8+4, INJ8+22, INJ9+4, INJ9+22, INJ10+4, INJ10+22, INJ11+4, INJ11+22, INJUPD+12 , INJUPD+16, INJUPD+20
AMERPCC	INJ1+1~, INJ1+2*, INJ1+3, INJ1+12, INJUPD+3
AMERPOV	INJURY+4~, INJUPD+3*, INJUPD+6, INJUPD+24, INJUPD+31
AMERPOV(	INJUPD+38, INJUPD+39, INJUPD+52, INJUPD+53
AMERPOV(1	INJUPD+26, INJUPD+27
AMERQUIT	INJ1+1~
AMERSTRG	INJ+4~, INJ+34, INJ+36, INJ+37, INJ1+20~, INJ1+22, INJ1+24, INJ1+25, INJ2+19~, INJ2+20* , INJ2+23, INJ2+24, INJ3+19~, INJ3+21, INJ3+23, INJ3+24, INJ4+27~, INJ4+28, INJ4+31, INJ4+32 , INJ5+20~, INJ5+21, INJ5+24, INJ5+25, INJ6+19~, INJ6+20, INJ6+23, INJ6+24, INJ7+19~, INJ7+20* , INJ7+23, INJ7+24, INJ8+19~, INJ8+20, INJ8+23, INJ8+24, INJ9+19~, INJ9+20, INJ9+23, INJ9+24 , INJ10+19~, INJ10+20, INJ10+23, INJ10+24, INJ11+19~, INJ11+20, INJ11+23, INJ11+24
CAUSE	INJ1+1~, INJ1+9*, INJ1+19, INJ1+22
CNT	INJURY+4~, INJUPD+37, INJUPD+38, INJUPD+39, INJUPD+50
DFN	INJ1+1~, INJ1+3*
DIC	INJ2+1~, INJ2+5, INJ2+8!, INJ3+1~, INJ3+8, INJ3+10!
DIC("A"	INJ2+2, INJ3+9
DIC("B"	INJ2+2!, INJ2+4, INJ3+5
DIC("S"	INJ2+5, INJ3+8
DIC(0	INJ2+5, INJ3+8
DIPN	INJ8+1~, INJ8+4*, INJ8+5, INJ8+18, INJ8+20
DIR	INJ+4~, INJ4+1~, INJ5+1~, INJ6+1~, INJ7+1~, INJ8+1~, INJ9+1~, INJ10+1~, INJ11+1~
DIR("?"	INJ4+12, INJ6+9, INJ7+9, INJ8+9, INJ9+9, INJ10+9, INJ11+9*
DIR("A"	INJ+12, INJ4+11, INJ5+8, INJ6+8, INJ7+8, INJ8+8, INJ9+8, INJ10+8, INJ11+8, INJUPD+43
DIR("B"	INJ+11, INJ4+5, INJ5+5, INJ6+5, INJ7+5, INJ8+5, INJ9+5, INJ10+5, INJ11+5*
DIR(0	INJ+12, INJ4+11, INJ5+8, INJ6+8, INJ7+8, INJ8+8, INJ9+8, INJ10+8, INJ11+8, INJUPD+42
>> DIRUT	INJUPD+46
DR	INJ+4~, INJ+27, INJ+30, INJ+33, INJ+35, INJ1+20~, INJ1+21, INJ1+23, INJ2+19~, INJ2+21 , INJ2+22, INJ3+19~, INJ3+20, INJ3+22, INJ4+27~, INJ4+29, INJ4+30, INJ5+20~, INJ5+22, INJ5+23 , INJ6+19~, INJ6+21, INJ6+22, INJ7+19~, INJ7+21, INJ7+22, INJ8+19~, INJ8+21, INJ8+22, INJ9+19~ , INJ9+21, INJ9+22, INJ10+19~, INJ10+21, INJ10+22, INJ11+19~, INJ11+21*, INJ11+22
DTOUT	INJ+4~, INJ+18, INJ1+1~, INJ1+12, INJ1+13, INJ2+1~, INJ2+12, INJ3+1~, INJ3+14, INJ4+1~ , INJ4+14~, INJ4+19, INJ5+1~, INJ5+13, INJ6+1~, INJ6+15, INJ7+1~, INJ7+15, INJ8+1~, INJ8+15 , INJ9+1~, INJ9+15, INJ10+1~, INJ10+15, INJ11+1~, INJ11+15
DUOUT	INJ+4~, INJ+17, INJ1+1~, INJ2+1~, INJ2+11, INJ3+1~, INJ3+13, INJ4+1~, INJ4+14~, INJ4+18 , INJ5+1~, INJ5+12, INJ6+1~, INJ6+14, INJ7+1~, INJ7+14, INJ8+1~, INJ8+14, INJ9+1~, INJ9+14 , INJ10+1~, INJ10+14, INJ11+1~, INJ11+14
EDIT	INJ1+1~
INJ	INJ+4~, INJ+10*, INJ+11, INJ+21, INJ+24, INJ+27, INJ+34
INJDT	INJ4+1~, INJ4+4*, INJ4+5, INJ4+26, INJ4+28
MVAC	INJ7+1~, INJ7+4*, INJ7+5, INJ7+18, INJ7+20
MVAL	INJ6+1~, INJ6+4*, INJ6+5, INJ6+18, INJ6+20
NCAUSE	INJ1+1~, INJ1+16*, INJ1+19, INJ1+21, INJ1+22
NDIPN	INJ8+1~, INJ8+11*, INJ8+18, INJ8+20, INJ8+21
NINJ	INJ+4~, INJ+14*, INJ+21, INJ+24, INJ+27, INJ+30, INJ+34
NINJDT	INJ4+1~, INJ4+22, INJ4+23, INJ4+26, INJ4+28, INJ4+29
NMVAC	INJ7+1~, INJ7+11*, INJ7+18, INJ7+20, INJ7+21
NMVAL	INJ6+1~, INJ6+11*, INJ6+18, INJ6+20, INJ6+21
NOINS	INJ10+1~, INJ10+11*, INJ10+18, INJ10+20, INJ10+21
NOWN	INJ9+1~, INJ9+11*, INJ9+18, INJ9+20, INJ9+21
NPLACE	INJ2+1~, INJ2+14, INJ2+15, INJ2+18, INJ2+20, INJ2+21
NPOL	INJ11+1~, INJ11+11*, INJ11+18, INJ11+20, INJ11+21
NSAFE	INJ3+1~, INJ3+17*, INJ3+18, INJ3+20, INJ3+21
NTOWN	INJ5+1~, INJ5+15, INJ5+16, INJ5+19, INJ5+21, INJ5+22
OINS	INJ10+1~, INJ10+4*, INJ10+5, INJ10+18, INJ10+20
OWN	INJ9+1~, INJ9+4*, INJ9+5, INJ9+18, INJ9+20
PLACE	INJ2+1~, INJ2+3*, INJ2+4, INJ2+18, INJ2+20
POL	INJ11+1~, INJ11+4*, INJ11+5, INJ11+18, INJ11+20
POV	INJURY+4~
>> POVCNT	INJUPD+6*, INJUPD+37, INJUPD+42
POVLST	INJUPD+32~, INJUPD+47*, INJUPD+50
QUIT	INJURY+4~, INJ, INJ+3, INJ+17, INJ+18, INJ+21, INJ+27, INJ1, INJ1+2, INJ1+3 , INJ1+13, INJ1+14, INJ1+15, INJ2, INJ2+11, INJ2+12, INJ3, INJ3+13, INJ3+14, INJ4 , INJ4+13, INJ4+18, INJ4+19, INJ5, INJ5+12, INJ5+13, INJ6, INJ6+14, INJ6+15, INJ7* , INJ7+14, INJ7+15, INJ8, INJ8+14, INJ8+15, INJ9, INJ9+14, INJ9+15, INJ10, INJ10+14 , INJ10+15, INJ11, INJ11+14, INJ11+15
SAFE	INJ3+1~, INJ3+4*, INJ3+5, INJ3+18, INJ3+21
TOWN	INJ5+1~, INJ5+4*, INJ5+5, INJ5+19, INJ5+21
U	INJUPD+24, INJUPD+27, INJUPD+31, INJUPD+39, INJUPD+53
VAL	INJURY+4~, INJUPD+12, INJUPD+13, INJUPD+16, INJUPD+17, INJUPD+20, INJUPD+21, INJUPD+50, INJUPD+52, INJUPD+53
VDT	INJ4+1~, INJ4+8*, INJ4+21
VPOVIEN	INJUPD+25~, INJUPD+27, INJUPD+28, INJUPD+51~, INJUPD+53, INJUPD+54
X	INJ+4~, INJ1+14, INJ2+1~, INJ3+1~, INJ4+1~, INJ5+1~, INJ6+1~, INJ7+1~, INJ8+1~, INJ9+1~ , INJ10+1~, INJ11+1~, INJUPD+46*
Y	INJ+4~, INJ+14, INJ1+15, INJ1+16, INJ2+1~, INJ2+14, INJ2+15, INJ3+1~, INJ3+17, INJ4+1~ , INJ4+5, INJ4+13, INJ4+21, INJ4+22, INJ4+33, INJ4+34*, INJ5+1~, INJ5+15, INJ6+1~, INJ6+11 , INJ7+1~, INJ7+11, INJ8+1~, INJ8+11, INJ9+1~, INJ9+11, INJ10+1~, INJ10+11, INJ11+1~, INJ11+11 , INJUPD+47

Customize PDF page

Package: Emergency Room

Routine: AMEREDTI

Information

Source Information

Call Graph

Call Graph Total: 11

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: