Routine: AMER2B

Package	Total	Call Graph
Emergency Room	7	OUT^AMER $$CAT^AMER0 CKSC^AMER1 $$TCK^AMER2A INJ^AMERBEDD $$DX^AMERPOV LEX^AMERUTIL
VA Fileman	3	^DIC $$GET1^DIQ ^DIR
Kernel	1	$$UP^XLFSTR

Package	Total	Caller Graph
Emergency Room	1	AMEREDTI

Entry Points

Name	Comments	DBIA/ICR reference
QD35A	;
QD35	; SAFETY EQUIPMENT OF INJURY
CKANS()
QD41	; DESCIPTION OF MVA LOCATION
XQD33
QD34	; PLACE OF INJURY
QD33E
QD33(AMERPCC,DTOUT)	; CAUSE OF INJURY
QD31	; CITY OF INJURY
QD32	; TIME OF INJURY
DESC(X,D0,CODE,VDATE)	;Return the ICD Description

External References

Name	Field # of Occurrence
OUT^AMER	QD31+12, QD32+13, XQD33, QD34+15, QD35+16, QD41+4
$$CAT^AMER0	QD34+3, QD35+4
CKSC^AMER1	QD31+3, QD41+3
$$TCK^AMER2A	QD32+3
INJ^AMERBEDD	QD31+9, QD32+10, QD33E+57, QD34+12, QD35+13
$$DX^AMERPOV	QD33+24, DESC+5
LEX^AMERUTIL	QD33E+12
^DIC	QD34+4, QD35+5
$$GET1^DIQ	QD33+10, QD33+11, QD33+13, QD33+16
^DIR	QD31+2, QD32+2, QD33+28, QD33E+4, QD33E+37, QD41+2
$$UP^XLFSTR	QD35A+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Current Cause of injury: ",DESC,! Line Location: QD33+25
Function Call: WRITE	Prompt: !!,"<No results returned. Please try a different search string>",! Line Location: QD33E+15
Function Call: WRITE	Prompt: !! Line Location: QD33E+23
Function Call: WRITE	Prompt: !,LEX,?4,$P(ND,U,2),?14,$E($P(ND,U,3),1,64) Line Location: QD33E+30
Function Call: WRITE	Prompt: !,"Press <RETURN> to see more, '^' to exit this list, OR" Line Location: QD33E+34
Routine Call	DIC Line Location: QD34+4 QD35+5
Routine Call	DIR Line Location: QD31+2 QD32+2 QD33+28 QD33E+4 QD33E+37 QD41+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMER(3 - [#9009083]	QD34+2, QD35+3
^DD("DD"	QD32+1
^TMP("AMER"	QD31+1, QD32+1, QD32+3, QD33+17, QD34+2, QD35+3, QD35A+9, QD35A+16!, QD35A+20!, QD41+1
^TMP("AMERICD"	QD33E+18!, QD33E+19*, QD33E+24, QD33E+29, QD33E+49

Label References

Name	Line Occurrences
$$CKANS	QD33E+38
$$DESC	QD35A+10
QD31	QD31+3
QD32	QD32+3
QD33E	QD33E+15, QD33E+44, QD33E+46
QD41	QD41+3
XQD33	QD33+20

Naked Globals

Name	Field # of Occurrence
^(32	QD32+1
^(34	QD34+2
^(35	QD35+3
^(41	QD41+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	QD34+2, QD35+1~, QD35+3, QD35A+8~, QD35A+9*, QD35A+10
A	QD35+1~
AMERCKSC	QD31+3!, QD41+3!
>> AMERDA	QD33+16
>> AMERDFN	QD35A+7, QD35A+10
>> AMEREFLG	QD35A+21
AMERPCC	QD33~, QD33+10*, QD33+11
>> AMERQUIT	QD35+16, QD41+4
>> AMERRUN	QD35A+15, QD35A+21, QD35A+22, QD41+5
CAUSE	QD33+9~, QD33+16, QD33+17, QD33+20, QD33+24, QD33+36
CODE	DESC~, DESC+5
D0	DESC~, DESC+5
DA	QD31+2!
DESC	QD33+21~, QD33+24, QD33+25, QD35A+8~, QD35A+10, QD35A+11
>> DFN	QD33+10, QD33+13
DIC	QD34+3, QD34+4!, QD35+4, QD35+5!
DIC("A"	QD34+1, QD35+2
DIC("B"	QD34+1!, QD34+2, QD35+2!, QD35+3
DIC("S"	QD34+3, QD35+4
DIC(0	QD34+3, QD35+4
DIR	QD31+2!, QD32+2!, QD33+8~, QD33+21~, QD33E+26~, QD41+2!
DIR("?"	QD32+2, QD33E+3, QD41+2*
DIR("A"	QD31+2, QD32+2, QD33+27, QD33E+2, QD33E+35, QD41+2
DIR("B"	QD31+1, QD32+1, QD33+26, QD41+1!
DIR(0	QD31+2, QD32+2, QD33+27, QD33E, QD33E+36, QD41+2
DIROUT	QD33+8~, QD33E+26~, CKANS+3
DIRUT	QD33+8~, QD33E+5, QD33E+26~, CKANS+9
DT	QD33+12
DTOUT	QD33~, QD33+21~, QD33+33, QD33E+26~, CKANS+6
DUOUT	QD33+8~, QD33+21~, QD33+32, QD33E+26~, CKANS+6
EDIT	QD33+9~, QD33+20, QD33+29
I	QD35A+8~, QD35A+11, QD35A+16, QD35A+20*
ICDDESC	DESC+2~, DESC+5*, DESC+6
INJ	QD31+6~, QD31+7, QD31+9, QD31+10!, QD32+7~, QD32+8, QD32+10, QD32+11!, QD33E+52~, QD33E+55* , QD33E+57, QD33E+58!, QD34+7~, QD34+10, QD34+12, QD34+13!, QD35+8~, QD35+11, QD35+13, QD35+14!
INP	QD33+8~
LEX	QD33+8~, QD33E+19, QD33E+24, QD33E+29, QD33E+30, QD33E+33, QD33E+35, QD33E+36
MVA	QD35A+2~, QD35A+4, QD35A+11, QD35A+14
ND	QD33E+26~, QD33E+29*, QD33E+30
QUIT	QD33+8~, QD33E+24, QD33E+38, QD33E+44, QD33E+45
RET	QD33+8~, QD33E+12, QD33E+15!, QD33E+44!, QD33E+46!
RET(	QD33E+19
RET(""	QD33E+15
SELECT	QD33+8~, QD33E+22, QD33E+24, QD33E+41, QD33E+46, QD33E+49
SEX	QD33+8~, QD33+13*, QD33E+12
TOTREC	QD33+8~, QD33E+19*, QD33E+33
U	QD33E+30, QD33E+49, QD34+2, QD35+3, QD35A+9
VDATE	DESC~, DESC+5
VDT	QD33+8~, QD33+11, QD33+12, QD33+24, QD33E+12
X	QD33+32, QD33+33, QD33E+5, QD33E+26~, QD33E+45, DESC~, DESC+5
Y	QD31+7, QD31+8~, QD32+1, QD32+3!, QD32+4, QD32+8, QD32+9~, QD33+29, QD33+32, QD33+33 , QD33+36, QD33E+12, QD33E+26~, QD33E+41, QD33E+45, QD33E+49, QD33E+55, QD33E+56~, QD34+4, QD34+10 , QD34+11~, QD35+5*, QD35+11, QD35+12~
Z	QD35+1~

Customize PDF page

Package: Emergency Room

Routine: AMER2B

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

Naked Globals

Local Variables

Legend: